
  PROCEDURE [XREF] fmp$end_new_open_processing
    (    path_handle: fmt$path_handle;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc fmt$path_handle
*copyc ost$status
?? POP ??

