%ZTM5 ;SEA/RDS-TaskMan: Manager, Part 5 (Short Subroutines) ;10/01/08 14:35
Source file <ZTM5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ER2 | ||
| HOUR | ;Run once an hour for each taskman
|
|
| INHIBIT(Y) | ;Set/Clear the Inhibit logon field
|
|
| SCHCHK | ;Queue the check of the option schedule file. ;p446
|
|
| L3 | ;if there is a separate TaskMan Files Volume Set, is it on file?
|
|
| U1 | ;
|
|
| UPDATE | ;CHECK^%ZTM/LOOKUP^%ZTM0--update TaskMan site parameters
|
|
| LINK(ZTVOL) | ;internal Kernel extrinsic function
|
|
| L4 | ;if there is a TaskMan Files UCI, return UCI,volume set
|
|
| PARAMS | ;Setup Parameters ;p446
|
|
| MON | ;Save off the monitor data
|
|
| L0 | ;was a volume set passed in?
|
|
| L1 | ;is this volume set on file?
|
|
| TEST | ;REQUIR--test a required volume set
|
|
| L2 | ;is there a TaskMan Files Volume Set? if not, skip next section
|
|
| SUBCHK | ;Job the SUB check routine
|
|
| DAY | ;Run once a DAY for each Taskman
|
|
| REQUIR | ;UPDATE/CHECK^%ZTM--ensure required links are available
|
|
| ER | ;primary error trap for manager
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(14.5 - [#14.5] | PARAMS+4, REQUIR+2, L1+1, L1+3, L1+4, L3+1, L3+2, INHIBIT+1*, INHIBIT+2*! |
| ^%ZIS(14.6 - [#14.6] | TEST+6 |
| ^%ZIS(14.7 - [#14.7] | U1+1, U1+10, U1+14, U1+22, U1+23 |
| ^%ZOSF("OS" | PARAMS+1 |
| ^%ZTSCH("ER" | ER+10, ER+11*, ER+12 |
| ^%ZTSCH("HOUR" | SCHCHK+1, SCHCHK+2* |
| ^%ZTSCH("LINK" | TEST+9, TEST+10*, TEST+11 |
| ^%ZTSCH("LOAD" | UPDATE+2* |
| ^%ZTSCH("LOADA" | UPDATE+6! |
| ^%ZTSCH("MON" | MON+3* |
| ^%ZTSCH("RUN" | ER+5*, UPDATE+10* |
| ^%ZTSCH("STATUS" | UPDATE+9! |
| ^%ZTSCH("UPDATE" | UPDATE+1, UPDATE+5*, UPDATE+7 |
| ^DD("DILOCKTM" | U1+17 |
| Name | Line Occurrences |
|---|---|
| L4 | L2+2 |
| MON | DAY+1 |
| PARAMS | UPDATE+3 |
| SCHCHK | HOUR+2 |
| SUBCHK | HOUR+1 |
| TEST | REQUIR+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | ER+11* |
| ^(0 | REQUIR+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZTERLGR | ER+1* |
| >> %ZTIME | SCHCHK+1, SCHCHK+2 |
| >> %ZTLKTM | U1+17* |
| >> %ZTMON( | MON+2* |
| >> %ZTMON("DAY" | U1+18*, MON+3, MON+4* |
| >> %ZTNODE | UPDATE+10, PARAMS+3* |
| >> %ZTOS | PARAMS+1*, U1+16, U1+20 |
| >> %ZTPAIR | UPDATE+6, PARAMS+3*, U1+1, U1+21, MON+3 |
| %ZTPFLG | U1+8!* |
| %ZTPFLG("BAL" | U1+10* |
| %ZTPFLG("BI" | U1+12* |
| %ZTPFLG("DCL" | U1+9* |
| %ZTPFLG("JLC" | U1+13* |
| %ZTPFLG("LBT" | U1+12* |
| %ZTPFLG("MINSUB" | U1+11* |
| %ZTPFLG("Q" | U1+24* |
| %ZTPFLG("START" | U1+15* |
| %ZTPFLG("TM-DELAY" | U1+14* |
| %ZTPFLG("XUSCNT" | U1+16* |
| >> %ZTPN | U1+1*, U1+10, U1+14 |
| >> %ZTPS | U1+1*, U1+2, U1+3, U1+4, U1+5, U1+6, U1+7, U1+9, U1+11, U1+12 |
| >> %ZTPT | U1+2* |
| >> %ZTRET | U1+4* |
| >> %ZTSIZ | U1+3* |
| >> %ZTSLO | U1+6* |
| >> %ZTUCI | PARAMS+3* |
| >> %ZTVLI | PARAMS+5* |
| >> %ZTVMJ | U1+5* |
| >> %ZTVOL | PARAMS+3*, PARAMS+4, TEST+3, INHIBIT+1, INHIBIT+2 |
| >> %ZTVSN | PARAMS+4*, INHIBIT+1, INHIBIT+2 |
| >> %ZTVSS | PARAMS+4*, PARAMS+5, PARAMS+6 |
| >> %ZTYPE | UPDATE+8, U1+7* |
| >> %ZTYPE("V" | PARAMS+6* |
| DUZ | SCHCHK+3~, SCHCHK+4* |
| I | U1+21~, U1+23*, U1+24*, MON+2* |
| NULL | TEST+1~, TEST+2* |
| U | PARAMS+1*, PARAMS+3, PARAMS+5, PARAMS+6, U1+2, U1+3, U1+4, U1+5, U1+6, U1+7 , U1+9, U1+11, U1+12, U1+14, U1+24, REQUIR+2, TEST+2, TEST+4, TEST+5, INHIBIT+1 , INHIBIT+2 |
| X | U1+21~*, U1+22*, U1+23, MON+1~*, MON+2*, MON+3 |
| Y | PARAMS+3, U1+21~*, U1+22, INHIBIT~, INHIBIT+1, INHIBIT+2 |
| >> Z | U1+23*, U1+24 |
| ZT | REQUIR+3! |
| ZT1 | ER+8~, ER+10*, ER+11, REQUIR+1~*, REQUIR+2*, REQUIR+3! |
| ZT2 | ER+8~, ER+10*, ER+11 |
| ZTDESC | SCHCHK+3~, SCHCHK+4* |
| ZTDTH | SCHCHK+3~, SCHCHK+4* |
| ZTERCODE | ER+1*, ER+9, ER+11, ER+15! |
| ZTIO | SCHCHK+3~, SCHCHK+4* |
| ZTN | REQUIR+1~, REQUIR+3!, TEST+2*, TEST+3, TEST+4, TEST+5, TEST+6, TEST+9, TEST+10, TEST+11 , L0+1~, L2+1*, L2+2, L3+1, L3+2 |
| ZTREQUIR | REQUIR+1!, REQUIR+2, TEST+4*, TEST+5* |
| ZTRTN | SCHCHK+3~, SCHCHK+4* |
| ZTS | REQUIR+1~, REQUIR+2*, REQUIR+3!, TEST+2, TEST+4, TEST+5 |
| ZTSK | SCHCHK+3~ |
| ZTU | REQUIR+1~, REQUIR+3!, TEST+6*, L0+1~, L4+1*, L4+2, L4+3 |
| ZTV | L0+1~, L2+2*, L3+3*, L3+4, L4+3 |
| ZTVD | L0+1~, L1+4*, L2+1, L3+2*, L3+3, L4+1 |
| ZTVN | L0+1~, L1+1*, L1+2, L1+3, L1+4 |
| ZTVOL | LINK~, L0+2, L1+1, L2+2 |
| Name | Field # of Occurrence |
|---|---|
| $T(^XUSCNT | U1+16 |