
  PROCEDURE [XREF] nfp$send_queue_file
    (    connection_identifier: amt$file_identifier;
         queue_file_identifier: amt$file_identifier;
         file_name: jmt$system_supplied_name;
         facilities: nft$facility_group;
         transfer_mode: nft$transfer_modes;
         block_size: nft$block_size;
         min_timeout: nft$timeout;
         protocol_version: nft$parameter_00_values;
         network_type: nft$network_type;
         activate_protocol_trace: boolean;
     VAR protocol_state_consistent: boolean;
     VAR transfer_status: ost$status;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc jmt$system_supplied_name
*copyc nft$network_type
*copyc nft$parameter_00_values
*copyc nft$transfer_declarations
*copyc nft$transfer_modes
*copyc ost$status
?? POP ??

