©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
%ZTM0 ;SEA/RDS-TaskMan: Manager, Part 2 (Begin) ;07/17/08 08:16
Source file <ZTM0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NAME | ;Give a name to process.
|
|
| SETUP | ;Setup Task Manager's Environment
|
|
| S1 | ;
|
|
| JOB | ;SETUP--setup JOB command
|
|
| START | ;Entry Point--start Task Manager at system startup
|
|
| ZOSF | ;SETUP--determine whether any required ^%ZOSF nodes are missing
|
|
| BADTYPE | ;Taskman should not run on this type of node.
|
|
| ST2 | ||
| STRTUP | ;Queue the entries from the STARTUP X-ref
|
|
| RESTART | ;Entry Point--restart Task Manager
|
|
| 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! |
| Name | Line Occurrences |
|---|---|
| BADTYPE | START+13, RESTART+8 |
| JOB | ST2+6 |
| NAME | ST2+7 |
| RESTART | START+2 |
| SETUP | START+12, RESTART+5 |
| ST2 | ST2+2, ST2+3 |
| STRTUP | S1+3 |
| ZOSF | ST2+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | START+14* |
| ^("DEVOPEN" | START+3! |
| ^("LOAD" | START+3! |
| ^("LOADA" | START+3! |
| ^("STATUS" | START+3! |
| ^("STOP" | START+3!, RESTART+2! |
| ^("SUB" | START+3! |
| ^("UPDATE" | START+3! |
| >> | 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 |