%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 |