
  PROCEDURE [XREF] qfp$get_job_status
    (    user_identification: ost$user_identification;
         caller_ssn: jmt$system_supplied_name;
         privileged_job: boolean;
         valid_for_scheduling_displays: boolean;
         status_options: ^jmt$job_status_options;
         status_results_keys_p: ^jmt$results_keys;
     VAR work_area_p: ^jmt$work_area;
     VAR number_of_jobs_found: jmt$job_status_count;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$job_status_count
*copyc jmt$job_status_options
*copyc jmt$results_keys
*copyc jmt$system_supplied_name
*copyc jmt$work_area
*copyc ost$status
*copyc ost$user_identification
*copyc jme$queued_file_conditions
?? POP ??
