
  PROCEDURE [XREF] fsp$open_and_get_type_of_copy
    (    input: fst$file_reference;
         output: fst$file_reference;
         input_file_attachment: ^fst$attachment_options;
         output_file_attachment: ^fst$attachment_options;
         input_attribute_validation: ^fst$file_cycle_attributes;
         output_attribute_validation: ^fst$file_cycle_attributes;
         output_creation_attributes: ^fst$file_cycle_attributes;
     VAR input_fid: amt$file_identifier;
     VAR output_fid: amt$file_identifier;
     VAR control_info: fst$copy_control_information;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc fst$file_reference
*copyc amt$file_identifier
*copyc fst$attachment_options
*copyc fst$copy_control_information
*copyc fst$file_cycle_attributes
*copyc ost$status
*copyc amc$condition_code_limits
*copyc ame$access_validation_errors
*copyc ame$lfn_program_actions
*copyc ame$open_validation_errors
*copyc ame$ring_validation_errors
*copyc ame$unimplemented_request
*copyc fse$copy_validation_errors
*copyc fse$open_validation_errors
?? POP ??
