
  PROCEDURE [XREF] qfp$purge_processed_queue_file
    (VAR system_file_name_to_delete: jmt$system_supplied_name);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$system_supplied_name
?? POP ??
