%ZTM1 ;SEA/RDS-TaskMan: Manager, Part 3 (Validate Task) ;07/27/2005 18:13
Source file <ZTM1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REJCT(MSG) | ;Save reject msg, set flag
|
|
| ZIS | ;MAIN--Determine Output Device
|
|
| VSTYP(VS) | ;Get a VS's type
|
|
| U5 | ;
|
|
| U4 | ;
|
|
| STORE | ;Store Validated Data In Task Log, Quit If Needn't Do WAIT
|
|
| U1 | ;
|
|
| ZISX | ||
| U2 | ;
|
|
| VOLUME | ;determine destination volume set
|
|
| V1 | ;reject tasks with destination volume sets not in Volume Set file
|
|
| V2 | ;lookup type of volume set, and reject tasks to F or O types
|
|
| V3 | ;accept tasks with the current volume set as the destination
|
|
| LOOKUP | ;
|
|
| U3 | ;
|
|
| H3(%) | ;Convert $H to seconds.
|
|
| IOWAIT | ;If Device has a queue, Put Task On IO Queue.
|
|
| V4 | ;reject tasks whose destination volume sets lack link access
|
|
| MAIN | ;
|
|
| TSKSTAT(CODE,MSG) | ; Update task's status
|
|
| UCI | ;MAIN--determine destination UCI
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | ZIS+10 |
| ^%ZIS(14.5 - [#14.5] | V1+1, V1+3, VSTYP+2 |
| ^%ZIS(14.6 - [#14.6] | U3+2, U5+2 |
| ^%ZOSF("TEST" | U2+9 |
| ^%ZOSF("UCICHECK" | U2+4, U4+2 |
| ^%ZTSCH("IO" | STORE+12 |
| ^%ZTSK - [#14.4] | LOOKUP+4, LOOKUP+5, LOOKUP+6, LOOKUP+7*, STORE+2, STORE+3*, STORE+4*, STORE+5*, STORE+6*, TSKSTAT+1* |
| Name | Line Occurrences |
|---|---|
| $$VSTYP | VOLUME+5 |
| IOWAIT | STORE+12 |
| LOOKUP | MAIN+2 |
| REJCT | ZIS+6, V1+2, V1+4, V2+2, V4+1, U1+2, U2+5, U2+11, U4+3 |
| STORE | MAIN+2 |
| TSKSTAT | LOOKUP+3, STORE+2, IOWAIT+1 |
| UCI | MAIN+5 |
| VOLUME | MAIN+4 |
| ZIS | MAIN+3 |
| ZISX | ZIS+2, ZIS+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | STORE+5, STORE+6* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | VSTYP+1~, VSTYP+2*, VSTYP+3, H3~, H3+1 |
| >> %ZIS | ZIS+3*, ZIS+4* |
| %ZTF | STORE+7! |
| >> %ZTIO | IOWAIT+2* |
| >> %ZTREJCT | MAIN+3, MAIN+4, MAIN+5, LOOKUP+2*, STORE+1, STORE+2*, STORE+9, IOWAIT+1*, REJCT+1* |
| >> %ZTVOL | VOLUME+7, VOLUME+8, V3+1, U2+3, U5+2, STORE+10 |
| >> %ZTYPE | VOLUME+7 |
| >> A | VOLUME+1*, VOLUME+2, VOLUME+3*, VOLUME+4 |
| CODE | TSKSTAT~, TSKSTAT+1 |
| DUZ | REJCT+2, REJCT+4 |
| IO | ZIS+2*, ZIS+6, ZIS+7*, ZIS+9, STORE+12, IOWAIT+2 |
| IO(1 | ZIS+5! |
| IOCPU | ZIS+10*, VOLUME+1, VOLUME+3, STORE+7! |
| >> IOP | ZIS+3* |
| >> IOS | ZIS+10, ZIS+11 |
| IOST | ZIS+9 |
| >> IOT | ZIS+6, ZIS+7, ZIS+9, STORE+11, IOWAIT+2 |
| MSG | REJCT~, REJCT+1, REJCT+4, TSKSTAT~, TSKSTAT+1 |
| >> POP | ZIS+6 |
| U | ZIS+1, ZIS+3, ZIS+9, ZIS+10, VOLUME+2, VOLUME+4, VOLUME+5, VOLUME+9, V2+1, V4+1 , VSTYP+3, UCI+1, UCI+2, U2+7, U2+8, U2+9, U3+2, U5+4, STORE+1, STORE+5 , REJCT+1, REJCT+5, TSKSTAT+1 |
| VS | VSTYP~, VSTYP+1, VSTYP+2 |
| X | U2+4*, U2+9*, U4+2*, STORE+13! |
| XQA | REJCT+3~ |
| XQA( | REJCT+4* |
| XQADATA | REJCT+3~, REJCT+4* |
| XQAMSG | REJCT+3~, REJCT+4* |
| XQAROU | REJCT+3~, REJCT+4* |
| Y | U2+5, U2+6, U4+3, STORE+13! |
| >> ZT1 | V1+1*, V1+2, V1+3, U5+2*, U5+3 |
| ZTCPU | REJCT+6~ |
| >> ZTCVOL | VOLUME+5*, VOLUME+7, VOLUME+8 |
| >> ZTCVT | VOLUME+5*, VOLUME+7 |
| ZTDTH | REJCT+6~, REJCT+7* |
| >> ZTDVOL | VOLUME+4*, VOLUME+6, VOLUME+7*, VOLUME+8*, VOLUME+9, V1+1, V3+1, U2+3, U2+4, U3+2 , U5+2, STORE+10 |
| >> ZTDVOL(1 | VOLUME+1*, VOLUME+7*, VOLUME+9 |
| ZTIO | ZIS+1*, ZIS+2, ZIS+3, ZIS+9, VOLUME+3, STORE+8, REJCT+6~, REJCT+7* |
| ZTIO(1 | ZIS+3*, ZIS+4 |
| >> ZTIOS | IOWAIT+2* |
| >> ZTIOT | IOWAIT+2* |
| >> ZTNODE | VOLUME+2*, VOLUME+9 |
| ZTREC | LOOKUP+4*, VOLUME+2, VOLUME+4, VOLUME+5, UCI+1, UCI+2, U2+8, U2+9, STORE+3, REJCT+5 , REJCT+6~ |
| >> ZTREC02 | LOOKUP+5*, VOLUME+9*, U2+7*, U3+2*, U5+4*, STORE+4 |
| >> ZTREC1 | LOOKUP+5*, STORE+1*, STORE+5, REJCT+1* |
| >> ZTREC2 | LOOKUP+5*, ZIS+1, ZIS+2*, ZIS+3*, ZIS+9*, STORE+6 |
| >> ZTREC21 | LOOKUP+6*, ZIS+2*, ZIS+11*, STORE+6, IOWAIT+2 |
| >> ZTREC25 | LOOKUP+6*, ZIS+2*, STORE+6 |
| >> ZTRTN | REJCT+7* |
| >> ZTS | V1+3*, V1+4, V2+1, V4+1 |
| >> ZTSAVE("XQA*" | REJCT+7* |
| ZTSK | LOOKUP+4, LOOKUP+5, LOOKUP+6, LOOKUP+7, STORE+2, STORE+3, STORE+4, STORE+5, STORE+6, REJCT+4 , REJCT+6~, TSKSTAT+1 |
| >> ZTST | ZIS+1 |
| ZTUCI | UCI+1*, UCI+2*, U1+2, U2+4, U2+6*, U2+7, U3+2, U4+2, U5+2, U5+3* , U5+4, REJCT+3~, REJCT+5* |
| >> ZTYPE | V2+1*, V2+2 |