
  PROCEDURE [XREF] tmp$check_taskid_with_lock_set
    (    taskid: ost$global_task_id;
         option: tmt$option;
     VAR status: syt$monitor_status);

?? PUSH (LISTEXT := ON) ??
*copyc OST$GLOBAL_TASK_ID
*copyc TMT$PRIMARY_TASK_LIST
*copyc SYT$MONITOR_REQUEST_CODE
?? POP ??
