DOA - Dynamic operation area

   Name : DCLDOA

   Function:
   This segment declares the dynamic operation area.  A DOA is either on the DOA free chain or
   it is chained to a WQA.  A DOA chained to a WQA represents an operation in progress at the
   workstation defined by that WQA.  The information in the DOA is used to build the ready list row
   for an operation in a workstation ready list display and by the workstation analyzer in order to
   find the next operation to be scheduled.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 248 doa Dynamic Operation Area
0 (0) CHARACTER 4 doadesc block descriptor = 'DOA'
4 (4) CHARACTER 2 doaver block mapping version
6 (6) BITSTRING 2 doaflags doa flags
 1...  ....
doaclate 1 cancel oper if late
 .1..  ....
doaurg 1 oper is urgent
 ..1.  ....
doastamr 1 status set manually
 ...1  ....
doatjt 1 time job operation
 ....  1...
doasfail 1 submitrelease failed
 ....  .1..
doaarset 1 oper was auto reset
 ....  ..1.
doaevent 1 a jt event was found
 ....  ...1
doastart 1 job has started exec
7 (7)
 1...  ....
doajsub 1 auto submit this job
 .1..  ....
doajhrc 1 job level high rc def
 ..1.  ....
doadurms 1 max dur exceeded
 ...1  ....
doaorer 1 oper is rerouteable
 ....  1...
doaores 1 oper is restartable
 ....  .1..
doawrer 1 oper was rerouted WLRA
 ....  ..1.
doarmsg 1 rer faild msg issued
 ....  ...1
doanhld 1 shouldn't be released
8 (8) CHARACTER 1 doastate operation status
9 (9) CHARACTER 1 doaclass job or sysout class
10 (A) CHARACTER 1 doaoist opi status (yn0)
11 (B) BITSTRING 1 doaflag2 flag byte TNSC
 1...  ....
doadwto deadline WTO wanted TNSA
 .1..  ....
doadwtos deadline WTO sent TNSA
 ..1.  ....
doadwtop deadline WTO processed
 ...1  ....
doaremov set oper to C or E DCRA
 ....  1...
doamhld on=manually held op HOPA
 ....  .1..
doanop on=nop op HOPA
 ....  ..1.
doaexec on=execute operation HOPA
 ....  ...1
doaclncm on=clean up comm issued
12 (C) CHARACTER 4 doacpptr index to operation record
12 (C) UNSIGNED 3 doaoccx occurrence index
15 (F) UNSIGNED 1 doaopno operation number
16 (10) CHARACTER 8 doajobn jobname (for cpu oper)
24 (18) ADDRESS 4 doanxt ptr to next doa
28 (1C) ADDRESS 4 doapre ptr to previous doa
32 (20) ADDRESS 4 doanxttj next time job in tjt
36 (24) ADDRESS 4 doapretj previous time job
40 (28) ADDRESS 4 doawqap addr of wqa for this doa
44 (2C) ADDRESS 4 doadrap addr of DRA for this doa
48 (30) ADDRESS 4 doaaws_p alternate WS address WLRA
52 (34) UNSIGNED 2 doasseq submit sequence number
54 (36)
 1...  ....
doaNoerrJT NOERR match JT reapply DEWA
 .1..  ....
doaNoerrSkip NOERR skip A3S evts 9TCDEWA
 ..1.  ....
doasusp on = suspended execution
54 (36) BITSTRING 1 * reserved 9TCDEWC
56 (38) SIGNED 4 doadlmin deadl. this op. in mins
60 (3C) CHARACTER 8 doaform form number
68 (44) UNSIGNED 1 doascrrt CentrScript send retry
69 (45) CHARACTER 1 doarejst remote eng job bind status
70 (46) SIGNED 2 doahirc highest non-error retcode
72 (48) CHARACTER 8 doatime last change (tod format)
80 (50) SIGNED 2 doanet network id for operation
82 (52) SIGNED 2 doapserv num parallel servers reqd
84 (54) SIGNED 2 doar1 amount of r1 required
86 (56) SIGNED 2 doar2 amount of r2 required
88 (58) SIGNED 2 doaTZoff TZONE returned by exit CRPC
90 (5A) SIGNED 2 doapri priority
92 (5C) CHARACTER 10 doast submit date time
102 (66) CHARACTER 10 doalo latest start for this op d88c
102 (66) CHARACTER 6 doalod date d88a
108 (6C) SIGNED 4 doalot time d88a
112 (70) CHARACTER 10 doaia input arrival for this occ
122 (7A) CHARACTER 10 doaps planned start f this op d88c
122 (7A) CHARACTER 6 doapsd date d88a
128 (80) SIGNED 4 doapst time d88a
132 (84) SIGNED 4 doarelft time 1st rlse 1.048 s
136 (88) UNSIGNED 1 doarel number of release done
137 (89) CHARACTER 4 doaaltws alternate WS WLRA
141 (8D) CHARACTER 1 doaClnfla Clean up flag D90C
 1...  ....
doaMoreRun 0 = First run D90C 1 = At least 1 run D90A set by AB3P event D90A
 .1..  ....
doaJLInfo 1 = JLInfo requested D90A 0 = JLInfo to be req. D90A set by JL info requestor D90A reset when resub () D90A
 ..1.  ....
doaOpInfo 0 = last OPerInfo not D90A available D90A 1 = last OPerInfo D90A available
 ...1  ....
doaPSUdone 0 = PSU not compl. D90A 1 = PSU completed D90A
 ....  1...
doaUserSYS 1 = need user sysout D90A
 ....  .1..
doaimmerr 1 = imm from error st D90A (set by A3P if error D90A status) D90A
 ....  ..1.
doaCLmsg 1 = message issued D90C
 ....  ...1
doaPSUwait 1 = wait for PSU done D90C set by dialog when apply logic needed but cleanup = none
142 (8E) CHARACTER 1 doaClnStat Clean Up status D90C see dclrccon D90A blank = none D90A S = started D90A C = completed D90A E = ended in error D90A
143 (8F) BITSTRING 1 doaflag3 flag byte HOPA
 1...  ....
doacmd_fail op command fail flag HOPA
 .1..  ....
doaresub resend jcl for oper
 ..1.  ....
doaosi osi operation
 ...1  ....
doasyssfail jes sub fail
 ....  1...
doaevher error in event handler
 ....  .1..
doasrkep keep on error
 ....  ..1.
doasenq second DLF enq done
 ....  ...1
doaexpJCL use expanded JCL D90C
144 (90) CHARACTER 1 doaJRstat joblog retrieval status ' ' = no action yet 'R' = requested Opinfo 'W' = waiting Opinfo 'O' = Opinfo available 'I' = initiated 'S' = started (j0-evt) 'C' = complete(j2-evt) 'E' = error (j2-evt)
145 (91) BITSTRING 1 doaflag4 D63A
 1...  ....
doaWLMr WLM Already Request D63A
 .1..  ....
doacscr on=has centralized script
 ..1.  ....
doasending on=S-sending exstat
 ...1  ....
doasuber on=E-OSUF exstat
 ....  1...
doaerfail on=E-FAIL exstat
 ....  .1..
doarecprmp on=E-prmpt exstat
 ....  ..1.
doarecjob on=E rec job running
 ....  ...1
doarecrun on=E(R,S,C) not restar
146 (92) CHARACTER 2 doawlm WLM fields D63A
146 (92) CHARACTER 1 doajcrt WLM critical indicat. D63A
147 (93) CHARACTER 1 doajpol WLM policy D63A
148 (94) CHARACTER 2 * reserved D63CLUC
150 (96) CHARACTER 10 doadl deadline for this opr TNSA
160 (A0) CHARACTER 8 doatoken_full operation full token
160 (A0) CHARACTER 4 doatoken_pre prefix
164 (A4) UNSIGNED 4 doatoken opctoken
168 (A8) SIGNED 4 doamaxd max duration in mins
172 (AC) UNSIGNED 4 doadur duration in 100th of sec
176 (B0) ADDRESS 4 doaPSUjcl pointer to JCL D90A



     2 doaPSUtoken char4   PSU request token $BLBD

Offsets
Dec Hex Type Len Name (Dim) Description
180 (B4) ADDRESS 4 doaOldJCL pointer to old JCL BLBA
184 (B8) CHARACTER 1 doaClnTyp Clean up Type= D90C A = automatic, D90A I = immediate, D90A M = manual, D90A N = none D90A
185 (B9) BITSTRING 1 doaflag5 Bit battery
 1...  ....
doaRecEnd op completed by recovery
 .1..  ....
doaexpjclUSED doaexpjcl contains BGDA really expanded jcl BGDA
 ..1.  ....
doafromPLC job from PLC path CCUA
 ...1  ....
doaWASUJ job from WASUJ path CCUA
 ....  1...
doawaiTSE job wait SE CCUA
 ....  .1..
doawaitWQA wait delay
 ....  ..1.
doaURGmsg on = URG msg sent
 ....  ...1
doaFTSAnop on = nopped on standard agent hosted by master
186 (BA) BITSTRING 1 doaflag6 reserved 32CSJC22c
 1...  ....
doaWLMprom on = WLM promotion done
 .1..  ....
doaWLMmsg on = WLM fail msg issued
 ..1.  ....
doaRdSent reserved 34a
 ...1  ....
doanoerr CPWA
 ....  1...
DoaCond On = COND exists
 ....  .1..
doaTZONE on = TZONE applied CRPA
 ....  ..1.
doaNoEval On = do not eval cond succ
 ....  ...1
doastepsucc mapped on CPLSTEPSUCC
187 (BB) BITSTRING 1 doaflag7
 1...  ....
doashadow on = job is a shadow job
 .1..  ....
doacfbind on = complete if bind fail
 ..1.  ....
doae113 e113 issued CZ1A
 ...1  ....
doaUnexpRC ON = Unexpected RC
 ....  1...
doadrecov on=recovery in progress
 ....  .1..
doashoseq on=shadow in oseq
 ....  ..1.
doaexit13rc on=rc 12 from exit13 DGWA
 ....  ...1
* 62CDGWC
188 (BC) ADDRESS 4 doaseinfop dseinfo ptr CCUA
192 (C0) SIGNED 4 doaCRITpath Critical path counter
196 (C4) CHARACTER 8 doaWLMclass WLM service class
204 (CC) CHARACTER 4 doaCrtPthX Critical Path Origin Key
204 (CC) UNSIGNED 3 doaPthOc Occ. Number
207 (CF) UNSIGNED 1 doaPthOp Operation Number
208 (D0) ADDRESS 4 doasainfop dsainfo ptr CHWA
212 (D4) CHARACTER 8 doaVdest last used submit dest COBA
220 (DC) SIGNED 4 doaMaxdSec max duration in sec CHWACVIA
224 (E0) CHARACTER 4 doaErrCode error code (ERRRES)
228 (E4) CHARACTER 8 doasubtoken zCentric submission token
236 (EC) ADDRESS 4 doaSviewP Sview ptr
240 (F0) CHARACTER 1 doaTaskType reserved
241 (F1) CHARACTER 3 * reserved
244 (F4) CHARACTER 4 * reserved
248 (F8) CHARACTER doaend end of doa
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 4 * layout of time in doa
0 (0) CHARACTER 2 doahour hour
2 (2) CHARACTER 2 doaminut minute
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 6 * layout of date in doa
0 (0) CHARACTER 2 doayear year
2 (2) CHARACTER 2 doamonth month
4 (4) CHARACTER 2 doaday day



  
   SE NAME variable part $CCUA
  

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 30 dseinfo CCUA
0 (0) CHARACTER 4 dseEYE DSEI CCUA
4 (4) CHARACTER 2 dseVer 01 CCUA
6 (6) CHARACTER 2 * free CCUA
8 (8) ADDRESS 4 dsenext CCUA
12 (C) CHARACTER 16 dseSEname Scheduling Environment CCUA Name CCUA
28 (1C) SIGNED 2 dseSysplexId Sysplex Id CCUA



   $CHWA
   SAI System Automation Info variable part $CHWA
   $CHWA

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 348 dsainfo CHWA
0 (0) CHARACTER 4 dsaEYE DSAI CHWA
4 (4) CHARACTER 2 dsaVer 01 CHWA
6 (6) CHARACTER 2 * free CHWA
8 (8) ADDRESS 4 dsanext CHWA
12 (C) CHARACTER 336 dsaAutoInfo System Automation Info CHWA
12 (C) CHARACTER 256 dsaCommText SA op command text CHWA
12 (C) CHARACTER 64 dsaCommText1 op com line 1 CHWA
76 (4C) CHARACTER 64 dsaCommText2 op com line 2 CHWA
140 (8C) CHARACTER 64 dsaCommText3 op com line 3 CHWA
204 (CC) CHARACTER 64 dsaCommText4 op com line 4 CHWA
268 (10C) CHARACTER 8 dsaAutoOper SA automated operator CHWA
276 (114) CHARACTER 8 dsaSecElem SA security element CHWA
284 (11C) CHARACTER 64 dsaCompInfo SA completion info CHWA