
  TYPE
    jmt$full_job_category_list = array [1 .. jmc$maximum_job_category_count] of
          ost$name;

*copyc jmt$job_category_list
*copyc ost$name
