
  PROCEDURE [XREF] nfp$send_file_assignment_resp
    (    station_name: ost$name;
         device_name: ost$name;
         file_name: jmt$system_supplied_name;
         response_code: nft$file_assignment_response;
         connection_identifier: amt$file_identifier;
     VAR message: ^nft$message_sequence;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc jmt$system_supplied_name
*copyc nft$file_assignment_response
*copyc nft$message_sequence
*copyc ost$name
*copyc ost$status
?? POP ??

