
  TYPE
    jmt$jl_assigned_job_list = array [1 .. * ] of jmt$jl_assigned_job;

  TYPE
    jmt$jl_assigned_job = record
      system_job_name: jmt$system_supplied_name,
      user_job_name: jmt$user_supplied_name,
      login_user_identification: ost$user_identification,
      control_user_identification: ost$user_identification,
      originating_ssn: jmt$system_supplied_name,
      job_submission_time: jmt$clock_time,
      latest_clock_time_to_initiate: jmt$clock_time,
      job_class: jmt$job_class,
      job_category_set: jmt$job_category_set,
      output_disposition_key: jmt$output_disposition_keys,
      server_kjl_index: jmt$kjl_index,
    recend;

*copyc jmt$clock_time
*copyc jmt$job_category_set
*copyc jmt$job_class
*copyc jmt$kjl_index
*copyc jmt$output_disposition_keys
*copyc jmt$system_supplied_name
*copyc jmt$user_supplied_name
*copyc ost$user_identification
