HCL Workload Automation, Version 9.4

Data areas

Provides graphic representation of the data areas used by the agent for z/OS.

The next sections provide graphic representation of the data areas used by the agent for z/OS.

Data areas appear alphabetically, by name of the mapping macro. The data areas in this publication are not intended to be used as a customer user interface, but knowing their layout can be useful for debugging The areas are product sensitive and can be changed at any time during the current release without documentation updates to this publication.

The data area map

Each data area is described field by field. These field descriptions are taken directly from the system code.

For each field in the data area, the table provides the following information:
Offsets
The address of the field, shown in both decimal and hexadecimal (hexadecimal address in parentheses), relative to the beginning of the data area.
Type
The kind of program data defined for this field, such as CHARACTER, SIGNED, UNSIGNED.
Len
Size of the field in bytes (decimal).
Name
The name of the field, bit, or mask.
Bit or mask names are preceded by a description of the bit position and values, as follows:
 1...  ....  Refers to bit 0.
 ....  ..11  Refers to bits 6 and 7.
 ...1  ....  Refers to bit 3.
 11..  1111  Refers to bits 0, 1, 4, 5, 6, and 7.
Description
A description of the purpose or meaning of the field, bit, or mask.

The cross-reference table

For each data area with more than 40 fields, a cross-reference table shows the following:
  • Hex Offset: The hexadecimal offset of the field into the data area (for bits, the hexadecimal offset of the field containing the bit).
  • Hex Value: Hex values are shown only for bits. The Hex value shown implies the position of the bit in the field containing the bit.

DQE - Data queue element

   Name : DCLDQE
    Function:

   This segment maps queue elements for several HCL Workload Automation
   queues. The mapping of the DQEDATA field varies depending on the  
   value of DQETYPE. If data buffers are used (indicated by
   dqebptr ^= 0), they are always allocated in subpool 2 by queue adders,
   and are freed when no longer needed by queue servers.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 152 dqe data router q element
0 (0) CHARACTER 4 dqedesc block descriptor, DQE
4 (4) CHARACTER 2 dqever version number, 01
6 (6) BITSTRING 2 * reserved flags
8 (8) CHARACTER 3 dqetype data type
11 (B) BITSTRING 1 dqeflags flags
    1... ....   dqeflres reset seqds
    .1.. ....   * free
    ..1. ....   dqenckpt do not chkpt this submit
    ...1 ....   * free
    .... 1...   * free
    .... .1..   * free
    .... ..1.   * free
    .... ...1   * free on=used
12 (C) ADDRESS 4 * free
16 (10) ADDRESS 4 dqebptr external data buffer ptr
20 (14) SIGNED 4 dqeblen size of external buffer
24 (18) CHARACTER 8 dqedest destination id
32 (20) SIGNED 4 dqermax max # of recs per cyc in eds
Note: the EELHTDS record number and write cycle are stored in EELEVDS header
36 (24) SIGNED 4 dqeevtr used in SUTOP to pass htds rec
40 (28) SIGNED 4 dqeevtc used in SUTOP to pass htds cyc
44 (2C) CHARACTER 100 dqedata local data buffer
144 (90) SIGNED 4 dqeadder Additional recs w buffer
148 (94) BITSTRING 1 * free
149 (95) CHARACTER 1 * reserved
150 (96) UNSIGNED 2 dqeevts used in SUTOP to pass sseq
152 (98) CHARACTER   dqeend end of dqe
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqeevt event data buffer mapping
0 (0) SIGNED 2 dqennum tws node number
2 (2) SIGNED 2 dqerdrn event reader number in node
4 (4) CHARACTER 8 dqepos event ds position
4 (4) SIGNED 4 dqecyc write cycle number
8 (8) SIGNED 4 dqerec record number in cycle
12 (C) CHARACTER 8 * free
20 (14) CHARACTER 80 dqeexr exit record, see dclexr
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 6 dqeclj a DASD tracker needs
0 (0) CHARACTER 5 dqecljob clnjob prefix
5 (5) CHARACTER 1 dqedsclas datastore class if JCC
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 20 dqerfw rfw data
0 (0) CHARACTER 8 dqerfwdest destination name
8 (8) CHARACTER 8 dqeedp edp information
8 (8) SIGNED 4 dqeedpwcy write cycle number
12 (C) SIGNED 4 dqeedprec record # of last record
16 (10) SIGNED 4 dqerfwnnum node number
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 48 dqerel release job mapping
0 (0) CHARACTER 8 dqerjbnm job name
8 (8) CHARACTER 8 dqerjbid job number
16 (10) CHARACTER 8 dqercnje current nje node
24 (18) CHARACTER 8 dqeronje origin nje node
32 (20) UNSIGNED 2 dqeaseq submit sequence #
34 (22) CHARACTER 4 dqeawsid work station id
38 (26) UNSIGNED 2 * reserved
40 (28) SIGNED 4 dqerojid original job number
44 (2C) CHARACTER 4 dqeassnam controller subsystem name
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqesub submit data mapping
0 (0) CHARACTER 46 * reserved - do not use
46 (2E) CHARACTER 50 dqesubesp DQESUBESP MUST BE MAXIMUM 50 CHARS TO BE FIT IN ESP DATA
46 (2E) BITSTRING 1 dqesubFLA DQE submit flags
    1... ....   dqeERRO dqe in error
    .1.. ....   dqeUSED dqe used
    ..11 1111   * free
47 (2F) CHARACTER 5 * free
52 (34) CHARACTER 8 dqetso Tso user id or blank
60 (3C) CHARACTER 4 dqewsid work station id
64 (40) CHARACTER 4 dqessnam controller subsystem name
68 (44) CHARACTER 8 dqejobn job/STC name
76 (4C) CHARACTER 8 dqejid job# of last subbed job
84 (54) CHARACTER 1 dqeSubType J, C, D, or O
85 (55) CHARACTER 1 * free
86 (56) UNSIGNED 2 dqesseq submit sseq (J1)
88 (58) SIGNED 4 dqerecsub record in HTDS
92 (5C) SIGNED 4 dqecycsub cycle in HTDS
96 (60) CHARACTER 4 * reserved - do not use
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 28 dqersseq sseq# sync request (J0)
0 (0) CHARACTER 4 dqerwsid work station id
4 (4) CHARACTER 8 dqecreat request evt creation time
4 (4) SIGNED 4 dqedate date format (00yydddf)
8 (8) SIGNED 4 dqetime time format (secs*100)
12 (C) CHARACTER 4 dqerssnam controller subsystem name
16 (10) UNSIGNED 1 * free
17 (11) BITSTRING 1 dqerflg1 flagbyte byte 1
    1... ....   dqerask req for curr evds sseq#
    .1.. ....   dqercold cold start the ws
    ..1. ....   dqerdlte remove the ws from evds
    ...1 ....   dqerset req to set evds to wseq#
    .... 1...   dqeinit Initialization event
    .... .111   * reserved
18 (12) UNSIGNED 2 dqewseq Actual WS submit sseq (J0)
20 (14) CHARACTER 8 dqeJdest dqedest
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 18 dqecmini initialize CM for oper
0 (0) CHARACTER 8 dqecmjob job/STC name
8 (8) SIGNED 4 dqecmocc occurrence number
12 (C) SIGNED 4 dqecmopr operation number
16 (10) CHARACTER 2 dqecmrt TASK ID requestor : EM = Event Manager ; AR = Automatic Recovery ; GS = General Service
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqerfp RODM request for parms
0 (0) CHARACTER 8 dqerfpd requestor destination
8 (8) CHARACTER 92 * reserved
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqersl RODM subsystem lost
0 (0) CHARACTER 8 dqersldn requestor destination
8 (8) CHARACTER 4 dqerslssn subsystem name
12 (C) CHARACTER 88 * reserved
 

Dynamic Critical Path:
dqedata containing data sent to critical path handler
when an MCP action is performed on a critical predecessor
and the dataspace has to be updated consequently

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqecrt Crit Path recalc
0 (0) CHARACTER 4 dqews workstation name
4 (4) CHARACTER 1 dqestatus operation status
5 (5) CHARACTER 1 dqeexstat oper extended status
6 (6) BITSTRING 1 dqeflags2 flags
    1... ....   dqenoped noped operation
    .1.. ....   dqemanheld oper manually held
    ..1. ....   dqemheldch first dqe of a seq
    ...1 ....   dqenopch last dqe of a seq
    .... 1...   dqetmdch time dep chg
    .... .1..   dqetmdep time dep
    .... ..1.   dqeopiach oper ia changed
    .... ...1   * free
7 (7) BITSTRING 1 dqefla8gs3 free
    1... ....   dqeisfirst first dqe of a seq
    .1.. ....   dqeisfirst add job to dataspace
    ..1. ....   dqeislast last dqe of a seq
    ...1 1111   * free
8 (8) CHARACTER 8 dqejobname job name
16 (10) SIGNED 4 dqejobenix job table entry index
20 (14) CHARACTER 1 dqejobprty job priority
21 (15) CHARACTER 1 dqereqtype MCP request type S - status change A - Add operation/dep D - Delete (oper, dep) M - Modify P - Critical indicat
22 (16) CHARACTER 2 * free
24 (18) SIGNED 4 dqeindpred pred j table entry ix
28 (1C) CHARACTER 1 dqeoldstat operation old status
29 (1D) CHARACTER 1 dqecritind critical indicator
30 (1E) CHARACTER 10 dqeinparr input arrival time
30 (1E) CHARACTER 6 dqeinparrd date
36 (24) CHARACTER 4 dqeinparrt time
40 (28) CHARACTER 2 * free
42 (2A) CHARACTER 10 dqedeadl deadline
42 (2A) CHARACTER 6 dqedeadld date
48 (30) CHARACTER 4 dqedeadlt time
52 (34) CHARACTER 2 * free
54 (36) CHARACTER 10 dqeastart actual start time
54 (36) CHARACTER 6 dqeastartd date
60 (3C) SIGNED 4 dqeastartt time
64 (40) CHARACTER 2 * free
66 (42) CHARACTER 10 dqeaend actual end time
66 (42) CHARACTER 6 dqeaendd date
72 (48) SIGNED 4 dqeaendt time
76 (4C) SIGNED 4 dqeduration duration
80 (50) SIGNED 4 dqeactdur actual duration
84 (54) CHARACTER 4 dqeoprkey operation index
84 (54) UNSIGNED 3 dqeoccidx occ number
87 (57) UNSIGNED 1 dqeopridx oper number
88 (58) CHARACTER 4 dqeerrcode job error code
92 (5C) CHARACTER 4 dqeprekey pred oper index
92 (5C) UNSIGNED 3 dqepoccidx occ number
95 (5F) UNSIGNED 1 dqepopridx oper number
96 (60) CHARACTER 4 * free
 

External buffer for dqecrt
It contains WLM data: Policy and Service Class

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 40 dqecrtBUF DQE Type CRT
0 (0) CHARACTER 1 dqewlmpol WLM policy $CRFA
1 (1) CHARACTER 5 * free
6 (6) CHARACTER 8 dqewlmclass WLM Service Class
14 (E) CHARACTER 10 dqelstart latest start
14 (E) CHARACTER 6 dqelstartd latest start date
20 (14) SIGNED 4 dqelstartt ltst start time
24 (18) CHARACTER 16 dqeopIA operation IA
24 (18) CHARACTER 6 dqeopIAD date
30 (1E) CHARACTER 4 dqeopIAT time
34 (22) CHARACTER 6 *
 

Dynamic Critical Path:
dqedata containing data sent to critical path handler
when a status change (EM) occurs or when the job is late or
long running (WA)

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqecr1 Crit Path recalc
0 (0) CHARACTER 1 dqestatu1 operation status
1 (1) CHARACTER 1 dqeexstat1 oper extended status
2 (2) CHARACTER 2 * free
4 (4) SIGNED 4 dqejobeni1 job table entry index
8 (8) CHARACTER 1 dqereqtyp1 MCP request type S - status change L - Late R - Long Running
9 (9) CHARACTER 1 dqeoldsta1 operation old status
10 (A) BITSTRING 1 dqeflags4 flags
1... .... dqeurgch1 doa urgent queue chng
.1.. .... dqedoaur1 doa urgent queue flag
..1. .... dqewlmpro1 WLM promotion flag
...1 1111 * free
11 (B) CHARACTER 3 * free
14 (E) CHARACTER 10 dqeastar1 actual start time
14 (E) CHARACTER 6 dqeastar1d date
20 (14) SIGNED 4 dqeastar1t time
24 (18) CHARACTER 2 * free
26 (1A) CHARACTER 10 dqeaen1 actual end time
26 (1A) CHARACTER 6 dqeaen1d date
32 (20) SIGNED 4 dqeaen1t time
36 (24) SIGNED 4 dqeactdu1 actual duration
40 (28) CHARACTER 4 dqeoprke1 operation index
40 (28) UNSIGNED 3 dqeoccid1 occ number
43 (2B) UNSIGNED 1 dqeoprid1 oper number
44 (2C) CHARACTER 4 dqeerrcod1 job error code
48 (30) CHARACTER 52 * free
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqearc DQE Type TWS Data Sto D90C
0 (0) CHARACTER 4 dqearctyp Service Required: D90C LOG = get MVS™ JobLog D90C SLO = get Struct. Log D90A OPI = ask Oper_info D90A SDEL= start delete D90A of old entries D90A

common part

4 (4) CHARACTER 24 dqearcJRkey Job Log retrieval key D90C
4 (4) CHARACTER 8 dqearcJobId Job Log Id D90C
12 (C) CHARACTER 8 dqearcJobNa Job Log Name D90C
20 (14) SIGNED 4 dqearcRdrD Job Start Rdr Date D90C
24 (18) SIGNED 4 dqearcRdrT Job Start Rdr Time D90C
28 (1C) CHARACTER 8 dqearcdest output DEST D90C
36 (24) CHARACTER 16 dqearcADID Application Name D90C
52 (34) CHARACTER 10 dqearcIA IA Date and Time D90C
52 (34) CHARACTER 6 dqearcIADate IA Date D90C
58 (3A) CHARACTER 4 dqearcIATime IA Time D90C
62 (3E) CHARACTER 9 dqearcOPkey Operation VSAM key D90C
62 (3E) CHARACTER 8 dqearcOCC OCC token D90C
70 (46) UNSIGNED 1 dqearcOPR Opr num D54A
71 (47) CHARACTER 2 dqearccaller EM=Event manager D90A WA=WorkStat. Analyzer D90A AR=Automatic Recover D90A GS=General Server D90A

OPI type only

73 (49) CHARACTER 1 dqearcfla1 flags (Ask Oper_Info)
1... .... ARC_PSUpost 1 = post PSU D90A
.1.. .... ARC_CleanUp 1 = Stand Alone CLNUP
..1. .... ARC_SL 1 = StepList required
...1 .... ARC_DS 1 = DSList required
.... 1... ARC_ExpJCL 1 = use expanded JCL
.... .1.. ARC_BestStep 1 = start from BSTEP
.... ..1. ARC_noask 1 = cp14nostr ON
.... ...1 ARC_AskSimGDG 1 = GDG sim required
74 (4A) CHARACTER 8 * free
82 (52) CHARACTER 8 dqearcUSER original job userid

Clean Up only

90 (5A) CHARACTER 8 dqearcEXdest execution destination

AR restart only

98 (62) UNSIGNED 1 dqearcopiRet retry counter
99 (63) UNSIGNED 1 dqearcARste AR restart step 01A (currently not used)
 

AR restart only
structure mapped into DQEARC buffer:

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 16 dqearcBUF DQE Type TWS Data Sto
0 (0) CHARACTER 8 dqearcSTEPN Stepname (AR)
8 (8) CHARACTER 8 dqearcPSTEPN Proc Step Name (AR)
Note: For the dqearc SDEL type the information are all contained in the buffer pointed by dqebptr: dqebptr-> CP16 record layout
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqePSU DQE Type TWS Data Sto
0 (0) CHARACTER 4 dqePSUtyp Service Required: APL = Apply logic A CLN = Stand Alone CLN REM = resume suspended DEL = delete request

------------------------------------------------------------ D90A - common part D90A ------------------------------------ ------------------------D90A

4 (4) CHARACTER 45 dqePSUcommon D90A
4 (4) CHARACTER 2 dqePSUcaller FL=Fetch JobLog D90A GS=General Server D90A EM=Event manager D90A
6 (6) CHARACTER 8 dqePSUJobNa Job Name D90A
14 (E) CHARACTER 9 dqePSUOPkey Operation VSAM key D90A
14 (E) CHARACTER 8 dqePSUOCC Occ token D90A
22 (16) UNSIGNED 1 dqePSUOPR Opr num D90A
23 (17) CHARACTER 16 dqePSUADID Application Name D90A
39 (27) CHARACTER 10 dqePSUIA IA Date and Time D90A
39 (27) CHARACTER 6 dqePSUIADate IA Date D90A
45 (2D) CHARACTER 4 dqePSUIATime IA Time D90A

------------------------------------------------------------ D90A - GS only D90A ---------------------------------------- ----------D90A

49 (31) CHARACTER 8 dqePSUuser TSO userid D90A
57 (39) CHARACTER 4 dqePSUtoken GS request token D90A

------------------------------------ D90A - FL for AR only D90A ----------------- --------D90A

61 (3D) CHARACTER 8 dqeStepname AR restart step D90A
69 (45) CHARACTER 8 dqePStepName AR restart proc step D90A

----------------------------- D90A - CLN type only -D90A ------------------- ---------------------------D90A

77 (4D) CHARACTER 8 dqePSUexdest execution DEST D90A

------------------------------------------------------------ D90A - APL type only -D90A --------------------- ---------D90A

85 (55) CHARACTER 1 dqePSUfla1 D90A
1... .... PSU_ExpJCL 1 = use expanded JCL D90A
.1.. .... PSU_Suspend 1 = suspend DQE D90A
..1. .... PSU_Operinfo 1 = SL from buffer D90A
...1 .... PSU_UserSys 1 = add usersys DD
.... 1... PSU_SimGDG 1 = simulate GDG
.... .1.. PSU_Root 1 = GDG root list
.... ..1. PSU_BestStep 1 = start from BSTEP
.... ...1 PSU_AskSimGDG 1 = req simulation

2 char(2), free 2 dqePSULen,

86 (56) UNSIGNED 2 PSU_SLlen SL length
88 (58) UNSIGNED 3 PSU_DSlen DL length
91 (5B) UNSIGNED 3 PSU_GDGlen Sim. GDG info
94 (5E) UNSIGNED 2 PSU_Rootlen Root len
96 (60) SIGNED 4 PSU_JCLlen JCL length D90A
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 dqeWLM sub WLM reset request D63A
0 (0) CHARACTER 8 dqetsoW Tso user id or blank D63A
8 (8) CHARACTER 8 dqejobnW job/STC name D63A
16 (10) CHARACTER 8 dqeSVCnW WLM Hi perf service class
24 (18) CHARACTER 4 dqewsidW work station id D63A
28 (1C) CHARACTER 16 dqeadidW application ID D63A
44 (2C) CHARACTER 10 dqeociaW occurrence input arrival
44 (2C) CHARACTER 6 dqeociaD occurence IA date D63A
50 (32) CHARACTER 4 dqeociaT occurence IA time D63A
54 (36) SIGNED 2 dqeopnumW operation number D63A
56 (38) CHARACTER 4 dqessnamW controller subsystem name
60 (3C) UNSIGNED 2 * free

2 dqejidW char(8) , job of last subbed job 2 char(2) , reserved D63D

62 (3E) SIGNED 2 dqeasidW job asid D63A

2 dqetoken_fullW , operation token D63d 3 dqetoken_preW char(4) , operation token prefix 3 dqetokenW unsigned bin(32), operation token 2 dqeaccmpW ptr(31) , acc meth parms Q0A 2 dqenetidW char(8) , APPC netid (final dest) 2 dqenetLUW char(8) ; APPC netLU (final dest)

64 (40) SIGNED 4 dqeretcW WLM promot request RC
68 (44) SIGNED 2 dqersncW WLM promot request RSN
70 (46) CHARACTER 10 * reserved D63A
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 8 dqeTcpIp tcpip evt mapping
0 (0) ADDRESS 4 dqeSocketIdPtr
4 (4) CHARACTER 4 dqeSocketDomain
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 18 dqeConfFile Conf File mapping
0 (0) CHARACTER 1 dqeRequestType
1 (1) CHARACTER 3 *
4 (4) CHARACTER 4 dqeRequestCRC
8 (8) CHARACTER 8 dqeCRCOwnerDest
16 (10) SIGNED 2 dqeDtbDestIndex
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 44 dqeHTTPaction HTTP Joblog retrieval Kill Query job status
0 (0) CHARACTER 8 dqeHTocctoken HTTP occurence token
8 (8) CHARACTER 8 dqeHTsubtoken HTTP submission token
16 (10) CHARACTER 8 dqeHTjobname HTTP job name
24 (18) CHARACTER 4 dqeHTwsname HTTP ws name
28 (1C) CHARACTER 4 dqeHTssname HTTP subsystem name
32 (20) SIGNED 2 dqeHTopnum HTTP operation number
34 (22) SIGNED 2 * reserved
36 (24) CHARACTER 8 dqeHTuser HTTP joblog req user
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqeHTnotify HTTP notify
0 (0) CHARACTER 56 dqeHNalias alias
56 (38) CHARACTER 8 dqeHNjobid job number
64 (40) CHARACTER 4 dqeHNerrc error code (stat E)
68 (44) CHARACTER 6 dqeHNstartd start date
74 (4A) CHARACTER 6 dqeHNendd end date
80 (50) SIGNED 4 dqeHNstartt start time
84 (54) SIGNED 4 dqeHNendt end time
88 (58) CHARACTER 8 dqeHNxdtoken XD99 key
96 (60) CHARACTER 1 dqeHNstatus status (S/C/E)
97 (61) CHARACTER 3 * free
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqeHTinfo HTTP bind info/failed
0 (0) CHARACTER 56 dqeHIalias alias
56 (38) CHARACTER 8 dqeHIjobname matched jobname
64 (40) CHARACTER 10 dqeHIia matched ia
64 (40) CHARACTER 6 dqeHIiad ..IA date
70 (46) CHARACTER 4 dqeHIiat ..IA time
74 (4A) CHARACTER 1 dqeHItype I=info, F=failed
75 (4B) CHARACTER 1 * free
76 (4C) CHARACTER 8 dqeHIxdtoken XD99 key
84 (54) CHARACTER 4 dqeHIwsname matched ws name
88 (58) CHARACTER 12 * free
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 100 dqeHTsubscr HTTP subscribe
0 (0) CHARACTER 35 dqeHSrkeyz remote job key
0 (0) CHARACTER 16 dqeHSadid ..remote adid/jsname (D/Z)
16 (10) CHARACTER 16 dqeHSjsws ..remote jsws (D)
32 (20) CHARACTER 3 dqeHSopno ..remote opno (Z)
35 (23) CHARACTER 1 dqeHSflags flags
1... .... dqeHSzos ..ON: remote eng type is Z
.111 1111 * ..free
36 (24) CHARACTER 2 * free
38 (26) CHARACTER 10 dqeHSia IA for match
38 (26) CHARACTER 6 dqeHSiad ..IA date
44 (2C) CHARACTER 4 dqeHSiat ..IA time
48 (30) CHARACTER 52 dqeHSalias data for alias
48 (30) CHARACTER 8 dqeHSocctoken ..occurence token
56 (38) CHARACTER 8 dqeHSsubtoken ..submission token
64 (40) CHARACTER 8 dqeHSjobname ..job name
72 (48) CHARACTER 4 dqeHSwsname ..ws name
76 (4C) CHARACTER 4 dqeHSssname ..subsystem name
80 (50) SIGNED 2 dqeHSopnum ..operation number
82 (52) CHARACTER 18 * free
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 40 dqeHSbuff DQE Type HTS
0 (0) CHARACTER 40 dqeHSrjobnm remote jobname
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 24 dqeJKJes  
0 (0) CHARACTER 8 dqeJKJJobName  
8 (8) CHARACTER 8 dqeJKJJobId  
16 (10) SIGNED 4 dqeJKJRdrDate  
20 (14) SIGNED 4 dqeJKJRdrTime  
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 56 dqeJKBroker  
0 (0) CHARACTER 56 dqeJKBJobId  
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 8 dqeJAlias  
0 (0) SIGNED 4 dqeJALength  
4 (4) ADDRESS 4 dqeJAptr  

Cross reference

Name Hex Offset Hex Value Level
ARC_AskSimGDG 49 01 3
ARC_BestStep 49 04 3
ARC_CleanUp 49 40 3
ARC_DS 49 10 3
ARC_ExpJCL 49 08 3
ARC_noask 49 02 3
ARC_PSUpost 49 80 3
ARC_SL 49 20 3
dqe 0   1
dqeactdur 50   2
dqeactdu1 24   2
dqeadder 90   2
dqeaddjob 7 40 3
dqeadidW 1C   2
dqeaend 42   2
dqeaendd 42   3
dqeaendt 48   3
dqeaen1 1A   2
dqeaen1d 1A   3
dqeaen1t 20   3
dqearc 0   1
dqearcADID 24   2
dqearcARste 63   2
dqearcBUF 0   1
dqearccaller 47   2
dqearcdest 1C   2
dqearcEXdest 5A   2
dqearcfla1 49   2
dqearcIA 34   2
dqearcIADate 34   3
dqearcIATime 3A   3
dqearcJobId 4   3
dqearcJobNa C   3
dqearcJRkey 4   2
dqearcOCC 3E   3
dqearcopiRet 62   2
dqearcOPkey 3E   2
dqearcOPR 46   3
dqearcPSTEPN 8   2
dqearcRdrD 14   3
dqearcRdrT 18   3
dqearcSTEPN 0   2
dqearctyp 0   2
dqearcUSER 52   2
dqeaseq 20   2
dqeasidW 3E   2
dqeassnam 2C   2
dqeastart 36   2
dqeastartd 36   3
dqeastartt 3C   3
dqeastar1 E   2
dqeastar1d E   3
dqeastar1t 14   3
dqeawsid 22   2
dqeblen 14   2
dqebptr 10   2
dqeclj 0   1
dqecljob 0   2
dqecmini 0   1
dqecmjob 0   2
dqecmocc 8   2
dqecmopr C   2
dqecmrt 10   2
dqeConfFile 0   1
dqeCRCOwnerDest 8   2
dqecreat 4   2
dqecritind 1D   2
dqecrt 0   1
dqecrtBUF 0   1
dqecr1 0   1
dqecyc 4   3
dqecycsub 5C   3
dqedata 2C   2
dqedate 4   3
dqedeadl 2A   2
dqedeadld 2A   3
dqedeadlt 30   3
dqedesc 0   2
dqedest 18   2
dqedoaur1 A 40 3
dqedsclas 5   2
dqeDtbDestIndex 10   2
dqeduration 4C   2
dqeedp 8   2
dqeedprec C   3
dqeedpwcy 8   3
dqeend 98   2
dqeerrcode 58   2
dqeerrcod1 2C   2
dqeERRO 2E 80 4
dqeevt 0   1
dqeevtc 28   2
dqeevtr 24   2
dqeevts 96   2
dqeexr 14   2
dqeexstat 5   2
dqeexstat1 1   2
dqeflags B   2
dqeflags2 6   2
dqeflags3 7   2
dqeflags4 A   2
dqeflres B 80 3
dqeHIalias 0   2
dqeHIia 40   2
dqeHIiad 40   3
dqeHIiat 46   3
dqeHIjobname 38   2
dqeHItype 4A   2
dqeHIwsname 54   2
dqeHIxdtoken 4C   2
dqeHNalias 0   2
dqeHNendd 4A   2
dqeHNendt 54   2
dqeHNerrc 40   2
dqeHNjobid 38   2
dqeHNstartd 44   2
dqeHNstartt 50   2
dqeHNstatus 60   2
dqeHNxdtoken 58   2
dqeHSadid 0   3
dqeHSalias 30   2
dqeHSbuff 0   1
dqeHSflags 23   2
dqeHSia 26   2
dqeHSiad 26   3
dqeHSiat 2C   3
dqeHSjobname 40   3
dqeHSjsws 10   3
dqeHSocctoken 30   3
dqeHSopno 20   3
dqeHSopnum 50   3
dqeHSrjobnm 0   2
dqeHSrkeyz 0   2
dqeHSssname 4C   3
dqeHSsubtoken 38   3
dqeHSwsname 48   3
dqeHSzos 23 80 3
dqeHTinfo 0   1
dqeHTjobname 10   2
dqeHTnotify 0   1
dqeHTocctoken 0   2
dqeHTopnum 20   2
dqeHTssname 1C   2
dqeHTsubscr 0   1
dqeHTsubtoken 8   2
dqeHTTPaction 0   1
dqeHTuser 24   2
dqeHTwsname 18   2
dqeindpred 18   2
dqeinit 11 08 3
dqeinparr 1E   2
dqeinparrd 1E   3
dqeinparrt 24   3
dqeisfirst 7 80 3
dqeislast 7 20 3
dqeJALength 0   2
dqeJAlias 0   1
dqeJAptr 4   2
dqeJdest 14   2
dqejid 4C   3
dqeJKBJobId 0   2
dqeJKBroker 0   1
dqeJKJes 0   1
dqeJKJJobId 8   2
dqeJKJJobName 0   2
dqeJKJRdrDate 10   2
dqeJKJRdrTime 14   2
dqejobenix 10   2
dqejobeni1 4   2
dqejobn 44   3
dqejobname 8   2
dqejobnW 8   2
dqejobprty 14   2
dqelstart E   2
dqelstartd E   3
dqelstartt 14   3
dqemanheld 6 40 3
dqemheldch 6 20 3
dqenckpt B 20 3
dqennum 0   2
dqenopch 6 10 3
dqenoped 6 80 3
dqeoccidx 54   3
dqeoccid1 28   3
dqeociaD 2C   3
dqeociaT 32   3
dqeociaW 2C   2
dqeoldstat 1C   2
dqeoldsta1 9   2
dqeopIA 18   2
dqeopiach 6 02 3
dqeopIAD 18   3
dqeopIAT 1E   3
dqeopnumW 36   2
dqeopridx 57   3
dqeoprid1 2B   3
dqeoprkey 54   2
dqeoprke1 28   2
dqepoccidx 5C   3
dqepopridx 5F   3
dqepos 4   2
dqeprekey 5C   2
dqePStepName 45   2
dqePSU 0   1
dqePSUADID 17   3
dqePSUcaller 4   3
dqePSUcommon 4   2
dqePSUexdest 4D   2
dqePSUfla1 55   2
dqePSUIA 27   3
dqePSUIADate 27   4
dqePSUIATime 2D   4
dqePSUJobNa 6   3
dqePSUOCC E   4
dqePSUOPkey E   3
dqePSUOPR 16   4
dqePSUtoken 39   2
dqePSUtyp 0   2
dqePSUuser 31   2
dqerask 11 80 3
dqercnje 10   2
dqercold 11 40 3
dqerdlte 11 20 3
dqerdrn 2   2
dqerec 8   3
dqerecsub 58   3
dqerel 0   1
dqereqtype 15   2
dqereqtyp1 8   2
dqeRequestCRC 4   2
dqeRequestType 0   2
dqeretcW 40   2
dqerflg1 11   2
dqerfp 0   1
dqerfpd 0   2
dqerfw 0   1
dqerfwdest 0   2
dqerfwnnum 10   2
dqerjbid 8   2
dqerjbnm 0   2
dqermax 20   2
dqerojid 28   2
dqeronje 18   2
dqerset 11 10 3
dqersl 0   1
dqersldn 0   2
dqerslssn 8   2
dqersncW 44   2
dqersseq 0   1
dqerssnam C   2
dqerwsid 0   2
dqeSocketDomain 4   2
dqeSocketIdPtr 0   2
dqesseq 56   3
dqessnam 40   3
dqessnamW 38   2
dqestatus 4   2
dqestatu1 0   2
dqeStepname 3D   2
dqesub 0   1
dqesubesp 2E   2
dqesubFLA 2E   3
dqeSubType 54   3
dqeSVCnW 10   2
dqeTcpIp 0   1
dqetime 8   3
dqetmdch 6 08 3
dqetmdep 6 04 3
dqetso 34   3
dqetsoW 0   2
dqetype 8   2
dqeurgch1 A 80 3
dqeUSED 2E 40 4
dqever 4   2
dqeWLM 0   1
dqewlmclass 6   2
dqewlmpol 0   2
dqewlmpro1 A 20 3
dqews 0   2
dqewseq 12   2
dqewsid 3C   3
dqewsidW 18   2
PSU_AskSimGDG 55 01 3
PSU_BestStep 55 02 3
PSU_DSlen 58   2
PSU_ExpJCL 55 80 3
PSU_GDGlen 5B   2
PSU_JCLlen 60   2
PSU_Operinfo 55 20 3
PSU_Root 55 04 3
PSU_Rootlen 5E   2
PSU_SimGDG 55 08 3
PSU_SLlen 56   2
PSU_Suspend 55 40 3
PSU_UserSys 55 10 3

ESP - map of event record in the HTDS

   Name : DCLESP

   Function:
   Allows for continuation of events passed to the Data Router via the Event
   Writer queue and the event data set. This mapping should be used only
   when more than 80 bytes should be propagated using the above. The ESP
   is transformed into a DQE, using the ESP_dqetype as the DQE type, the  
   data in the type F ESP as the DQE internal buffer,and the remainder of  
   ESP data as the DQE external buffer. The subpool of the allocated
   external buffer should be indicated in the ESP_sp. The EW will freemain
   this area.
   Zeroes yields SP0.
   Use only key 0 storage.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 ESP ESP head or continuation
0 (0) CHARACTER 1 ESP_exrtyp event type = N
1 (1) CHARACTER 1 ESP_type type of ESP F = first / head ESP N = continued ESP
2 (2) CHARACTER 1 ESP_syst contained event type ! blank === above MUST match DCLEXR ==
3 (3) CHARACTER 3 ESP_dqetype actual contained event type
6 (6) SIGNED 2 ESP_seqF ESP F-type sequence number
8 (8) SIGNED 4 ESP_seqN ESP N-type sequence number
12 (C) SIGNED 4 ESP_seqT ESP seq totals
16 (10) ADDRESS 4 ESP_extptr address of data buffer ! NULL
20 (14) SIGNED 4 ESP_datasize Total size in buffer when ESP on WRTQ, and for F-type. Data size for N-types.
24 (18) UNSIGNED 1 ESP_sp subpool number for ext buffer
25 (19) CHARACTER 1 ESP_flags a flag byte
1... .... ESP_app APP extension buffer
.111 1111 * reserved
26 (1A) CHARACTER 50 ESP_data actual event data
76 (4C) CHARACTER 4 ESP_id event identification (offs 76)
80 (50) CHARACTER ESP_xdata0 eXtended data portion plachold

Cross reference

Name Hex Offset Hex Value Level
ESP 0   1
ESP_app 19 80 3
ESP_data 1A   2
ESP_datasize 14   2
ESP_dqetype 3   2
ESP_exrtyp 0   2
ESP_extptr 10   2
ESP_flags 19   2
ESP_id 4C   2
ESP_seqF 6   2
ESP_seqN 8   2
ESP_seqT C   2
ESP_sp 18   2
ESP_syst 2   2
ESP_type 1   2
ESP_xdata0 50   2

EVT - Map of record layout in event data sets

   Name : DCLEVT

   Function:
   This segment describes the record layout in the event data sets.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 820 evt event record
0 (0) CHARACTER 20 evtkey event record key
0 (0) SIGNED 4 evtrec for header = 0 rec number for non-header
4 (4) SIGNED 4 evtlrrec latest record number = 0 for non-header
8 (8) SIGNED 4 evtlrcyc latest cycle for header
8 (8) SIGNED 4 evtcyc write cycle for non-header
12 (C) SIGNED 4 evtmax max rcds excl hdr = 0 for non-header
16 (10) SIGNED 4 evttrcap track capacity in rcds = 0 for non-header
20 (14) CHARACTER 80 evtexr (10) exit record (see dclexr)
20 (14) CHARACTER 80 evtsur not used
20 (14) CHARACTER 80 evtrel not used
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * * evds header record data
0 (0) CHARACTER 16 evtckpte (*) checkpoint entry
0 (0) BITSTRING 1 * free
1 (1) UNSIGNED 1 * free
2 (2) CHARACTER 4 evtwsnm workstation name
6 (6) UNSIGNED 2 evtsseq current submit seq
8 (8) SIGNED 4 evtchkrec latest submit record num
12 (C) SIGNED 4 evtchkcyc latest submit cycle num

Cross reference

Name Hex Offset Hex Value Level
evt 0   1
evtchkcyc C   3
evtchkrec 8   3
evtckpte 0   2
evtcyc 8   4
evtexr 14   2
evtkey 0   2
evtlrcyc 8   3
evtlrrec 4   3
evtmax C   3
evtrec 0   3
evtrel 14   4
evtsseq 6   3
evtsur 14   3
evttrcap 10   3
evtwsnm 2   3

EXI - Ix event definition

   Name : DCLEXI

   Function:
   This segment declares an initialization event. This event contains
   information about an initiated operation. Initialization events are
   created by the SUBMIT task and added to the Event Writer
   queue. Note that the beginning of exi
   must be mapped as exr.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 exi initialization event
0 (0) CHARACTER 1 exievtyp event type = I
1 (1) CHARACTER 3 exitype type of initiated process J0 = submit seq event J1 = jcl submit J2 = jcl started task J3 = jcl for clean up D90A J4 = jcl submit SE failure $CCUA WTO= WTO message REL= job release OSI= OSI type submit WLM= WLM job promotion
4 (4) CHARACTER 4 exiwsid work station id
8 (8) CHARACTER 16 * exiadid
8 (8) CHARACTER 16 exiJ4schenv Se name (J4)
8 (8) CHARACTER 8 exircre Request create time (J0)
8 (8) SIGNED 4 exircred date (format: 00YYDDDF)
12 (C) SIGNED 4 exircret time (format: secs*100)
16 (10) CHARACTER 8 exiocctok  
16 (10) UNSIGNED 2 exiwseq submit seq from ws (IJ0)
24 (18) CHARACTER 10 *  
24 (18) SIGNED 4 exierec current evds rec (IJ0)
28 (1C) SIGNED 4 exiecyc current evds cyc (IJ0)
32 (20) SIGNED 2 *  
34 (22) SIGNED 2 exiopnum operation number
36 (24) SIGNED 4 exiWLMrc WLM promotion request RC
36 (24) BITSTRING 4 exiflags flag area P10A
36 (24) BITSTRING 1 exiflag1 flag byte 1 P10C
1... .... exifail init of process failed P10C
.1.. .... exisfail submit fail
..1. .... exinoedp no edp updates for this ev31CLVA
...1 .... exiWLMah on= job already Hi perfo D52A
.... 1... exiSEund on=SE not defined
.... .1.. exiSEnoAva on=SE not available
.... ..1. exiSEnoJPL on=SE not avail at JPLEX 31Clevel only
.... ...1 exiinit J0 related to initialization
37 (25) BITSTRING 1 exiflag2 flag byte 2 P10C
1... .... exi2fail init of process failed P10C
.1.. .... exi2plte possible late I event P10C
..1. .... exi2bad the STC funct not active P10C
...1 .... exi2njss not JES managed subsyst P10C
.... 1... exi2fjes STC fail JES input servic31CP10C
.... .1.. exi2ncf NCF destination not valid31CP10C
.... ..11 * reserved P10C
38 (26) BITSTRING 1 exiflag3 flag byte 3 P10C
1... .... exi3oos submit out-of-sequence
.1.. .... exi3nckp checkpoint not active
..1. .... exi31st 1st time switch
...1 .... exi3misr seq request mismatch
.... 1... exi3allok submit seq WA vs. SU okay
.... .1.. * reserved
.... ..1. exi3badj0 bad J0 event (or cp)
.... ...1 exi3rdop error read cp oper
39 (27) BITSTRING 1 exiflag4 flag byte 4 P10C
1... .... exi4rdjn error read cp jnt
.1.. .... exi4nsub sub04 is blank!
..1. .... exi4job jes04 is blank!
...1 .... * reserved
.... 1... exi4nsop cplsubop is of..!!?
.... .11. * reserved
.... ...1 exi4succ successful submit
40 (28) CHARACTER 8 exijobn job/STC name
40 (28) UNSIGNED 2 exiwork current catchup value(J0)
42 (2A) UNSIGNED 2 * free
44 (2C) UNSIGNED 2 exiedoa current doa value (J0)
46 (2E) UNSIGNED 2 exijasid job/STC asid D52C9TA
48 (30) CHARACTER 8 exijobid job/STC number (J1,J2,J3)
48 (30) CHARACTER 8 exiWLMCls WLM class (WLM only)
48 (30) CHARACTER 8 exiJ4dest tracker dest (J4)
48 (30) CHARACTER 1 exievlog reserved (WLM) 32C
49 (31) CHARACTER 7 * reserved (WLM)
56 (38) SIGNED 2 exigmtof gmt offset in minutes
58 (3A) SIGNED 2 exiWLMrsn WLM promotion request rsn code31A
58 (3A) CHARACTER 1 exiVirt Virtual WS support: Y/N
59 (3B) CHARACTER 1 *
60 (3C) CHARACTER 8 exicreat event record creation time word bndry
60 (3C) SIGNED 4 exidate date format (00yydddf)
64 (40) SIGNED 4 exitime time format (secs*100)
68 (44) CHARACTER 4 exissnm DQE originating TWS subsys name
72 (48) UNSIGNED 2 exieseq current evds seq (IJ0)
74 (4A) UNSIGNED 2 * free
76 (4C) CHARACTER 4 exiid event id EELx

Cross reference

Name Hex Offset Hex Value Level
exi 0   1
exicreat 3C   2
exidate 3C   3
exiecyc 1C   3
exiedoa 2C   3
exierec 18   3
exieseq 48   2
exievlog 30   5
exievtyp 0   2
exifail 24 80 5
exiflags 24   3
exiflag1 24   4
exiflag2 25   4
exiflag3 26   4
exiflag4 27   4
exigmtof 38   2
exiid 4C   2
exiinit 24 01 5
exijasid 2E   3
exijobid 30   2
exijobn 28   2
exiJ4dest 30   4
exiJ4schenv 8   3
exinoedp 24 20 5
exiocctok 10   4
exiopnum 22   2
exircre 8   4
exircred 8   5
exircret C   5
exiSEnoAva 24 04 5
exiSEnoJPL 24 02 5
exiSEund 24 08 5
exisfail 24 40 5
exissnm 44   2
exitime 40   3
exitype 1   2
exiVirt 3A   3
exiWLMah 24 10 5
exiWLMCls 30   3
exiWLMrc 24   2
exiWLMrsn 3A   2
exiwork 28   3
exiwseq 10   5
exiwsid 4   2
exi2bad 25 20 5
exi2fail 25 80 5
exi2fjes 25 08 5
exi2ncf 25 04 5
exi2njss 25 10 5
exi2plte 25 40 5
exi3allok 26 08 5
exi3badj0 26 02 5
exi3misr 26 10 5
exi3nckp 26 40 5
exi3oos 26 80 5
exi3rdop 26 01 5
exi31st 26 20 5
exi4job 27 20 5
exi4nsop 27 08 5
exi4nsub 27 40 5
exi4rdjn 27 80 5
exi4succ 27 01 5

EXK - Kx event definition

   Name : DCLEXK

   Function:
   This segment declares an initialization event. This event contains
   information about an initiated operation. Initialization events are  
   created by the SUBMIT task and added to the Event Writer
   queue. Note that the beginning of exk
   must be mapped as exr.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 exk initialization event
0 (0) CHARACTER 1 exkevtyp event type = K
1 (1) CHARACTER 2 exktype type of initiated process J1= jcl submit
3 (3) CHARACTER 1 * free
4 (4) SIGNED 4 exkJKJJobIdN JES Job Id (only number)
8 (8) CHARACTER 36 exkJKBJobId Broker Job Key
44 (2C) CHARACTER 8 exkJobname Jobname
52 (34) SIGNED 4 exkdate 00YYDDDF exkdate
56 (38) SIGNED 4 exktime time format (secs*100)exktime
60 (3C) CHARACTER 4 exkssname origi subsys
64 (40) BITSTRING 2 exkflags  
64 (40) BITSTRING 1 exkflags1  
1... .... exkfail init of process failed
.1.. .... exkSEnoAva on=SE not available
..1. .... exkSEnoJPL on=SE not avail at JPLEX
...1 .... exkSEund on=SE not defined
.... 1... exk2fail init of process failed
.... .1.. exk2plte possible late I event
.... ..1. exk2bad the STC funct not active
.... ...1 exk2njss not JES managed subsyst
65 (41) BITSTRING 1 exkflags2  
1... .... exk2fjes STC fail JES input servic
.1.. .... exk3nckp checkpoint not active
..1. .... exk3oos submit out-of-sequence
...1 1111 * free
66 (42) BITSTRING 1 exkreason free
    1... ....   exkJCLRopen open joblib failure
    .1.. ....   exkJCLRdyn dynalloc failure
    ..1. ....   exkJCLRjnMISS missing jobname
    ...1 ....   exkJCLRjnINVA invalid jobname
    .... 1...   exkJCLRstor storage problems
    .... .1..   exkOJCV variable sub error
    .... ..1.   exknoJCL JCL not found
    .... ...1   * free
67 (43) BITSTRING 1 * free
68 (44) SIGNED 4 * free
72 (48) SIGNED 2 exkgmtof gmt offset in minutes
74 (4A) UNSIGNED 2 exksseq current submit seq
76 (4C) CHARACTER 4 exkid event id EELx

Cross reference

Name Hex Offset Hex Value Level
exk 0   1
exkdate 34   2
exkevtyp 0   2
exkfail 40 80 4
exkflags 40   2
exkflags1 40   3
exkflags2 41   3
exkgmtof 48   2
exkid 4C   2
exkJCLRdyn 42 40 3
exkJCLRjnINVA 42 10 3
exkJCLRjnMISS 42 20 3
exkJCLRopen 42 80 3
exkJCLRstor 42 08 3
exkJKBJobId 8   2
exkJKJJobIdN 4   2
exkJobname 2C   2
exknoJCL 42 02 3
exkOJCV 42 04 3
exkreason 42   2
exkSEnoAva 40 40 4
exkSEnoJPL 40 20 4
exkSEund 40 10 4
exksseq 4A   2
exkssname 3C   2
exktime 38   2
exktype 1   2
exk2bad 40 02 4
exk2fail 40 08 4
exk2fjes 41 80 4
exk2njss 40 01 4
exk2plte 40 04 4
exk3nckp 41 40 4
exk3oos 41 20 4

EXR - Exit record

   Name : DCLEXR

   Function:
   This segment declares an exit record. Exit records are built by SMF and
   JES exits, passed to the event writer via CSA buffers, and are written
   to an event data set as part of an event record by the event writer.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 exr exit record
0 (0) CHARACTER 2 exrtype record type
0 (0) CHARACTER 1 exrsyst system type A!B
1 (1) CHARACTER 1 exrevtyp event type 1!2!3!4!5!6
2 (2) CHARACTER 1 exrstype event subtype (only type3)
3 (3) BITSTRING 1 exrflags exit flags
1... .... exrretry retry release command
.1.. .... exropcho this job is in hold
..1. .... exroheld job was held by tws
...1 .... exrjkill job killed by jes in rdr
.... 1... exrjccec error code from jcc
.... .1.. exrjccch checked by jcc
.... ..1. exrjccer error in jcc
.... ...1 exrrlast retcode(last) active
4 (4) BITSTRING 1 exrtermf termination flags
1... .... exrjcset exrjcout is valid
.1.. .... exrjcout job has jcc sysout
..1. .... * free D90C
...1 .... exrmchld 1= msgclass is held
.... 1... exrcmreq 1= requeue msg class
.... .1.. * free D90C
.... ..1. exrjbtab 0=normal, 1=abend (job)
.... ..1. exrabend 0=normal, 1=abend (step)
.... ...1 exrflush 0=normal, 1=flushed step
5 (5) BITSTRING 1 exrerror job error switch lcterror
1... .... exrfail job failed
.1.. .... exrJQA ON= is a JQA
..1. .... exrZ2level
...1 .... exrR4level
.... 1... * alloc but not unalloc done
.... .1.. exrcfal job failed on cond codes
.... ..1. exrjcjob JCJOB processed ok D54A
.... ...1 exrlastfl last step flushed $BGIA
6 (6) SIGNED 2 exrgmtof gmt offset in minutes
8 (8) CHARACTER 8 exrjobn job name
16 (10) CHARACTER 8 exrjobid job number
24 (18) CHARACTER 8 exrcreat event creation time
24 (18) SIGNED 4 exrdate date format (00yydddf)
28 (1C) SIGNED 4 exrtime time format (secs*100)
32 (20) CHARACTER 8 exrjsrdr jes reader date and time
32 (20) SIGNED 4 exrrdate date format (00yydddf)
36 (24) SIGNED 4 exrrtime time format (secs*100)
40 (28) SIGNED 4 exrsdate operation start date
44 (2C) SIGNED 4 exrstime operation start time
48 (30) SIGNED 4 exredate operation end date
52 (34) SIGNED 4 exretime operation end time
52 (34) SIGNED 4 exrorgid nje origin job number
56 (38) CHARACTER 8 exrstepn job step name
56 (38) CHARACTER 8 exronje name of orig nje nod
56 (38) CHARACTER 1 exrclass printout class
57 (39) CHARACTER 1 * reserved
58 (3A) SIGNED 2 exrasid job asid
60 (3C) SIGNED 4 exrexeid NJE execution jobn
64 (40) CHARACTER 8 exrpstep procedure step name
64 (40) CHARACTER 8 exrnnje this/next nje node
64 (40) CHARACTER 8 exrform form number
72 (48) SIGNED 2 exrcode completion/condition code
74 (4A) CHARACTER 1 exrindic status indicators
1... .... exrjesv4 jes sp4 or above1/3P/
.1.. .... exrspun spun off ds rcd
..1. .... exrterm oper terminated datagroup
...1 .... exrinter oper interrupted -:-
.... 1... exrrstrt oper restarted -:-
.... .1.. exrndest not final f/$sysmsgs 3P
.... ..1. exrnods4 no $sysmsgs found 3P
.... ...1 exrsuspd suspended
75 (4B) UNSIGNED 1 exrstpnr step number
75 (4B) BITSTRING 1 exrpurge job purge bits
111. .... * not used
...1 .... exrSDEP SDEP filter used
.... 1... exrlastab last step abended
.... .1.. exrstall stepevents(all)
.... ..1. exrstnz stepevents(no) flag
.... ...1 exropcan cancelled by oper
76 (4C) CHARACTER 4 exropcid tws identifier

Cross reference

Name Hex Offset Hex Value Level
exr 0   1
exrabend 4 02 4
exrasid 3A   4
exrcfal 5 04 3
exrclass 38   4
exrcmreq 4 08 3
exrcode 48   2
exrcreat 18   2
exrdate 18   3
exredate 30   2
exrerror 5   2
exretime 34   2
exrevtyp 1   3
exrexeid 3C   4
exrfail 5 80 3
exrflags 3   2
exrflush 4 01 3
exrform 40   4
exrgmtof 6   2
exrindic 4A   2
exrinter 4A 10 3
exrjbtab 4 02 3
exrjccch 3 04 3
exrjccec 3 08 3
exrjccer 3 02 3
exrjcjob 5 02 3
exrjcout 4 40 3
exrjcset 4 80 3
exrjesv4 4A 80 3
exrjkill 3 10 3
exrjobid 10   2
exrjobn 8   2
exrJQA 5 40 3
exrjsrdr 20   2
exrlastab 4B 08 4
exrlastfl 5 01 3
exrmchld 4 10 3
exrndest 4A 04 3
exrnnje 40   3
exrnods4 4A 02 3
exroheld 3 20 3
exronje 38   3
exropcan 4B 01 4
exropcho 3 40 3
exropcid 4C   2
exrorgid 34   3
exrpstep 40   2
exrpurge 4B   3
exrrdate 20   3
exrretry 3 80 3
exrrlast 3 01 3
exrrstrt 4A 08 3
exrrtime 24   3
exrR4level 5 10 3
exrsdate 28   2
exrSDEP 4B 10 4
exrspun 4A 40 3
exrstall 4B 04 4
exrstepn 38   2
exrstime 2C   2
exrstnz 4B 02 4
exrstpnr 4B   2
exrstype 2   2
exrsuspd 4A 01 3
exrsyst 0   3
exrterm 4A 20 3
exrtermf 4   2
exrtime 1C   3
exrtype 0   2
exrZ2level 5 20 3

HTI - HTTP Interface from C side to PLX side (EELHTCEC module)

   Name : DCLHTI

   Function:
   The array contains information for the PLX inteface
   implemented in the EELHTCEC module.

Offsets      
Dec Hex Type Len Name (Dim)
0 (0) STRUCTURE 168 htiSubmitJob
0 (0) CHARACTER 16 htiOccName
16 (10) CHARACTER 10 htiOccIA
26 (1A) CHARACTER 1 htiSubtype
27 (1B) CHARACTER 1 htiReprocess
28 (1C) SIGNED 4 htijclNrec
32 (20) ADDRESS 4 htijclPtr
36 (24) CHARACTER 36 htibrokerKey
36 (24) CHARACTER 36 htibrokerKeyId
72 (48) CHARACTER 8 htialias
72 (48) SIGNED 4 htialiasLength
76 (4C) ADDRESS 4 htialiasPtr
80 (50) CHARACTER 8 htioutput
80 (50) SIGNED 4 htioutputLength
84 (54) ADDRESS 4 htioutputPtr
88 (58) CHARACTER 52 htiREFinfo
88 (58) CHARACTER 44 htiREFdsname
132 (88) CHARACTER 8 htiREFmember
140 (8C) CHARACTER 8 htiPosition
140 (8C) SIGNED 4 htiwcycle
144 (90) SIGNED 4 htirecnum
148 (94) SIGNED 4 htiThreadnum
152 (98) ADDRESS 4 htiVARTABptr
156 (9C) CHARACTER 12 htiVARIA

------------------------------------------------------------------------------------
Checkpoint update (UPCP) ==> zHTTPDqe.h eventTypeUpdCP
------------------------------------------------------------------------------------

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 8 htiUpdChkPt
0 (0) SIGNED 4 htiUpdcyc write cycle number
4 (4) SIGNED 4 htiUpdrrec record number in cycle

------------------------------------------------------------------------------------
Joblog request (JLGT) ==> zHTTPDqe.h eventTypeGetJoblog
Each JL record has 133 chars
htiStageArea is 150 records long
------------------------------------------------------------------------------------

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 32 htiJlRequest
0 (0) CHARACTER 8 htiJLJobname name of the JES job
8 (8) CHARACTER 8 htiJLJESid ID of the JES job
16 (10) SIGNED 4 htiFirstRec num of the first requested rec (>=1)
20 (14) SIGNED 4 htiNumOfRecs num of the requested recs
24 (18) ADDRESS 4 htiStageArea stage JL area (150 records long)
28 (1C) CHARACTER 1 htiIsComplete 'Y': JL retrieved up to the end; 'N': otherwise
29 (1D) CHARACTER 3 htiJLfiller free

Cross reference

Name Hex Offset Hex Value Level
htialias 48   2
htialiasLength 48   3
htialiasPtr 4C   3
htibrokerKey 24   2
htibrokerKeyId 24   3
htiFirstRec 10   2
htiIsComplete 1C   2
htijclNrec 1C   2
htijclPtr 20   2
htiJLfiller 1D   2
htiJLJESid 8   2
htiJLJobname 0   2
htiJlRequest 0   1
htiNumOfRecs 14   2
htiOccIA 10   2
htiOccName 0   2
htioutput 50   2
htioutputLength 50   3
htioutputPtr 54   3
htiPosition 8C   2
htirecnum 90   3
htiREFdsname 58   3
htiREFinfo 58   2
htiREFmember 84   3
htiReprocess 1B   2
htiStageArea 18   2
htiSubmitJob 0   1
htiSubtype 1A   2
htiThreadnum 94   2
htiUpdChkPt 0   1
htiUpdcyc 0   2
htiUpdrrec 4   2
htiVARIA 9C   2
htiVARTABptr 98   2
htiwcycle 8C   3

HTSA - HTTP server task parameter area

   Name : DCLHTSA

   Function:
   This control block is built, initialized, and freed by the
   HTTP server task PLX mainline module.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 584 htsa
0 (0) CHARACTER 456 htsaComm  
0 (0) CHARACTER 4 htsadesc block descriptor = 'HTSA'
4 (4) CHARACTER 2 htsaver block mapping version
6 (6) BITSTRING 2 htsaflags  
    1... ....   htsassl  
8 (8) ADDRESS 4 htsamcap mca address
12 (C ADDRESS 4 htsastopecbptr pointer to stop ecb
16 (10) SIGNED 4 htsaPortNum Local port number of server
20 (14) ADDRESS 4 htsaSyncecbptr ptr to Cli to Serv Sync ecb
24 (18) SIGNED 4 htsaTCPtime time out for recv
28 (1C) CHARACTER 8 htsacodep code page
36 (24) CHARACTER 9 htsatcpjn tcpip job name
45 (2D) CHARACTER 1 * free
46 (2E) CHARACTER 1 htsasslamod ssl auth mode
47 (2F) CHARACTER 1 htsasslktyp ssl key ring type
48 (30) CHARACTER 53 htsahostn local hostname used
101 (65) CHARACTER 3 * free
104 (68) CHARACTER 65 htsaSSLastr SSL authorization string
169 (A9) CHARACTER 3 * free
172 (AC) CHARACTER 121 htsaSSLkrnm SSL key ring name
293 (125) CHARACTER 3 * free
296 (128) CHARACTER 121 htsaSSLkrpw SSL key password
417 (1A1) CHARACTER 27 * free
444 (1BC) ADDRESS 4 htsaIDMvsPtr ID pointer
448 (1C0) ADDRESS 4 htsadiafp DIAGNOSE flags address
452 (1C4) ADDRESS 4 htsadiadp DIAGNOSE data address
456 (1C8) SIGNED 4 htsaproto 0 HTTP 1 HTTPS
460 (1CC) ADDRESS 4 htsaioc pointer to ioc HTDS
464 (1D0) SIGNED 4 htsannum entry in EDP table
468 (1D4) SIGNED 4 htsatnum num of threads for server
472 (1D8) SIGNED 4 htsahtsnum number of hts entries
476 (1DC) ADDRESS 4 htsahtsptr hts address
480 (1E0) CHARACTER 8 htsasyslvl system level
488 (1E8) ADDRESS 4 htsaiocHTREF pointer to ioc HTREF
492 (1EC) ADDRESS 4 htsaJlibDCB pointer to JBLIB dcb
496 (1F0) ADDRESS 4 htsaJBuf JBLIB buffer
500 (1F4) CHARACTER 1 htsaVARSUB Y: varsub needed N: varsub not needed
501 (1F5) CHARACTER 3 * free
504 (1F8) SIGNED 4 htsarecconf HTREF recovery usage
508 (1FC) SIGNED 4 htsacycconf HTREF recovery usage
512 (200) UNSIGNED 2 htsasseqconf HTREF recovery usage
514 (202) CHARACTER 54 * free
568 (238) SIGNED 4 * free
572 (23C) SIGNED 4 * free
576 (240) CHARACTER 8 * free
584 (248) CHARACTER   htsaend end of htsa

Cross reference

Name Hex Offset Hex Value Level
htsa 0   1
htsacodep 1C   3
htsaComm 0   2
htsacycconf 1FC   2
htsadesc 0   3
htsadiadp 1C4   3
htsadiafp 1C0   3
htsaend 248   2
htsaflags 6   3
htsahostn 30   3
htsahtsnum 1D8   2
htsahtsptr 1DC   2
htsaIDMvsPtr 1BC   3
htsaioc 1CC   2
htsaiocHTREF 1E8   2
htsaJBuf 1F0   2
htsaJlibDCB 1EC   2
htsamcap 8   3
htsannum 1D0   2
htsaPortNum 10   3
htsaproto 1C8   2
htsarecconf 1F8   2
htsasseqconf 200   2
htsassl 6 80 4
htsasslamod 2E   3
htsaSSLastr 68   3
htsaSSLkrnm AC   3
htsaSSLkrpw 128   3
htsasslktyp 2F   3
htsastopecbptr C   3
htsaSyncecbptr 14   3
htsasyslvl 1E0   2
htsatcpjn 24   3
htsaTCPtime 18   3
htsatnum 1D4   2
htsaVARSUB 1F4   2
htsaver 4   3

JCFB - JS interface feedback information

   Name : DCLJCFB

  Function:
  This block is always passed back to caller when retrieving data
  through the JS interface through the GET routine.
  Offsets to data are only set when passing data through GS.
  NOTE: It is the caller's responsibility to freemain the storage
  pointed to by jcfdatp.
  The amount of storage is in jcfstg, and the subpool number is in jcfsubp.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 88 jcf feedback area for js interf
0 (0) CHARACTER 4 jcfdesc descriptor always 'JCF '
4 (4) CHARACTER 2 jcfvers block version
6 (6) CHARACTER 8 jcfdtype data type that datp points t see dclcjrq
14 (E) BITSTRING 1 jcfflags processing flags
1... .... jcfjcl jcl indicator
.111 1111 * reserved
15 (F) CHARACTER 1 * not used
16 (10) ADDRESS 4 jcfbufp pointer to jcl record in buf
20 (14) ADDRESS 4 jcfdatp pointer to data
24 (18) SIGNED 4 jcfdato offset to data (JS record,Variables..)
28 (1C) SIGNED 4 jcfstg amount of storage pointed to by jcfdatp
32 (20) SIGNED 4 jcfsubp subpool in which stg pointed to by jcfdatp is getmained
36 (24) SIGNED 4 jcflino offset to js data lines
36 (24) SIGNED 4 jcfsvaro offset to prompt vars
40 (28) ADDRESS 4 jcflinp addr to js data lines
40 (28) ADDRESS 4 jcfsvarp addr to prompt vars entry
44 (2C) SIGNED 4 jcflin number of js data lines
44 (2C) SIGNED 4 jcfvars number of prompt vars
48 (30) CHARACTER 8 jcfjfrom where jcl retrived ux002name,js, library
56 (38) CHARACTER 8 jcfjmem jcl member name if jcfjfrom = library name else blank
64 (40) CHARACTER 8 * reserved
72 (48) CHARACTER 1 jcfvstat var subst. status V or ' '
73 (49) CHARACTER 15 * reserved

Cross reference

Name Hex Offset Hex Value Level
jcf 0   1
jcflin 2C   2
jcfvars 2C   3
jcfbufp 10   2
jcfdato 18   2
jcfdatp 14   2
jcfdesc 0   2
jcfdtype 6   2
jcfflags E   2
jcfjcl E 80 3
jcfjfrom 30   2
jcfjmem 38   2
jcflino 24   2
jcflinp 28   2
jcfstg 1C   2
jcfsubp 20   2
jcfsvaro 24   3
jcfsvarp 28   3
jcfvers 4   2
jcfvstat 48   2

JCL - LAYOUT

   Name : DCLJCL

   Function:
   JCLTWS jcl layout
   REFTWS jcl layout

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * JCLTWS
0 (0) CHARACTER 136 JCLBDY FIXED PART OF JCL RECORD
0 (0) CHARACTER 28 JCLKEY  
0 (0) CHARACTER 16 JCLADID APPLICATION NAME
16 (10) CHARACTER 10 JCLIA OCC INPUT ARRIVAL DATE+TIME
16 (10) CHARACTER 6 JCLIAT1 DATE
22 (16) CHARACTER 4 JCLIAT2 TIME
26 (1A) SIGNED 2 JCLOPNUM OPERATION NUMBER
28 (1C) CHARACTER 4 JCLEYE EYE CATCHER
32 (20) UNSIGNED 1 JCLVERS VERSION NUMBER
33 (21) CHARACTER 1 * free
34 (22) CHARACTER 8 JCLJOBNM JOBNAME
42 (2A) CHARACTER 12 JCLVARIA VAR IA from HTI
54 (36) CHARACTER 2 * free

=============================================================
- 3 JCLWSN CHAR(4), WORK STATION NAME
- 3 JCLUPDAT, LAST UPDATE, DATE+TIME
- 4 JCLUPDT1 CHAR(6), DATE
- 4 JCLUPDT2 CHAR(4), TIME
=============================================================

56 (38) CHARACTER 8 JCLUSER LAST UPDATE, USERID
64 (40) CHARACTER 1 JCLUPTYP UPDATE TYPE: not used
65 (41) CHARACTER 1 JCLSTAT OP. STATUS: not used
66 (42) UNSIGNED 2 JCLLINES NO OF LINES IN RECORD
68 (44) CHARACTER 1 JCLFLAGS FLAGBYTE
    1... ....   JCLJSFND ON = JCL READ FROM JS
    .1.. ....   JCLEDITD ONCE BEEN EDITED
    ..1. ....   JCLJDIRNOP ON = NOP directive set
    ...1 1111   * NOT USED
69 (45) CHARACTER 1 * FREE
70 (46) SIGNED 2 JCLVLINE NUMBER OF VARIABLES
72 (48) SIGNED 4 JCLSUBP SUBPOOL FOR FREEMAIN
76 (4C) UNSIGNED 2 JCLALIASLEN Alias name length
78 (4E) CHARACTER 2 JCLRES4 FREE
80 (50) CHARACTER 56 JCLBROKERKEYID Broker key identifier
136 (88) CHARACTER * JCLVARDATA Variable data

============================================
JCL stream records
============================================

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 JCLTAB(*)  
0 (0) CHARACTER 80 JCLREC  
0 (0) CHARACTER 72 JCLTEXT COL 1-72 OF THE JCL RECORD
72 (48) CHARACTER 8 JCLLNNO COL 73-80 OF THE JCL RECORD

============================================
JCL Variables
============================================

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 JCLVTAB(*)  
0 (0) CHARACTER 80 JCLV  
0 (0) CHARACTER 8 CLVNAME VARIABLE NAME
8 (8) CHARACTER 16 JCLVTNAM VARIABLE TABLE NAME
24 (18) CHARACTER 1 JCLVTYPE P = PROMPT, Y= SETUP,N=SUB
25 (19) CHARACTER 1 JCLVSET E(XIT), D(EFAULT), P(REP), VAR
26 (1A) CHARACTER 8 JCLVUSER USER ID
26 (1A) CHARACTER 8 JCLVEXIT EXIT NAME
26 (1A) CHARACTER 8 JCLVSNAM SETTING VARIABLE NAME
34 (22) CHARACTER 44 JCLVVAL VARIABLE VALUE SET
78 (4E) SIGNED 2 JCLVLGT LENGTH OF VALUE
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * REFTWS  
0 (0) CHARACTER 188 REFBDY  

-------------------------------------------------
COMMON LAYOUT WITH TWSJCL:
-------------------------------------------------

0 (0) CHARACTER 28 REFKEY  
0 (0) CHARACTER 16 REFADID ADID
16 (10) CHARACTER 10 REFIA IA
16 (10) CHARACTER 6 REFIAT1  
22 (16) CHARACTER 4 REFIAT2  
26 (1A) SIGNED 2 REFOPNUM ALWAYS 1
28 (1C) CHARACTER 4 REFEYE 'REF '
32 (20) UNSIGNED 1 REFVERS '01'
33 (21) CHARACTER 1 *  
34 (22) CHARACTER 8 REFJOBNM  
42 (2A) CHARACTER 12 REFVARIA VAR IA from HTI
54 (36) CHARACTER 2 * free

- 3 REFWSN CHAR(4), é WORK STATION NAME
- 3 REFUPDAT, é LAST UPDATE, DATE+TIME
- 4 REFUPDT1 CHAR(6),  DATE
- 4 REFUPDT2 CHAR(4),  TIME

56 (38) CHARACTER 8 REFUSER LAST UPDATE, USERID
64 (40) CHARACTER 1 REFUPTYP UPDATE TYPE: NOT USED
65 (41) CHARACTER 1 REFSTAT OP. STATUS: NOT USED
66 (42) UNSIGNED 2 REFLINES NO OF LINES IN RECORD
68 (44) CHARACTER 1 REFFLAGS FLAGBYTE
69 (45) CHARACTER 1 * FREE
70 (46) SIGNED 2 REFVLINE NUMBER OF VARIABLES
72 (48) SIGNED 4 REFSUBP SUBPOOL FOR FREEMAIN
76 (4C) UNSIGNED 2 REFALIASLEN ALIAS NAME LENGTH
78 (4E) CHARACTER 2 REFRES4 FREE
80 (50) CHARACTER 56 REFBROKERKEYID BROKER KEY IDENTIFIER

-------------------------------------------------
ADDITIONAL DATA ONLY FOR BYREF:
-------------------------------------------------

136 (88) CHARACTER 44 REFDSNAME DATA SET NAME
180 (B4) CHARACTER 8 REFMEMBER MEMBER NAME
188 (BC) CHARACTER * REFVARDATA  

---------------------------------------------------------------------
JCL VARIABLES
---------------------------------------------------------------------

Offsets      
Dec Hex Type Len Name (Dim)
0 (0) STRUCTURE 80 REFVTAB(*)
0 (0) CHARACTER 80 REFV
0 (0) CHARACTER 8 REFVNAME
8 (8) CHARACTER 16 REFVTNAM
24 (18) CHARACTER 1 REFVTYPE
25 (19) CHARACTER 1 REFVSET
26 (1A) CHARACTER 8 REFVUSER
26 (1A) CHARACTER 8 REFVEXIT
26 (1A) CHARACTER 8 REFVSNAM
34 (22) CHARACTER 44 REFVVAL
78 (4E) SIGNED 2 REFVLGT

Cross reference

Name Hex Offset Hex Value Level
JCLADID 0   4
JCLALIASLEN 4C   3
JCLBDY 0   2
JCLBROKERKEYID 50   3
JCLEDITD 44 40 4
JCLEYE 1C   3
JCLFLAGS 44   3
JCLIA 10   4
JCLIAT1 10   5
JCLIAT2 16   5
JCLJDIRNOP 44 20 4
JCLJOBNM 22   3
JCLJSFND 44 80 4
JCLKEY 0   3
JCLLINES 42   3
JCLLNNO 48   3
JCLOPNUM 1A   4
JCLREC 0   2
JCLRES4 4E   3
JCLSTAT 41   3
JCLSUBP 48   3
JCLTAB 0   1
JCLTEXT 0   3
JCLTWS 0   1
JCLUPTYP 40   3
JCLUSER 38   3
JCLV 0   2
JCLVARDATA 88   2
JCLVARIA 2A   3
JCLVERS 20   3
JCLVEXIT 1A   4
JCLVLGT 4E   3
JCLVLINE 46   3
JCLVNAME 0   3
JCLVSET 19   3
JCLVSNAM 1A   5
JCLVTAB 0   1
JCLVTNAM 8   3
JCLVTYPE 18   3
JCLVUSER 1A   3
JCLVVAL 22   3
REFADID 0   4
REFALIASLEN 4C   3
REFBDY 0   2
REFBROKERKEYID 50   3
REFDSNAME 88   3
REFEYE 1C   3
REFFLAGS 44   3
REFIA 10   4
REFIAT1 10   5
REFIAT2 16   5
REFJOBNM 22   3
REFKEY 0   3
REFLINES 42   3
REFMEMBER B4   3
REFOPNUM 1A   4
REFRES4 4E   3
REFSTAT 41   3
REFSUBP 48   3
REFTWS 0   1
REFUPTYP 40   3
REFUSER 38   3
REFV 0   2
REFVARDATA BC   2
REFVARIA 2A   3
REFVERS 20   3
REFVEXIT 1A   4
REFVLGT 4E   3
REFVLINE 46   3
REFVNAME 0   3
REFVSET 19   3
REFVSNAM 1A   5
REFVTAB 0   1
REFVTNAM 8   3
REFVTYPE 18   3
REFVUSER 1A   3
REFVVAL 22   3

JCL1 - JCL used for VARSUB

   Name : DCLJCL1

   Function:
   JCLREC jcl layout

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * JCLREC
0 (0) CHARACTER 80 JCLBDY FIXED PART OF JCL RECORD
0 (0) CHARACTER 28 JCLKEY
0 (0) CHARACTER 16 JCLADID APPLICATION NAME
16 (10) CHARACTER 10 JCLIA OCC INPUT ARRIVAL DATE+TIME
16 (10) CHARACTER 6 JCLIAT1 DATE
22 (16) CHARACTER 4 JCLIAT2 TIME
26 (1A) SIGNED 2 JCLOPNUM OPERATION NUMBER
28 (1C) CHARACTER 4 JCLEYE EYE CATCHER
32 (20) UNSIGNED 1 JCLVERS VERSION NUMBER
33 (21) CHARACTER 1 * FREE
34 (22) CHARACTER 8 JCLJOBNM JOBNAME
42 (2A) CHARACTER 4 JCLWSN WORK STATION NAME
46 (2E) CHARACTER 10 JCLUPDAT LAST UPDATE, DATE+TIME
46 (2E) CHARACTER 6 JCLUPDT1 DATE
52 (34) CHARACTER 4 JCLUPDT2 TIME
56 (38) CHARACTER 8 JCLUSER LAST UPDATE, USERID
64 (40) CHARACTER 1 JCLUPTYP UPDATING FUNCTION: L: LTP W: WSD R: READY LIST M: MCP
65 (41) CHARACTER 1 JCLSTAT OP. STATUS: S:SUB;:ED; V:SAVED; T:TSAVED;
66 (42) UNSIGNED 2 JCLLINES NO OF LINES IN RECORD
68 (44) CHARACTER 1 JCLFLAGS FLAGBYTE
1... .... JCLJSFND ON = JCL READ FROM JS
.1.. .... JCLEDITD ONCE BEEN EDITED
..1. .... JCLJDIRNOP ON = NOP directive set
...1 1111 * NOT USED
69 (45) CHARACTER 1 * FREE JCLC
70 (46) SIGNED 2 JCLVLINE NUMBER OF VARIABLES JCLA
72 (48) SIGNED 4 JCLSUBP SUBPOOL FOR FREEMAIN
76 (4C) CHARACTER 4 JCLRES4 FREE
80 (50) CHARACTER 80 JCLTAB (*) JCL RECORDS
80 (50) CHARACTER 72 JCLTEXT COL 1-72 OF THE JCL RECORD
152 (98) CHARACTER 8 JCLLNNO COL 73-80 OF THE JCL RECORD
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 80 JCLVTAB (*)  
0 (0) CHARACTER 80 JCLV  
0 (0) CHARACTER 8 JCLVNAME VARIABLE NAME
8 (8) CHARACTER 16 JCLVTNAM VARIABLE TABLE NAME
24 (18) CHARACTER 1 JCLVTYPE P = PROMPT, Y= SETUP,N=SUB
25 (19) CHARACTER 1 JCLVSET E(XIT), D(EFAULT), P(REP), VAR
26 (1A) CHARACTER 8 JCLVUSER USER ID
26 (1A) CHARACTER 8 JCLVEXIT EXIT NAME
26 (1A) CHARACTER 8 JCLVSNAM SETTING VARIABLE NAME
34 (22) CHARACTER 44 JCLVVAL VARIABLE VALUE SET
78 (4E) SIGNED 2 JCLVLGT LENGTH OF VALUE

Cross reference

Name Hex Offset Hex Value Level
JCLADID 0   4
JCLBDY 0   2
JCLEDITD 44 40 4
JCLEYE 1C   3
JCLFLAGS 44   3
JCLIA 10   4
JCLIAT1 10   5
JCLIAT2 16   5
JCLJDIRNOP 44 20 4
JCLJOBNM 22   3
JCLJSFND 44 80 4
JCLKEY 0   3
JCLLINES 42   3
JCLLNNO 98   3
JCLOPNUM 1A   4
JCLREC 0   1
JCLRES4 4C   3
JCLSTAT 41   3
JCLSUBP 48   3
JCLTAB 50   2
JCLTEXT 50   3
JCLUPDAT 2E   3
JCLUPDT1 2E   4
JCLUPDT2 34   4
JCLUPTYP 40   3
JCLUSER 38   3
JCLV 0   2
JCLVERS 20   3
JCLVEXIT 1A   4
JCLVLGT 4E   3
JCLVLINE 46   3
JCLVNAME 0   3
JCLVSET 19   3
JCLVSNAM 1A   5
JCLVTAB 0   1
JCLVTNAM 8   3
JCLVTYPE 18   3
JCLVUSER 1A   3
JCLVVAL 22   3
JCLWSN 2A   3

JDA - Predefined OPC/ESA variables

   Name : DCLJDA

   Function:
   This block describes the mapping and addressing of variable values defined
   by the dcljdav block.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 12 jdat variable data
0 (0) ADDRESS 4 jdatdavp pointer to jdav table
4 (4) SIGNED 4 jdatnum number of variables
8 (8) SIGNED 4 jdatsize total size of varible entrie
12 (C) CHARACTER jdattab end of table header
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 21 jdae variable table entry
0 (0) CHARACTER 8 jdaevar variable name
8 (8) SIGNED 4 jdaevsz size of variable name
12 (C) SIGNED 4 jdaevao offset to value based jdatda
16 (10) SIGNED 4 jdaesiz size of variable value
20 (14) BITSTRING 1 jdaeflgs additional flags
1... .... jdaesetp setup avail on Yes
.1.. .... jdaejett Job using vars is ETT
..11 1111 * reserved

--------------------------------------------------------------------------
This block contains the values of all predefined jcl variables.
    These variables do not have to be defined in user-defined
    jcl variable tables.
    Note:
    If variables are added or removed from the jdav block then
    the jdavnum value must be updated accordingly.
-----------------------------------------------------------------------------  

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 479 jdav
0 (0) CHARACTER 4 jdavdesc descriptor always 'JDAV'
4 (4) CHARACTER 2 jdavvers block version
6 (6) CHARACTER 6 oymd1 occ ia yymmdd
12 (C) CHARACTER 8 oymd2 occ ia yy/mm/dd
20 (14) CHARACTER 10 oymd3 occ ia yyyy/mm/dd
30 (1E) CHARACTER 6 odmy1 occ ia ddmmyy
36 (24) CHARACTER 8 odmy2 occ ia dd/mm/yy
44 (2C) CHARACTER 6 oym occ ia yyyymm
50 (32) CHARACTER 8 oymd occ ia yyyymmdd
58 (3A) CHARACTER 5 oyyddd occ ia yyddd
63 (3F) CHARACTER 3 owwd occ week day within week
66 (42) CHARACTER 4 oyymm occ ia date yymm
70 (46) CHARACTER 4 ommyy occ ia date mmyy
74 (4A) CHARACTER 2 oyy occ ia year
76 (4C) CHARACTER 4 oyyyy occ ia year
80 (50) CHARACTER 2 omm occ ia month
82 (52) CHARACTER 2 odd occ ia day within month
84 (54) CHARACTER 2 ohh occ ia hour
86 (56) CHARACTER 4 ohhmm occ ia hour minute
90 (5A) CHARACTER 4 ossid Subsystem name
94 (5E) CHARACTER 54 oxjobnam Extended Job Name
148 (94) CHARACTER 3 oopno Oper number
151 (97) CHARACTER 1 oday Occ ia day in week 1=monday
152 (98) CHARACTER 16 oadid Occ application id
168 (A8) CHARACTER 4 olhhmm latest start hour minute
172 (AC) CHARACTER 2 olhh latest start hour
174 (AE) CHARACTER 2 olmm latest start month
176 (B0) CHARACTER 6 olymd latest start yymmdd
182 (B6) CHARACTER 4 olmd latest start mmdd
186 (BA) CHARACTER 2 oldd latest start dd (day in mon)
188 (BC) CHARACTER 1 olday latest start day of wk(1-7)
189 (BD) CHARACTER 2 olwk latest start week of year
191 (BF) CHARACTER 5 olyyddd latest start yyddd
196 (C4) CHARACTER 6 cyymmdd current date yymmdd
202 (CA) CHARACTER 6 cddmmyy current date ddmmyy
208 (D0) CHARACTER 6 cyyyymm current date year month
214 (D6) CHARACTER 5 cyyddd current date year day number
219 (DB) CHARACTER 4 cyymm current date year month
223 (DF) CHARACTER 4 cmmyy current date month year
227 (E3) CHARACTER 2 cyy current date year
229 (E5) CHARACTER 4 cyyyy current date year
233 (E9) CHARACTER 2 cmm current month
235 (EB) CHARACTER 2 cdd current day within month
237 (ED) CHARACTER 3 cwwd current week, day in week
240 (F0) CHARACTER 8 cymd current date, yyyymmdd
248 (F8) CHARACTER 1 cday current day in week,1=monday
249 (F9) CHARACTER 2 chh current hour of day
251 (FB) CHARACTER 4 chhmm current hour and minute
255 (FF) CHARACTER 3 cddd current day within year
258 (102) CHARACTER 2 cww current week in year
260 (104) CHARACTER 8 chhmmssx current time HHMMSSxx
268 (10C) CHARACTER 1 cfreeday cur time freeday Y!N AGLA
269 (10D) CHARACTER 3 oddd occ ia day within year
272 (110) CHARACTER 2 oww occ ia week in year
274 (112) CHARACTER 16 oadowner ad owner
290 (122) CHARACTER 1 ofreeday occ ia is freeday Y!N
291 (123) CHARACTER 8 ojobname jobname
299 (12B) CHARACTER 8 oaugroup authority group
307 (133) CHARACTER 16 ocalid calendar name
323 (143) CHARACTER 1 owwmonth week number in ia month
324 (144) CHARACTER 1 owwlast last week in month = Y else N
325 (145) CHARACTER 6 chhmmss current time HHMMSS $CBPA
331 (14B) CHARACTER 44 oettcrit ETT criteria
375 (177) CHARACTER 1 oetttyp ETT type J or R
376 (178) CHARACTER 8 oettjob ETT job name
384 (180) CHARACTER 8 oettjid ETT job id
392 (188) CHARACTER 35 oettgroot ETT gdg root
427 (1AB) CHARACTER 44 oettevnam ETT full event name
471 (1D7) CHARACTER 8 oettggen ETT gdg generation
479 (1DF) CHARACTER jdavend end label of block

Cross reference

Name Hex Offset Hex Value Level
cday F8   2
cdd EB   2
cddd FF   2
cddmmyy CA   2
cfreeday 10C   2
chh F9   2
chhmm FB   2
chhmmss 145   2
chhmmssx 104   2
cmm E9   2
cmmyy DF   2
cww 102   2
cwwd ED   2
cymd F0   2
cyy E3   2
cyyddd D6   2
cyymm DB   2
cyymmdd C4   2
cyyyy E5   2
cyyyymm D0   2
jdae 0   1
jdaeflgs 14   2
jdaejett 14 40 3
jdaesetp 14 80 3
jdaesiz 10   2
jdaevao C   2
jdaevar 0   2
jdaevsz 8   2
jdat 0   1
jdatdavp 0   2
jdatnum 4   2
jdatsize 8   2
jdattab C   2
jdav 0   1
jdavdesc 0   2
jdavend 1DF   2
jdavvers 4   2
oadid 98   2
oadowner 112   2
oaugroup 12B   2
ocalid 133   2
oday 97   2
odd 52   2
oddd 10D   2
odmy1 1E   2
odmy2 24   2
oettcrit 14B   2
oettevnam 1AB   2
oettggen 1D7   2
oettgroot 188   2
oettjid 180   2
oettjob 178   2
oetttyp 177   2
ofreeday 122   2
ohh 54   2
ohhmm 56   2
ojobname 123   2
olday BC   2
oldd BA   2
olhh AC   2
olhhmm A8   2
olmd B6   2
olmm AE   2
olwk BD   2
olymd B0   2
olyyddd BF   2
omm 50   2
ommyy 46   2
oopno 94   2
ossid 5A   2
oww 110   2
owwd 3F   2
owwlast 144   2
owwmonth 143   2
oxjobnam 5E   2
oym 2C   2
oymd 32   2
oymd1 6   2
oymd2 C   2
oymd3 14   2
oyy 4A   2
oyyddd 3A   2
oyymm 42   2
oyyyy 4C   2

JDT - SETVAR defined temporary variables

   Name : DCLJDT

   Function:
   This block describes the temp variables defined by the SETVAR directive.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * jdt
0 (0) CHARACTER 20 JdtHead fixed part of JDT
0 (0) CHARACTER 4 Jdteye descriptor always 'JDT '
4 (4) CHARACTER 2 Jdtvers block version
6 (6) CHARACTER 1 JdtWarnMsg Y= issue "not ref" messages N= do not issue message
7 (7) CHARACTER 1 * not used
8 (8) SIGNED 4 Jdtvars of variables in table
12 (C) SIGNED 4 Jdtmax max of variables allowed
16 (10) ADDRESS 4 Jdtnxtp address of next JDT ! 0
20 (14) CHARACTER * JdtVarTab Variable part of JDU
20 (14) CHARACTER 64 JdtVariables (*) Address of variables
20 (14) CHARACTER 4 JdtFlags flags
20 (14) CHARACTER 1 JdtUsed Y = variavle was referenced
21 (15) CHARACTER 1 JdtPhase U = SETUP, S = SUBMIT
22 (16) CHARACTER 2 * Y = variavle was referenced
24 (18) SIGNED 4 JdtVarL length of total string that is to be substistuted
28 (1C) CHARACTER 48 JdtValue edit value to be used at substitution of this var.
76 (4C) CHARACTER 8 JdtVname name of variable
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 64 JdtSvar mask for JDT substitution
0 (0) CHARACTER 4 * NOTE: This mask must much one single entry in JdtVariables
0 (0) CHARACTER 1 JdtSused var used in phase
1 (1) CHARACTER 1 JdtSPhase current phase
2 (2) CHARACTER 2 *
4 (4) SIGNED 4 JdtSvarL value length
8 (8) CHARACTER 48 JdtSValue substitution value
56 (38) CHARACTER 8 JdtSVname name of variable

Cross reference

Name Hex Offset Hex Value Level
jdt 0   1
Jdtmax C   3
Jdtvars 8   3
Jdteye 0   3
JdtFlags 14   4
JdtHead 0   2
Jdtnxtp 10   3
JdtPhase 15   5
JdtSPhase 1   3
JdtSused 0   3
JdtSValue 8   2
JdtSvar 0   1
JdtSvarL 4   2
JdtSVname 38   2
JdtUsed 14   5
JdtValue 1C   4
JdtVariables 14   3
JdtVarL 18   4
JdtVarTab 14   2
Jdtvers 4   3
JdtVname 4C   4
JdtWarnMsg 6   3

JDU - Redefined OPC/ESA date and time variables

   Name : DCLJDU

   Function:
   This block describes the contents and the format of OPC predefined
   variables as redefined by the SETFORM OPC statement in the JCL.
   NOTE: The JDU and JDUV controlblocks are in contigious storage
   JudCurr, JduOcc, JduOccl variables are initialized when the Jdu cbs
   are created. The values are picked up from predefined Occ and
   Current date /time variables

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 1192 jdu
0 (0) CHARACTER 168 JduHead fixed part of JDU
0 (0) CHARACTER 4 Jdueye descriptor always 'JDU '
4 (4) CHARACTER 2 Jduvers block version
6 (6) CHARACTER 2 * not used
8 (8) SIGNED 4 JduTotsize total size for JDU* blocks
12 (C) CHARACTER 8 JduCurrYmd current date YYYYMMDD
20 (14) CHARACTER 5 JduCurrJulian current julian date YYDDD
25 (19) CHARACTER 6 JduCurrTime current time HHMMSS
31 (1F) CHARACTER 5 JduOlJulian oper latest start julian
36 (24) CHARACTER 8 JduOlYmd oper latest start YYMMDD
44 (2C) CHARACTER 4 JduOlTime oper latest start HHMM
48 (30) CHARACTER 8 JduOiDate oper ia date YYYYMMDD
56 (38) CHARACTER 5 JduOiJulian oper ia julian date YYDDD
61 (3D) CHARACTER 4 JduOiTime oper ia time HHMM
65 (41) CHARACTER 8 JduOccYmd occ ia date YYYYMMDD
73 (49) CHARACTER 5 JduOccJulian occ ia julian date YYDDD
78 (4E) CHARACTER 4 JduOccTime occ ia time HHMM
82 (52) CHARACTER 8 JduOccLw occ last work day in month
90 (5A) CHARACTER 5 JduOccLwJulian occ last work day JULIAN
95 (5F) CHARACTER 8 JduOccLc occ last cal day in month
103 (67) CHARACTER 5 JduOccLcJulian occ last cal day JULIAN
108 (6C) CHARACTER 8 JduOccFc occ first cal day in month
116 (74) CHARACTER 5 JduOccFcJulian occ first cal day JULIAN
121 (79) CHARACTER 8 JduOccFw occ first work day in month
129 (81) CHARACTER 5 JduOccFwJulian occ first work day JULIAN
134 (86) CHARACTER 8 JduOccFwYear occ first work day in year
142 (8E) CHARACTER 5 JduOccFwJulianYr occ first work day JULIAN
147 (93) CHARACTER 8 JduOccLwYear occ last work day in year
155 (9B) CHARACTER 5 JduOccLwJulianYr occ last work day JULIAN
160 (A0) CHARACTER 8 * spare
168 (A8) CHARACTER 1024 JduVarTab Variable part of JDU
168 (A8) CHARACTER 64 JduVariables (16) Address of variables
168 (A8) SIGNED 4 JduOffset offset to variable from
172 (AC) SIGNED 4 JduVarL length of total string that is to be substistuted
176 (B0) CHARACTER 47 JduValue edit value to be used at substitution of this var.
223 (DF) CHARACTER 1 JduVflags processing flags
1... .... JduvSetup 1= variable aval. at setup
.111 1111 * not used
224 (E0) CHARACTER 8 JduVname name of variable
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 942 jduv description of a varible
0 (0) CHARACTER 46 JduvHead fixed part of description
0 (0) SIGNED 2 Jduv number of values in table
2 (2) CHARACTER 2 JduvFormat 'DA' = Date related 'TI' = Time format
4 (4) CHARACTER 40 JduvSdelim string before date/time
44 (2C) SIGNED 2 JduvSdelimL length of delim before strg
46 (2E) CHARACTER 56 JduvDesc (16) Description
46 (2E) CHARACTER 4 JduvType Keyword type (MM,DD,CC,YY, CCYY,HH,SS)
50 (32) SIGNED 2 JduvStart Start position in string
52 (34) SIGNED 2 JduvEnd End position in string
54 (36) CHARACTER 4 JduvVal Value for this type 1993,10bb and so on
58 (3A) SIGNED 2 JduvValL Length of value
60 (3C) CHARACTER 40 JduvDelim Delimiter after this one
100 (64) SIGNED 2 JduvDelimL length of delimiter
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 64 JduSvariable Used to conform with other methods for addressing vars to be subst. in JHSLN/JHTRN NOTE: This mapping must map a single entry in JduVartab
0 (0) SIGNED 4 JduSOffset offset to variable from
4 (4) SIGNED 4 JduSVarL length of total string that is to be substistuted
8 (8) CHARACTER 47 JduSValue edit value to be used at substitution of this var.
55 (37) CHARACTER 1 JduSFlags processing flags
1... .... JdusSetup 1= variable avail. art setup
.111 1111 * not used
56 (38) CHARACTER 8 JduSVname name of variable

Cross reference

Name Hex Offset Hex Value Level
jdu 0   1
JduCurrJulian 14   3
JduCurrTime 19   3
JduCurrYmd C   3
Jdueye 0   3
JduHead 0   2
JduOccFc 6C   3
JduOccFcJulian 74   3
JduOccFw 79   3
JduOccFwJulian 81   3
JduOccFwJulianYr 8E   3
JduOccFwYear 86   3
JduOccJulian 49   3
JduOccLc 5F   3
JduOccLcJulian 67   3
JduOccLw 52   3
JduOccLwJulian 5A   3
JduOccLwJulianYr 9B   3
JduOccLwYear 93   3
JduOccTime 4E   3
JduOccYmd 41   3
JduOffset A8   4
JduOiDate 30   3
JduOiJulian 38   3
JduOiTime 3D   3
JduOlJulian 1F   3
JduOlTime 2C   3
JduOlYmd 24   3
JduSFlags 37   2
JduSOffset 0   2
JdusSetup 37 80 3
JduSValue 8   2
JduSvariable 0   1
JduSVarL 4   2
JduSVname 38   2
JduTotsize 8   3
jduv 0   1
Jduv 0   3
JduValue B0   4
JduVariables A8   3
JduVarL AC   4
JduVarTab A8   2
JduvDelim 3C   3
JduvDelimL 64   3
JduvDesc 2E   2
JduvEnd 34   3
Jduvers 4   3
JduVflags DF   4
JduvFormat 2   3
JduvHead 0   2
JduVname E0   4
JduvSdelim 4   3
JduvSdelimL 2C   3
JduvSetup DF 80 5
JduvStart 32   3
JduvType 2E   3
JduvVal 36   3
JduvValL 3A   3

JHS - Shared parameters for JHSET and JHUTL

   Name : DCLJHS

   Function:
   This block contains parameters used by both JHSET and JHUTL.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 212 JHSETcom  
0 (0) CHARACTER 60 wformat format string in local
60 (3C) CHARACTER 16 Wcalendar occurrence calendar name

2 HCPAREA char(length(HCPrm)),  parameter area

76 (4C) CHARACTER 6 occia_base ia date (from OYMD1)
82 (52) CHARACTER 6 olate_base latest start (from OLYMD)
88 (58) CHARACTER 6 cdate_base current d. base (from CYYMMDD)
94 (5E) CHARACTER 6 occia_baset ia time (from OHHMM)
100 (64) CHARACTER 6 olate_baset latest start time(from OLHHMM)
106 (6A) CHARACTER 8 ctime_baset current time (from HHMMSSXX)
114 (72) CHARACTER 8 varname variable name
122 (7A) CHARACTER 3 number number to add/subtract (date)
125 (7D) CHARACTER 3 * free
128 (80) SIGNED 4 seconds sec*100 to add/subtract (time)
132 (84) CHARACTER 2 Ctype type to add/subtract
134 (86) CHARACTER 6 fase = parm phase
140 (8C) SIGNED 4 signpos position of sign
144 (90) SIGNED 4 var 1st pos for category
148 (94) SIGNED 4 var_end last pos for category
152 (98) SIGNED 4 digit 1st pos of digits
156 (9C) SIGNED 4 digit_end last pos of digits
160 (A0) SIGNED 4 type_start 1st pos for type (wd,cd....)
164 (A4) SIGNED 4 var_cat variable category
168 (A8) SIGNED 4 i
172 (AC) SIGNED 4 j
176 (B0) SIGNED 4 k
180 (B4) SIGNED 4 x
184 (B8) SIGNED 4 j1 loop indexes
188 (BC) SIGNED 4 rc local return code
192 (C0) SIGNED 4 currvar work index
196 (C4) SIGNED 4 currJdt current JDt entry
200 (C8) ADDRESS 4 wtubptr = tubptr
204 (CC) ADDRESS 4 wjduvptr = jduvptr $CQOC
208 (D0) ADDRESS 4 wjdtptr = jdtptr $CQOA

Cross reference

Name Hex Offset Hex Value Level
cdate_base 58   2
ctime_baset 6A   2
Ctype 84   2
currJdt C4   2
currvar C0   2
digit 98   2
digit_end 9C   2
fase 86   2
i A8   2
j AC   2
JHSETcom 0   1
j1 B8   2
k B0   2
number 7A   2
occia_base 4C   2
occia_baset 5E   2
olate_base 52   2
olate_baset 64   2
rc BC   2
seconds 80   2
signpos 8C   2
type_start A0   2
var 90   2
var_cat A4   2
var_end 94   2
varname 72   2
Wcalendar 3C   2
wformat 0   2
wjdtptr D0   2
wjduvptr CC   2
wtubptr C8   2
x B4   2

JV - JCL Variable table layout

   Name : DCLJV

   Function:
   JV layout.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * jv jcl variable table
0 (0) CHARACTER 98 jvcommon identifier
0 (0) CHARACTER 2 * reserved for vsam mods/02
2 (2) CHARACTER 23 jvkey key of record table
2 (2) CHARACTER 16 jvtable jcl variable table id
18 (12) CHARACTER 7 * always blank
25 (19) CHARACTER 1 * not used
26 (1A) CHARACTER 8 jvlu last updating user
34 (22) CHARACTER 4 jvlt last update time hhmm
38 (26) CHARACTER 6 jvld last update date yymmdd
44 (2C) CHARACTER 24 jvdes table description
68 (44) SIGNED 2 jvvar number of vars in table
70 (46) CHARACTER 16 jvown owner id
86 (56) CHARACTER 2 * not used
88 (58) CHARACTER 8 jvluts last update timestamp
96 (60) CHARACTER 2 * not used
98 (62) CHARACTER * jvarsect variable part of table
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 476 jvtab jcl var table, var part
0 (0) CHARACTER 8 jvvar jcl variable name
8 (8) CHARACTER 44 jvdfl jcl variable def value
52 (34) CHARACTER 1 jvuc Y = uppercase, N=mixed
53 (35) CHARACTER 1 jvstp prompt / setup / submit
54 (36) SIGNED 2 jvlg value length
56 (38) CHARACTER 7 jvtyp verification type
63 (3F) CHARACTER 8 jvex substitution exit name
71 (47) CHARACTER 1 jvinp input required
72 (48) SIGNED 2 jvpos replace position jcl data
74 (4A) CHARACTER 1 jvnum numeric
75 (4B) CHARACTER 2 jvcmp comparison operator
77 (4D) CHARACTER 44 jvpat validation pattern
121 (79) CHARACTER 102 jvvld valid values
121 (79) CHARACTER 51 jvvld1 first line
172 (AC) CHARACTER 51 jvvld2 second line
223 (DF) CHARACTER 204 jvtxt dialog text
427 (1AB) CHARACTER 20 jvtdes description
447 (1BF) CHARACTER 1 * reserved
448 (1C0) SIGNED 2 jvnrp number of dep values
450 (1C2) CHARACTER 8 jvind independent variable name
458 (1CA) CHARACTER 2 jvvers version number
460 (1CC) CHARACTER 2 jvsubs substring start posVJA
462 (1CE) CHARACTER 2 jvsubl substring length
464 (1D0) CHARACTER 12 * reserved
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 88 jvd dependencies
0 (0) CHARACTER 44 jvdiv value of setting variable
44 (2C) CHARACTER 44 jvddv dependent variable value

Cross reference

Name Hex Offset Hex Value Level
jv 0   1
jvvar 44   3
jvarsect 62   2
jvcmp 4B   2
jvcommon 0   2
jvd 0   1
jvddv 2C   2
jvdes 2C   3
jvdfl 8   2
jvdiv 0   2
jvex 3F   2
jvind 1C2   2
jvinp 47   2
jvkey 2   3
jvld 26   3
jvlg 36   2
jvlt 22   3
jvlu 1A   3
jvluts 58   3
jvnrp 1C0   2
jvnum 4A   2
jvown 46   3
jvpat 4D   2
jvpos 48   2
jvstp 35   2
jvsubl 1CE   2
jvsubs 1CC   2
jvtab 0   1
jvtable 2   4
jvtdes 1AB   2
jvtxt DF   2
jvtyp 38   2
jvuc 34   2
jvvar 0   2
jvvers 1CA   2
jvvld 79   2
jvvld1 79   3
jvvld2 AC   3

MCA - TWS/ESA common area

   Name : DCLMCA

   Function:
   This segment declares the TWS/ESA common area.
   Most TWS/ESA control blocks can be reached via the MCA.

Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 392 mca TWS/ESA communication area
0 (0) CHARACTER 4 mcadesc block descriptor = 'MCA '
4 (4) CHARACTER 10 mcalevel MCA block code level
4 (4) CHARACTER 2 mcaver block mapping version
6 (6) CHARACTER 8 mcafmid TWS/ESA tracker fmid
14 (E) BITSTRING 2 mcaflags mca options
    1... ....   mcatso 1: tso user built mca
    .1.. ....   mcaasxb 1: asxb was modified
    ..1. ....   mcaacee 1: acee built
    ...1 ....   mcaracf 1: subres profiles
    .... 1...   mcaesa : active on mvs/esa
    .... .1..   mcasp4 1: mvs/sp 4.1 or later
    .... ..1.   mcamlog 1: msg log is reserved
    .... ...1   mca313 1: mvs/sp 3.1.3 or later
15 (F) 1... ....   mcaqfcan 1: ss cancld due to qfull
    .1.. ....   mcanoprm 1: do not open parmlib
    ..1. ....   mcaedpw 1: waiting for edp
    ...1 ....   mcasp422 1: mvs/sp 4.2.2 or later
    .... 1...   mcapace 1: event inflow paced
    .... .1..   mcaupace 1: emgr ask for resume
    .... ..1.   mcartrq 1: queue to DRTQ
    .... ...1   mcatcpr 1: ta task restarting

----------------------------------------------------------------------------------------------
TWS/ESA control block addresses follow
----------------------------------------------------------------------------------------------

16 (10) ADDRESS 4 mcaascb eqqmajor ascb address
20 (14) ADDRESS 4 mcamtcb eqqmajor tcb address
24 (18) ADDRESS 4 mcaopts addr of options block
28 (1C) ADDRESS 4 mcaftab file table address
32 (20) ADDRESS 4 mcastemj addr 1st major subtask
36 (24) ADDRESS 4 mcastenm addr 1st nmm subtask
40 (28) ADDRESS 4 mcastegs addr 1st genserv subtask
44 (2C) ADDRESS 4 mcaopecb addr of oper cmd ecb
48 (30) ADDRESS 4 mcassvt addr of tws ssvt
52 (34) ADDRESS 4 mcassct addr of tws ssct
56 (38) ADDRESS 4 mcatsob addr of tso table block
60 (3C) ADDRESS 4 mcanmmb addr of nmm parameters
64 (40) ADDRESS 4 mcaedpb addr of edp block
68 (44) ADDRESS 4 mcaprip addr of pri block
72 (48) ADDRESS 4 mcasrap addr of serv routn array
76 (4C) ADDRESS 4 mcasure addr of su/re table
80 (50) ADDRESS 4 mcanabb addr of vtam i/o params
84 (54) ADDRESS 4 mcadiap addr of diagnose options
88 (58) ADDRESS 4 mcacpnq addr of cp enq statistics
92 (5C) ADDRESS 4 mcatmlog tcb addr of mlog reserver
96 (60) ADDRESS 4 mcajancp js interface anchor block
100 (64) ADDRESS 4 mcaxsip XCF system info cb
104 (68) ADDRESS 4 mcaqfecb addr to q full ecb
108 (6C) ADDRESS 4 mcaasip APPC system info cb
112 (70) ADDRESS 4 mcaSyncEcbPtr HT Client to Server Sync
116 (74) ADDRESS 4 mcaTSRAp addr of Topology parsing
120 (78) ADDRESS 4 mcaFSRAp addr of Data Store service routines
124 (7C) ADDRESS 4 mcasub addr of sub parm area
128 (80) ADDRESS 4 mcassxp SSX block address
132 (84) ADDRESS 4 mcarsip RODM system info cb
136 (88) ADDRESS 4 mcajltbl mca job log table ptr
140 (8C) ADDRESS 4 mcarodmopt RODM options table
144 (90) ADDRESS 4 mcahcm HCMain address
148 (94) ADDRESS 4 mcaID Local Id event area
152 (98) ADDRESS 4 mcaJopts address of JOBOPTS parms
156 (9C) ADDRESS 4 mcaanmmp always nmmpointer
160 (A0) ADDRESS 4 mcaqueptr current queue elem ptr

----------------------------------------------------------------------------------------------
TWS/ESA service routine addresses follow
----------------------------------------------------------------------------------------------

164 (A4) ADDRESS 4 mcamsgx message routine address
168 (A8) ADDRESS 4 mcaseqx seq i/o service routine
172 (AC) ADDRESS 4 mcapdsx pds i/o service routine
176 (B0) ADDRESS 4 mcaprmx param member parse rtn
180 (B4) ADDRESS 4 mcaquex queue server routine
184 (B8) ADDRESS 4 mcanowx current time routine
188 (BC) ADDRESS 4 mcavsam addr vsam file handler
192 (C0) ADDRESS 4 mcavsamb addr bex vsam file handler
196 (C4) ADDRESS 4 mcasubx addr job submit routine
200 (C8) ADDRESS 4 mcarelx addr job release routine
204 (CC) ADDRESS 4 mcaevhx addr of event handler
208 (D0) ADDRESS 4 mcamcpx addr of modify curr plan
212 (D4) ADDRESS 4 mcabexp bex services address
216 (D8) ADDRESS 4 mcaaidx ZNOWX format clone address
220 (DC) ADDRESS 4 mcalvck level check routine adress
224 (E0) ADDRESS 4 mcaznqd ZNQDX lock dsname
228 (E4) ADDRESS 4 mcaettp ETT info for CP04
232 (E8) ADDRESS 4 mcaIDecb EW ID event ECB

----------------------------------------------------------------------------------------------
miscellaneous HCL Workload Automation constants
----------------------------------------------------------------------------------------------

236 (EC) SIGNED 2 mcansubs number of subsys subtasks
238 (EE) SIGNED 2 mcagmtof gmt offset, minutes
240 (F0) SIGNED 2 mcaracrtrc racroute trace level
242 (F2) BITSTRING 2 mcaDSTORE Data Store task status
    1... ....   DBAReady Data base init OK
    .1.. ....   DBAFail Data base ended
    ..1. ....   JQUReady Jes queue init OK
    ...1 ....   JQUFail Jes queue ended
    .... 1...   mcaRefrCP  
242 (F2) BITSTRING 1 *  
243 (F3) .... .1..   Fprocin  
    .... ..1.   Fmethod Data Store method trace
    .... ...1   FParser Data Store parser trace
244 (F4) SIGNED 4 mcagmtSEC gmt offset, seconds
248 (F8) CHARACTER 1 mcajes primary jes, A=js2, B=js3
249 (F9) CHARACTER 1 mcacjes jes command 1st character
250 (FA) CHARACTER 4 mcassnm TWS/ESA subsystem name
254 (FE) CHARACTER 8 mcamajnm TWS/ESA major enq name
262 (106) CHARACTER 8 mcaclass racf resource class name
270 (10E) CHARACTER 8 mcanjenm nje node name
278 (116) CHARACTER 4 mcaqfqn name of full queue
282 (11A) CHARACTER 8 mcanvid Netview Receiver ID
290 (122) CHARACTER 1 mcadsclas JES class for Datastore
291 (123) CHARACTER 1 mcaSPIN Y = SPIN available; N = SPIN not available to server block
292 (124) ADDRESS 4 mcaphbp  
296 (128) CHARACTER 5 mcaclnjob clean up job name
301 (12D) CHARACTER 1 mcaddrspc address space type: O = controller/tracker; S = server; D = data store; B = batch; T = Trial EQQDTTOP; L = Batch Loader
302 (12E) CHARACTER 8 MCAJesfmid JES fmid
310 (136) CHARACTER 1 MCAtraces  
    1... ....   MCAzzSPIN SPIN traces
    .111 1111   *  
311 (137) CHARACTER 1 mcallopt LISTLOG option A!F!N
312 (138) BITSTRING 6 mcasubrs protected subresources
    1... ....   mcaadnm ada.adname is a resource
    .1.. ....   mcaadow ado.owner is a resource
    ..1. ....   mcaadgr adg.group is a resource
    ...1 ....   mcaadjb adj.jobname is a resource
    .... 1...   mcacpad cpa.adname is a resource
    .... .1..   mcacpow cpo.owner is a resource
    .... ..1.   mcacpgr cpg.group is a resource
    .... ...1   mcacpjb cpj.jobname is a resource
313 (139) 1... ....   mcacpws cpw.wsname is a resource
    .1.. ....   mcajcad jsa.adname is a resource
    ..1. ....   mcajcjb jsj.jobname is a resource
    ...1 ....   mcajcws jsw.wsname is a resource
    .... 1...   mcajcow jso.owner is a resource
    .... .1..   mcajcgr jsg.group is a resource
    .... ..1.   mcaltad lta.adname is a resource
    .... ...1   mcaltow lto.owner is a resource
314 (13A) 1... ....   mcaoiad oia.adname is a resource
    .1.. ....   mcawsws wsw.wsname is a resource
    ..1. ....   mcarlad rla.adname is a resource
    ...1 ....   mcarlow rlo.owner is a resource
    .... 1...   mcarlgr rlg.group is a resource
    .... .1..   mcarlws rlw.wsname is a resource
    .... ..1.   mcaclcn clc.calname is a resource
    .... ...1   mcaprpn prp.pername is a resource
315 (13B) 1... ....   mcaetnm ete.name is a resource
    .1.. ....   mcaetad eta.name is a resource
    ..1. ....   mcasrnm srs.name is a resource
    ...1 ....   mcavjvo jv.owner is a resource
    .... 1...   mcavjvn jv.tabname is a resource
    .... .1..   mcacpwo cpz.wsname is a res
    .... ..1.   mcacpgd cpd.OCCgrp is a res
    .... ...1   mcaltgd ltd.OCCgrp is a res
316 (13C) 1... ....   mcaadgd add.adgrp is a res
    .1.. ....   mcarlwst rl.wsstat is a res
    ..1. ....   mcardrn rdr.name is a res
    ...1 ....   mcaadex ade.extname is a res
    .... 1...   mcacpex cpe.extname is a res
    .... .1..   mcaadse ad.secelem is a res
    .... ..1.   mcacpse cp.secelem is a res
    .... ...1   mcadbrp rp.reptype is a res
317 (13D) 1... ....   mcaADinuse AD used by batch
    .1.. ....   mcaADVERrun AD VER done
    ..1. ....   mcapif  
    ...1 1111   *  
318 (13E) BITSTRING 2 mcaflags2 flags
    1... ....   mcasp52 1: mvs/sp 5.2 or later
    .1.. ....   mcasymb 1: perform symbol subst
    ..1. ....   mcaux002 exit2 invoked
    ...1 ....   mcawaenq deq after abend?
    .... 1...   mcadbg for debug purpose
    .... .1..   mcajtblock ON: JTB is locked
    .... ..1.   mcaTWSCntlStart On at controller StartUp
    .... ...1   mcaBulkDiscovery bulc disc is already running
319 (13F) 1... ....   mcalock2b  
    .1.. ....   mcastopc On = stop command issued
    ..11 1111   * free
320 (140) ADDRESS 4 mcatplgyp Topology CB address
324 (144) ADDRESS 4 mcaSCLIBdcb sclib dcb ptr
324 (144) SIGNED 4 mcaHTDSlastrec  
328 (148) ADDRESS 4 mcaCtoken token for C environment
328 (148) SIGNED 4 mcaHTDSlastcyc  
332 (14C) SIGNED 4 mcauserf reserved for tws exits
336 (150) SIGNED 2 mcaquelen QUEUELEN changed value
338 (152) BITSTRING 2 mcaperf Performance flags
    1... ....   mcaexiDB EXIT debug
    .1.. ....   mcajclDB JCL debug
    ..1. ....   mcaE105 E105 msg flag
    ...1 ....   mcaZ308 Z308 msg flag
    .... 1...   mcan069 N069 msg flag
338 (152) BITSTRING 1 * free
340 (154) SIGNED 2 mcaTimeSta stats msg interval time
342 (156) SIGNED 2 mcablrc BL rc with EQQY221E
344 (158) ADDRESS 4 MCADBGp  
348 (15C) ADDRESS 4 mcamlogd mlog dsname address

----------------------------------------------------------------------------------------------
2 mcafarb ptr(31) , farb ptr
2 lockrc bin(31) ,
----------------------------------------------------------------------------------------------

352 (160) UNSIGNED 2 mcaHT_evtsseq  
354 (162) UNSIGNED 2 *  
356 (164) SIGNED 4 mcaHT_evtchkcyc  
360 (168) CHARACTER 4 mcaFINDmem  
360 (168) BITSTRING 3 mcaTTR  
363 (16B) BITSTRING 1 mcaconc  
364 (16C) SIGNED 4 mcaENFTOK57 ENFREQ 57 dtoken
364 (16C) SIGNED 4 mcaHTDSespN  
368 (170) SIGNED 4 mcaWLMQsz WLM query size
368 (170) SIGNED 4 mcaHTDSespT  
372 (174) SIGNED 4 mcaENFTOK41 ENFREQ 41 dtoken
376 (178) ADDRESS 4 mcamsgh bufmsg routine address
380 (17C) ADDRESS 4 mcaEXTp address of extended MCA
384 (180) SIGNED 4 mcaENFTOK53 ENFREQ 53 dtoken
388 (184) ADDRESS 4 mcaux014 address of eqqux014
392 (188) CHARACTER   mcaend end of mca
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 324 mcaEXT extended MCA
0 (0) ADDRESS 4 mcaANCQp adress of mcaFLque
4 (4) CHARACTER 8 mcaSYSNAME &SYSNAME
12 (C) ADDRESS 4 mcajtab address of EQQZJTAB
16 (10) ADDRESS 4 mcadsiox address of EQQDSIOX
20 (14) ADDRESS 4 mcadsini address of EQQDSINI
24 (18) ADDRESS 4 mcajtbp ptr to JTB
28 (1C) ADDRESS 4 mcaX14tabp exit14 tabptr
32 (20) SIGNED 4 mcaX14numr exit14 numrow
36 (24) SIGNED 4 mcaX14rsiz exit14 recsize
40 (28) ADDRESS 4 mcaDSViewp ptr to DSV command area
44 (2C) CHARACTER 8 mcaoptmem options member
52 (34) ADDRESS 4 mcadtbaux pointer to refresh dest
56 (38) SIGNED 4 mcaavildst destination slots available for refresh
60 (3C) ADDRESS 4 mcahtca pointer to htca
64 (40) SIGNED 4 mcahtcauxn len of aux htc
68 (44) ADDRESS 4 mcahtcaux pointer to auxiliary htc
72 (48) SIGNED 4 mcahtsauxn len of aux hts
76 (4C) ADDRESS 4 mcahtsaux pointer to auxiliary hts
80 (50) ADDRESS 4 mcahtsa pointer to htsa
84 (54) ADDRESS 4 mcahtcp ptr to HTC block
88 (58) SIGNED 4 mcahtcl length of HTC block
92 (5C) ADDRESS 4 mcahtsp ptr to HTS block
96 (60) SIGNED 4 mcahtsl length of HTS block
100 (64) CHARACTER 2 * free
102 (66) UNSIGNED 4 mcasseqconf last sseq confirmed
104 (68) SIGNED 4 mcarecconf last HTDS record confirmed
108 (6C) SIGNED 4 mcacycconf last HTDS cycle confirmed
112 (70) ADDRESS 4 *(52) free
320 (140) ADDRESS 4 mcaHTdbfP free
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 12 mcaFLque
0 (0) ADDRESS 4 mcaANCQp1 floptmsgqu1
4 (4) ADDRESS 4 mcaANCQp2 floptmsgqu2
8 (8) ADDRESS 4 mcaANCQpT floptmsgqut
Offsets        
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 28 mcaDSView
0 (0) CHARACTER 16 mcaDSV_AD adid
16 (10) CHARACTER 10 mcaDSV_IA ia
26 (1A) SIGNED 2 mcaDSV_OP opnum
Offsets      
Dec Hex Type Len Name (Dim)
0 (0) STRUCTURE * mcaHTpage
0 (0) CHARACTER 12 mcaHTfix
0 (0) ADDRESS 4 mcaHTnext
4 (4) ADDRESS 4 mcaHTtot
8 (8) SIGNED 4 mcaHToff
12 (C) CHARACTER * mcaHTend

Cross reference

Name Hex Offset Hex Value Level
DBAFail F2 40 3
DBAReady F2 80 3
Fmethod F3 02 3
FParser F3 01 3
Fprocin F3 04 3
JQUFail F2 10 3
JQUReady F2 20 3
mca 0   1
mcaacee E 20 3
mcaadex 13C 10 3
mcaadgd 13C 80 3
mcaadgr 138 20 3
mcaADinuse 13D 80 3
mcaadjb 138 10 3
mcaadnm 138 80 3
mcaadow 138 40 3
mcaadse 13C 04 3
mcaADVERrun 13D 40 3
mcaaidx D8   2
mcaANCQp 0   2
mcaANCQpT 8   2
mcaANCQp1 0   2
mcaANCQp2 4   2
mcaanmmp 9C   2
mcaascb 10   2
mcaasip 6C   2
mcaasxb E 40 3
mcaavildst 38   2
mcabexp D4   2
mcablrc 156   2
mcaBulkDiscoveryRunning 13E 01 3
mcacjes F9   2
mcaclass 106   2
mcaclcn 13A 02 3
mcaclnjob 128   2
mcaconc 16B   3
mcacpad 138 08 3
mcacpex 13C 08 3
mcacpgd 13B 02 3
mcacpgr 138 02 3
mcacpjb 138 01 3
mcacpnq 58   2
mcacpow 138 04 3
mcacpse 13C 02 3
mcacpwo 13B 04 3
mcacpws 139 80 3
mcaCtoken 148   2
mcacycconf 6C   2
mcadbg 13E 08 3
MCADBGp 158   2
mcadbrp 13C 01 3
mcaddrspc 12D   2
mcadesc 0   2
mcadiap 54   2
mcadsclas 122   2
mcadsini 14   2
mcadsiox 10   2
mcaDSTORE F2   2
mcaDSV_AD 0   2
mcaDSV_IA 10   2
mcaDSV_OP 1A   2
mcaDSView 0   1
mcaDSViewp 28   2
mcadtbaux 34   2
mcaedpb 40   2
mcaedpw F 20 3
mcaend 188   2
mcaENFTOK41 174   2
mcaENFTOK53 180   2
mcaENFTOK57 16C   2
mcaesa E 08 3
mcaetad 13B 40 3
mcaetnm 13B 80 3
mcaettp E4   2
mcaevhx CC   2
mcaexiDB 152 80 3
mcaEXT 0   1
mcaEXTp 17C   2
mcaE105 152 20 3
mcaFINDmem 168   2
mcaflags E   2
mcaflags2 13E   2
mcaFLque 0   1
mcafmid 6   3
mcaFSRAp 78   2
mcaftab 1C   2
mcagmtof EE   2
mcagmtSEC F4   2
mcahcm 90   2
mcaHT_evtchkcyc 164   2
mcaHT_evtsseq 160   2
mcahtca 3C   2
mcahtcaux 44   2
mcahtcauxn 40   2
mcahtcl 58   2
mcahtcp 54   2
mcaHTdbfP 140   2
mcaHTDSespN 16C   3
mcaHTDSespT 170   3
mcaHTDSlastcyc 148   3
mcaHTDSlastrec 144   3
mcaHTend C   2
mcaHTfix 0   2
mcaHTnext 0   3
mcaHToff 8   3
mcaHTpage 0   1
mcahtsa 50   2
mcahtsaux 4C   2
mcahtsauxn 48   2
mcahtsl 60   2
mcahtsp 5C   2
mcaHTtot 4   3
mcaID 94   2
mcaIDecb E8   2
mcajancp 60   2
mcajcad 139 40 3
mcajcgr 139 04 3
mcajcjb 139 20 3
mcajclDB 152 40 3
mcajcow 139 08 3
mcajcws 139 10 3
mcajes F8   2
MCAJesfmid 12E   2
mcajltbl 88   2
mcaJopts 98   2
mcajtab C   2
mcajtblock 13E 04 3
mcajtbp 18   2
mcalevel 4   2
mcallopt 137   2
mcalock2b 13F 80 3
mcaltad 139 02 3
mcaltgd 13B 01 3
mcaltow 139 01 3
mcalvck DC   2
mcamajnm FE   2
mcamcpx D0   2
mcamlog E 02 3
mcamlogd 15C   2
mcamsgh 178   2
mcamsgx A4   2
mcamtcb 14   2
mcanabb 50   2
mcanjenm 10E   2
mcanmmb 3C   2
mcanoprm F 40 3
mcanowx B8   2
mcansubs EC   2
mcanvid 11A   2
mcan069 152 08 3
mcaoiad 13A 80 3
mcaopecb 2C   2
mcaoptmem 2C   2
mcaopts 18   2
mcapace F 08 3
mcapdsx AC   2
mcaperf 152   2
mcaphbp 124   2
mcapif 13D 20 3
mcaprip 44   2
mcaprmx B0   2
mcaprpn 13A 01 3
mcaqfcan F 80 3
mcaqfecb 68   2
mcaqfqn 116   2
mcaquelen 150   2
mcaqueptr A0   2
mcaquex B4   2
mcaracf E 10 3
mcaracrtrc F0   2
mcardrn 13C 20 3
mcarecconf 68   2
mcaRefrCP F2 08 3
mcarelx C8   2
mcarlad 13A 20 3
mcarlgr 13A 08 3
mcarlow 13A 10 3
mcarlws 13A 04 3
mcarlwst 13C 40 3
mcarodmopt 8C   2
mcarsip 84   2
mcartrq F 02 3
mcaSCLIBdcb 144   2
mcaseqx A8   2
mcaSPIN 123   2
mcasp4 E 04 3
mcasp422 F 10 3
mcasp52 13E 80 3
mcasrap 48   2
mcasrnm 13B 20 3
mcassct 34   2
mcasseqconf 66   2
mcassnm FA   2
mcassvt 30   2
mcassxp 80   2
mcastegs 28   2
mcastemj 20   2
mcastenm 24   2
mcastopc 13F 40 3
mcasub 7C   2
mcasubrs 138   2
mcasubx C4   2
mcasure 4C   2
mcasymb 13E 40 3
mcaSyncEcbPtr 70   2
mcaSYSNAME 4   2
mcatcpr F 01 3
mcaTimeSta 154   2
mcatmlog 5C   2
mcatplgyp 140   2
MCAtraces 136   2
mcatso E 80 3
mcatsob 38   2
mcaTSRAp 74   2
mcaTTR 168   3
mcaTWSCntlStart 13E 02 3
mcaupace F 04 3
mcauserf 14C   2
mcaux002 13E 20 3
mcaux014 184   2
mcaver 4   3
mcavjvn 13B 08 3
mcavjvo 13B 10 3
mcavsam BC   2
mcavsamb C0   2
mcawaenq 13E 10 3
mcaWLMQsz 170   2
mcawsws 13A 40 3
mcaxsip 64   2
mcaX14numr 20   2
mcaX14rsiz 24   2
mcaX14tabp 1C   2
mcaznqd E0   2
MCAzzSPIN 136 80 3
mcaZ308 152 10 3
mca313 E 01 3

TJCB - Tailoring JCL control block

   Name : DCLTJCB

   Function:
   This is the js handler tailoring jcl control block. It holds
   information about all imbedded jcl.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 92 tjcb tailoring jcl control block
0 (0) CHARACTER 4 tjcbdesc descriptor always 'tjcb'
4 (4) CHARACTER 2 tjcbvers block version
6 (6) CHARACTER 2 * not used
8 (8) SIGNED 4 tjcblin number of lines in this jcl block
12 (C) SIGNED 4 tjcbclin current jcl line being proc
16 (10) ADDRESS 4 tjcbtubp pointer to tub block
20 (14) ADDRESS 4 tjcbstgp pointer to storage allocated for jcl , or null if it is the first tjcb in chain, it also points to the common part of jcl record
24 (18) SIGNED 4 tjcbofst from start of orig/fetched JCL (the value is number of lines)
28 (1C) ADDRESS 4 tjcbexpp pointer to expansion work area
32 (20) SIGNED 4 tjcbexps size of exp. work area
36 (24) SIGNED 4 tjcbamnt amount of storage getmained for jcl pointed to by this tjcb
40 (28) ADDRESS 4 tjcbjclp pointer to first jcl line
44 (2C) ADDRESS 4 tjcbnxtp pointer to next tjcb block
48 (30) ADDRESS 4 tjcbprep pointer to previous tjcb block
52 (34) SIGNED 4 tjcbnslv nesting level of current tjcb
56 (38) CHARACTER 1 tjcbtype type of data pointed to block J= original JCL M= fetched nominated member X= fetched by user exit
57 (39) CHARACTER 1 tjcbactn action Y= include JCL N= not included / exclude
58 (3A) CHARACTER 8 tjcblib ddname of jcl library
66 (42) CHARACTER 8 tjcbmem member of jcl library
74 (4A) CHARACTER 8 tjcbusrx user exit name
82 (52) CHARACTER 1 tjcbfin data for this block processed
83 (53) CHARACTER 1 tjcbstrm JCL stream switches at start of JCL governed by this tjcb values as in prsbsw1
84 (54) CHARACTER 4 tjcbint directive introducing block command,main keyword,domain
88 (58) CHARACTER 1 tjcbstsa saved values for stream sw
89 (59) CHARACTER 3 * reserved values as in prsk $LBC
92 (5C) CHARACTER tjcbend end label of block

Cross reference

Name Hex Offset Hex Value Level
tjcb 0   1
tjcbclin C   2
tjcblin 8   2
tjcbactn 39   2
tjcbamnt 24   2
tjcbdesc 0   2
tjcbend 5C   2
tjcbexpp 1C   2
tjcbexps 20   2
tjcbfin 52   2
tjcbint 54   2
tjcbjclp 28   2
tjcblib 3A   2
tjcbmem 42   2
tjcbnslv 34   2
tjcbnxtp 2C   2
tjcbofst 18   2
tjcbprep 30   2
tjcbstgp 14   2
tjcbstrm 53   2
tjcbstsa 58   2
tjcbtubp 10   2
tjcbtype 38   2
tjcbusrx 4A   2
tjcbvers 4   2

TUB - Tailoring JCL control block

   Name : DCLTUB

   Function:
  This is the js handler tailoring jcl control block.
  It holds information about all imbedded jcl.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 800 tub tailoring user block
0 (0) CHARACTER 4 tubdesc descriptor always 'TUB '
4 (4) CHARACTER 2 tubvers block version
6 (6) CHARACTER 8 tuboreqd original data type
14 (E) CHARACTER 8 tubident tailoring identifier
14 (E) CHARACTER 8 tubuser ..tso; userid
22 (16) CHARACTER 28 tubopid operation identifier
22 (16) CHARACTER 16 tubadid ..application; id
38 (26) CHARACTER 6 tubadiad ..input; arrival day
44 (2C) CHARACTER 4 tubadiat ..input; arrival time
48 (30) SIGNED 2 tubopno ..operation; number
50 (32) CHARACTER 1 tubSimulate time simulation Y or N
51 (33) CHARACTER 1 * not used
52 (34) ADDRESS 4 tubocp addr of PIF format CP occ
56 (38) ADDRESS 4 tubopp addr of PIF format CP opr
60 (3C) ADDRESS 4 tubwsp address of PIF format CP WS
64 (40) SIGNED 4 tubocl length of PIF format CP occ
68 (44) SIGNED 4 tubopl length of PIF format CP opr
72 (48) SIGNED 4 tubwsl length of PIF format CP WS
76 (4C) ADDRESS 4 tubdcbp current jcl library dcb
80 (50) ADDRESS 4 tubbufp address of jblib buffer
84 (54) SIGNED 4 tubasubp subpool for subseq allocs
88 (58) ADDRESS 4 tubworkp ptr to tailoring work area
92 (5C) ADDRESS 4 tubmcap pointer to mca
96 (60) SIGNED 4 tubworkl length of tail work area
100 (64) ADDRESS 4 tubjcbcu current tjcb
104 (68) ADDRESS 4 tubjcbfp pointer to first tjcb
108 (6C) ADDRESS 4 tubjcblp pointer to last tjcb
112 (70) ADDRESS 4 tubjvptr pointer to jv record buffer
116 (74) ADDRESS 4 tubdatp pointer predef variables and their values
120 (78) ADDRESS 4 tubtvp pointer to jcl vars found when searching jcl
124 (7C) SIGNED 4 tubtvarl length of allocated var stg
128 (80) CHARACTER 2 tubtask current task (GS,WA)
130 (82) CHARACTER 8 tubjclib current jcl library
138 (8A) CHARACTER 1 tuballv Y= variable proc. complete
139 (8B) CHARACTER 1 * not used
140 (8C) CHARACTER 16 tubjvtab occurrence variable table
156 (9C) CHARACTER 16 tubsearch (16) current table search order
412 (19C) CHARACTER 16 tubTabName (16) table names array $CXWC
668 (29C) ADDRESS 4 tubTabNameP (16) table ptrs array $CXWA
732 (2DC) CHARACTER 8 tubfoot current footprint
740 (2E4) CHARACTER 2 tubdlm current dlm
742 (2E6) CHARACTER 1 * reserved
743 (2E7) BITSTRING 1 tubflags flag byte
1... .... tubosi osi operation JCL
.1.. .... tubboj osi operation JCL
..11 1111 * reserved
744 (2E8) SIGNED 4 tubosi number of lines inserted
748 (2EC) ADDRESS 4 tubjcfp pointer to feedback area
752 (2F0) ADDRESS 4 tubjdup addr of user SETFORM date dates
756 (2F4) ADDRESS 4 tubtvsp addr of SAVEVAR variable in stg
760 (2F8) ADDRESS 4 tubjdtp addr of SETVAR variables
764 (2FC) ADDRESS 4 tubysimp addr of simulation parms
768 (300) ADDRESS 4 tuboca addr of PIF format occ alwaysOEA
772 (304) ADDRESS 4 tubopa addr of PIF format opr alwaysOEA
776 (308) ADDRESS 4 tubwsa address of PIF format ws alw.OEA
780 (30C) ADDRESS 4 tubxinfp Extended Job Info addr.
784 (310) ADDRESS 4 tubDOA DOA address needed to $CAEC check DOAPSUJCL $CAEA
788 (314) ADDRESS 4 tubcp3c CP occurrence
792 (318) ADDRESS 4 tubcp3p CP operation record
796 (31C) ADDRESS 4 tubcp3r CP op record user fields
800 (320) CHARACTER tubend end of tub block
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 200 tubxinf
0 (0) CHARACTER 54 tubxjnm
54 (36) CHARACTER 146 *

Cross reference

Name Hex Offset Hex Value Level
tub 0   1
tubosi 2E8   2
tubadiad 26   3
tubadiat 2C   3
tubadid 16   3
tuballv 8A   2
tubasubp 54   2
tubboj 2E7 40 3
tubbufp 50   2
tubcp3c 314   2
tubcp3p 318   2
tubcp3r 31C   2
tubdatp 74   2
tubdcbp 4C   2
tubdesc 0   2
tubdlm 2E4   2
tubDOA 310   2
tubend 320   2
tubflags 2E7   2
tubfoot 2DC   2
tubident E   2
tubjcbcu 64   2
tubjcbfp 68   2
tubjcblp 6C   2
tubjcfp 2EC   2
tubjclib 82   2
tubjdtp 2F8   2
tubjdup 2F0   2
tubjvptr 70   2
tubjvtab 8C   2
tubmcap 5C   2
tuboca 300   2
tubocl 40   2
tubocp 34   2
tubopa 304   2
tubopid 16   2
tubopl 44   2
tubopno 30   3
tubopp 38   2
tuboreqd 6   2
tubosi 2E7 80 3
tubsearch 9C   2
tubSimulate 32   2
tubTabName 19C   2
tubTabNameP 29C   2
tubtask 80   2
tubtvarl 7C   2
tubtvp 78   2
tubtvsp 2F4   2
tubuser E   3
tubvers 4   2
tubworkl 60   2
tubworkp 58   2
tubwsa 308   2
tubwsl 48   2
tubwsp 3C   2
tubxinf 0   1
tubxinfp 30C   2
tubxjnm 0   2
tubysimp 2FC   2

TV - JCL variable table record description

   Name : DCLTV

   Function:
   Defines the layout of each non-preset variable encountered
           in the jobstream. The information in the main section of the
           record and the dependency information are taken unaltered
           from the corresponding variable description in the JCL variable
           type 3 table record.

   NOTE: This block is expanded by getmains to the next multiple
           of 32K whenever there is insufficient space for the next entry.
           Current address and getmained length are held in tub.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 16 tv JCL variable table
0 (0) CHARACTER 4 tveye descriptor always 'tvar'
4 (4) CHARACTER 2 tvvers block version
6 (6) CHARACTER 2 * not used
8 (8) SIGNED 4 tvvars number of variables in storage
12 (C) SIGNED 4 tvnoff offset to next free byte
16 (10) CHARACTER tvdata variable part of table
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 552 tvtab
0 (0) CHARACTER 88 tvrun tailoring run-time info
0 (0) CHARACTER 16 tvtable source table name
16 (10) CHARACTER 8 tvasusr assigned by USER/EXIT/VAR
24 (18) CHARACTER 44 tvasg value assigned
68 (44) CHARACTER 16 tvfrst first occurrence
68 (44) SIGNED 4 tvotjcb address of source tjcb
72 (48) SIGNED 4 tvoline JCL line within tjcb scope
76 (4C) SIGNED 2 tvovnr seq of identification in line
78 (4E) CHARACTER 6 * reserved
84 (54) CHARACTER 1 tvasgtyp type of assignment P/E/V/D
85 (55) CHARACTER 1 tvset Y(es) ! N(o) ! D(elayed)
86 (56) CHARACTER 1 tvusg type of usage % / & /
87 (57) CHARACTER 1 * reserved
88 (58) CHARACTER 464 tvfxd unchanged from VSAM
88 (58) CHARACTER 8 tvvar JCL variable name
96 (60) CHARACTER 44 tvdfl JCL variable default value
140 (8C) CHARACTER 1 tvuc uppercae Y/N
141 (8D) CHARACTER 1 tvstp prompt / setup / submit
142 (8E) SIGNED 2 tvlg value length
144 (90) CHARACTER 7 tvtyp verification type
151 (97) CHARACTER 8 tvex substitution exit name
159 (9F) CHARACTER 1 tvinp input required
160 (A0) SIGNED 2 tvpos replace position JCL data
162 (A2) CHARACTER 1 tvnum numeric
163 (A3) CHARACTER 2 tvcmp comparison operator
165 (A5) CHARACTER 44 tvpat validation pattern
209 (D1) CHARACTER 102 tvvld valid values
311 (137) CHARACTER 204 tvtxt dialog text
515 (203) CHARACTER 20 tvdes description
535 (217) CHARACTER 1 * reserved
536 (218) SIGNED 2 tvnrp number of dependent values
538 (21A) CHARACTER 8 tvind independent variable name
546 (222) CHARACTER 2 * reserved
548 (224) CHARACTER 2 tvsubs substring start pos
550 (226) CHARACTER 2 tvsubl substring length
Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 88 tvd(*)
0 (0) CHARACTER 44 tvdiv value of independent
44 (2C) CHARACTER 44 tvddv value of dependent

Cross reference

Name Hex Offset Hex Value Level
tv 0   1
tvvars 8   2
tvasg 18   3
tvasgtyp 54   3
tvasusr 10   3
tvcmp A3   3
tvd 0   1
tvdata 10   2
tvddv 2C   2
tvdes 203   3
tvdfl 60   3
tvdiv 0   2
tvex 97   3
tveye 0   2
tvfrst 44   3
tvfxd 58   2
tvind 21A   3
tvinp 9F   3
tvlg 8E   3
tvnoff C   2
tvnrp 218   3
tvnum A2   3
tvoline 48   4
tvotjcb 44   4
tvovnr 4C   4
tvpat A5   3
tvpos A0   3
tvrun 0   2
tvset 55   3
tvstp 8D   3
tvsubl 226   3
tvsubs 224   3
tvtab 0   1
tvtable 0   3
tvtxt 137   3
tvtyp 90   3
tvuc 8C   3
tvusg 56   3
tvvar 58   3
tvvers 4   2
tvvld D1   3