
  PROCEDURE [XREF] amp$validate_attributes
    (    file: fst$file_reference;
         request_code: amt$last_operation;
         validation_ring: ost$valid_ring;
         attributes: ^amt$file_attributes;
     VAR status: ost$status);

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