
  PROCEDURE [XREF] lgp$add_entry_to_critical_log
    (    text: pmt$log_msg_text;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc pmt$log_msg_text
?? POP ??
