
  PROCEDURE [XREF] tmp$clear_system_flag (flag_id: ost$system_flag;
    VAR flag_status: tmt$flag_status);

?? PUSH (LISTEXT := ON) ??
*copyc OST$SYSTEM_FLAG
*copyc TMT$FLAG_STATUS
?? POP ??
