
  PROCEDURE [XREF] dmp$destroy_permanent_file ALIAS 'dmxdepf'
    (    global_file_name: dmt$global_file_name;
         stored_fmd: dmt$stored_fmd;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dmt$stored_fmd
*copyc dmt$global_file_name
*copyc ost$status
?? POP ??
