
  PROCEDURE [XREF] bap$change_file_attributes
    (    file_attributes: ^amt$file_attributes;
     VAR evaluated_file_reference: {i/o} fst$evaluated_file_reference;
     VAR open_changed_file: boolean;
     VAR status: ost$status);

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




