
  PROCEDURE [INLINE] iop$mtr_set_status_abnormal
    (    condition: ost$status_condition;
     VAR status: syt$monitor_status);

?? PUSH (LISTEXT := ON) ??

    status.normal := FALSE;
    status.condition := condition;

  PROCEND iop$mtr_set_status_abnormal;

*copyc ost$status
*copyc syt$monitor_status
?? POP ??
