
  PROCEDURE [XREF] jmp$print_file
    (    file_reference: fst$file_reference;
         output_submission_options: ^jmt$output_submission_options;
     VAR system_file_name: jmt$system_supplied_name;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ame$ring_validation_errors
*copyc cle$ecc_lexical
*copyc fst$file_reference
*copyc jme$invalid_parameter
*copyc jme$maximum_output
*copyc jme$no_space_for_file
*copyc jme$sl_version_mismatch
*copyc jmt$output_submission_options
*copyc jmt$system_supplied_name
*copyc ost$status
?? POP ??
