%ZTLOAD3 ;SEA/RDS - TaskMan: Task Requeue ;07/29/08 11:46
Source file <ZTLOAD3.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INPUT | ;check for error conditions
|
|
DQ | ;make sure task is not pending
|
|
ZTDTH | ;determine task's next start time
|
|
DT | ||
DTX | ||
ZTRTN | ;determine whether entry point should change
|
|
ZTIO | ;determine whether i/o device should change
|
|
ZTIO1 | ;set hunt group suppression flag
|
|
ZTDESC | ;determine whether description should change
|
|
RECORD | ;record changes in Task File entry
|
|
ZTSAVE | ;See if new data to save
|
|
SCHED | ;schedule task, cleanup, quit
|
|
BAD | ||
REQP(ZT1) | ;Reschedule a persistent task. Called from ZTM
|