
  PROCEDURE [XREF] tmp$find_flag_to_process (VAR flag_found: boolean;
    VAR flag_id: ost$system_flag;
    VAR flag_handler: tmt$system_flag_handler);

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