%ZTM0 ;SEA/RDS-TaskMan: Manager, Part 2 (Begin) ;07/17/08 08:16
Source file <ZTM0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ;Entry Point--start Task Manager at system startup
|
|
S1 | ;
|
|
RESTART | ;Entry Point--restart Task Manager
|
|
SETUP | ;Setup Task Manager's Environment
|
|
ST2 | ||
STRTUP | ;Queue the entries from the STARTUP X-ref
|
|
ZOSF | ;SETUP--determine whether any required ^%ZOSF nodes are missing
|
|
JOB | ;SETUP--setup JOB command
|
|
NAME | ;Give a name to process.
|
|
BADTYPE | ;Taskman should not run on this type of node.
|
|
HALT | ;Cleanup and halt
|
Name | Field # of Occurrence |
---|---|
ACTJ^%ZOSV | ZOSF+3 |
NOLOG^%ZOSV | ST2+6 |
SETENV^%ZOSV | NAME+2 |
^%ZTLOAD | STRTUP+7 |
^%ZTM | S1+7, RESTART+10 |
$$H3^%ZTM | START+4, RESTART+3 |
I6^%ZTM | START+7 |
STATUS^%ZTM | START+5, START+15, S1+1, RESTART+4, ST2+1, ST2+2, ST2+3 |
TSKSTAT^%ZTM1 | START+9 |
UPDATE^%ZTM5 | ST2+3 |
COUNT^XUSCNT | S1+6, RESTART+9, HALT+1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF( | ZOSF+2 |
^%ZTSCH( | START+2 |
^%ZTSCH("C" | S1+4*, ST2+5* |
^%ZTSCH("DEV" | START+3! |
^%ZTSCH("ER" | START+1*, RESTART+1* |
^%ZTSCH("IDLE" | START+14*, RESTART+6* |
^%ZTSCH("LOADA" | HALT+3! |
^%ZTSCH("RUN" | ST2*, BADTYPE+2*, HALT+2! |
^%ZTSCH("STARTUP" | STRTUP+4, STRTUP+6 |
^%ZTSCH("STATUS" | RESTART+2!, BADTYPE+1!, HALT+2! |
^%ZTSCH("SUB" | START+14*, RESTART+7* |
^%ZTSCH("TASK" | START+8, START+10!, START+11! |
^%ZTSCH("UPDATE" | HALT+2! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZTI | S1+5! |
>> %ZTIME | START+4*, RESTART+3* |
>> %ZTJOB | JOB+2*, JOB+3*, JOB+5*, JOB+7*, JOB+8*, JOB+10*, JOB+11*, JOB+12* |
>> %ZTLKTM | START+6* |
>> %ZTNLG | ST2+6* |
>> %ZTOS | JOB+1, JOB+5, JOB+6, JOB+10, JOB+11 |
>> %ZTPAIR | START+14, RESTART+7, ST2*, BADTYPE+2, HALT+3 |
>> %ZTPFLG("DCL" | JOB+2, JOB+3, JOB+7, JOB+8 |
>> %ZTPFLG("TM-DELAY" | START+16 |
>> %ZTPFLG("XUSCNT" | S1+6, RESTART+9, HALT+1 |
>> %ZTVOL | NAME+2 |
%ZTY | S1+5! |
>> %ZTYPE | START+13, RESTART+8 |
DTIME | ST2+6* |
DUZ | ST2+6*, STRTUP+2~, STRTUP+3* |
DUZ(0 | ST2+6*, STRTUP+3* |
U | START+1*, RESTART+1* |
X | SETUP+1~, ST2+5*, ST2+7!, ZOSF+2*, NAME+2* |
Y | SETUP+1~, ST2+2, ST2+6, ST2+7!, ZOSF+1*, ZOSF+2*, ZOSF+3*, ZOSF+4* |
Z | SETUP+1~, ST2+7!, NAME+2* |
ZQ | NAME+1~, NAME+2* |
ZT | SETUP+1~, ST2+7! |
>> ZTCPU | STRTUP+6* |
>> ZTDTH | STRTUP+6* |
ZTIO | S1+5!, STRTUP+6* |
ZTO | S1+5!, STRTUP+2~, STRTUP+4*, STRTUP+5, STRTUP+6 |
ZTP | S1+5! |
>> ZTREQUIR | ST2+3 |
ZTRTN | STRTUP+2~, STRTUP+6* |
ZTSAVE | STRTUP+2~ |
ZTSAVE( | STRTUP+6* |
ZTSAVE("XQY" | STRTUP+5* |
ZTSK | START+8*, START+10, S1+5! |
ZTU | S1+4*, S1+5!, STRTUP+2~, STRTUP+4*, STRTUP+6 |
>> ZTUCI | STRTUP+6* |
Name | Field # of Occurrence |
---|---|
$T(ACTJ^%ZOSV | ZOSF+3 |