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