
  PROCEDURE [XREF] dmp$create_fd_entry ALIAS 'dmxcfd'
    (    p_file_attributes: ^array [1 .. * ] of dmt$file_attribute;
     VAR system_file_id: gft$system_file_identifier;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dmt$file_attributes
*copyc gft$system_file_identifier
*copyc ost$status
?? POP ??
