
  PROCEDURE [XREF] bap$file_command
    (    file: fst$file_reference;
         file_attributes: ^amt$file_attributes;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$local_file_name
*copyc amt$file_attributes
*copyc fst$file_reference
*copyc ost$status
?? POP ??
