
  PROCEDURE [XREF] qfp$terminate_job
    (    system_job_name: jmt$system_supplied_name;
         job_state_set: jmt$job_state_set;
         output_disposition_key_known: boolean;
         output_disposition_key: jmt$output_disposition_keys;
         operator_job: boolean;
     VAR family_name: ost$name;
     VAR delete_input_file: boolean;
     VAR input_file_location: jmt$input_file_location;
     VAR job_assigned_to_client: boolean;
     VAR client_mainframe_id: pmt$mainframe_id;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jme$queued_file_conditions
*copyc jmt$input_file_location
*copyc jmt$job_state_set
*copyc jmt$output_disposition_keys
*copyc jmt$system_supplied_name
*copyc ost$name
*copyc ost$status
*copyc pmt$mainframe_id
?? POP ??
