
  PROCEDURE [XREF] dmp$create_file_entry
    (    file_kind: gft$file_kind;
         file_usage: pft$usage_selections;
         file_share_selections: pft$share_selections;
         file_share_history: dmt$file_share_history;
         p_file_attribute: ^array [ * ] of dmt$new_file_attribute;
         byte_address: amt$file_byte_address;
         assign_volume: boolean;
     VAR global_file_name: dmt$global_file_name;
     VAR system_file_id: gft$system_file_identifier;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_byte_address
*copyc dmt$file_share_history
*copyc dmt$global_file_name
*copyc dmt$new_file_attribute
*copyc gft$file_kind
*copyc gft$system_file_identifier
*copyc ost$status
*copyc pft$share_selections
*copyc pft$usage_selections
?? POP ??
