
  PROCEDURE [XREF] dmp$attach_file
    (    global_file_name: dmt$global_file_name;
         file_kind: gft$file_kind;
         stored_fmd: dmt$stored_fmd;
         file_usage: pft$usage_selections;
         file_share_selections: pft$share_selections;
         file_history: dmt$file_share_history;
         file_limit: amt$file_limit;
         restricted_attach: boolean;
         exit_on_unknown_file: boolean;
         server_file: boolean;
         shared_queue: mmt$shared_queue;
     VAR file_damaged: boolean;
     VAR system_file_id: gft$system_file_identifier;
     VAR existing_sft_entry: dmt$existing_sft_entry;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_limit
*copyc dmt$existing_sft_entry
*copyc dmt$file_share_history
*copyc dmt$global_file_name
*copyc dmt$stored_fmd
*copyc gft$file_kind
*copyc gft$system_file_identifier
*copyc mmt$shared_queue
*copyc ost$status
*copyc pft$share_selections
*copyc pft$usage_selections
?? POP ??
