  PROCEDURE [INLINE] mtp$set_status_abnormal (identifier: string (2);
        condition: osc$max_status_condition_number + 1 .. 0ffffffffff(16);
    VAR status: syt$monitor_status);

?? PUSH (LISTEXT := ON) ??
    status.normal := FALSE;
    status.condition := condition;
  PROCEND mtp$set_status_abnormal;
*copyc osc$max_status_condition_number
?? POP ??
