
  PROCEDURE [XREF] dsp$dft_issue_system_alert
    (    alert_source: dst$dft_alert_source;
         supportive_information_p: ^SEQ ( * );
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dst$dft_alert_source
*copyc ost$status
?? POP ??
