XD02 - XD Header record

   Name : DCLXD02

   Function:
   This record is built for each Bind Request coming from a remote engine
   and keep trace of its status and match in the plan.

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE * XDREC02 XD HDR RECORD

Key:

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) CHARACTER 68 XDKEY02
0 (0) CHARACTER 2 XDKYP02 TYPE IS ALWAYS 02
2 (2) CHARACTER 64 XDREQ02
2 (2) CHARACTER 8 XDKDEST02 REQUESTER DESTINATION
10 (A) CHARACTER 56 XDKALIAS02 REQUESTER ALIAS
66 (42) CHARACTER 2 XDKF02 FREE

Body:

Offsets
Dec Hex Type Len Name (Dim) Description
68 (44) CHARACTER 224 XDBDY02 HDR RECORD BODY
68 (44) CHARACTER 4 XDEYE02 EYECATCHER
72 (48) UNSIGNED 1 XDVERS02 VERSION NUMBER
73 (49) CHARACTER 1 XD02STAT SUBSCRIBE STATUS (see below)
74 (4A) UNSIGNED 1 XD02FLAGS MATCHING CRITERIA FLAGS:
1... .... XD02WAITWQA ON: started on a wait ws
.1.. .... XD02FAILNFY ON: failed to notify
..1. .... XD02EVOP ON: started executing
...1 .... XD02RECOV ON: recovery in progress
.... 1111 * FREE
75 (4B) UNSIGNED 1 * FREE
76 (4C) CHARACTER 8 XD02TOK XD02 ID: CREATION TOD
84 (54) SIGNED 2 XD02ADEST# Number of alternate Dest
86 (56) SIGNED 2 XD02OPN OPERATION NUMBER TO BIND
88 (58) CHARACTER 16 XD02ADID APPLICATION NAME TO BIND
104 (68) CHARACTER 10 XD02BASEIA Base IA for matching
104 (68) CHARACTER 6 XD02BASEIAD - YYMMDD
110 (6E) CHARACTER 4 XD02BASEIAT - HHMM
114 (72) CHARACTER 10 XD02IFROMIA match Interval start:
114 (72) CHARACTER 6 XD02IFROMIAD - YYMMDD
120 (78) CHARACTER 4 XD02IFROMIAT - HHMM
124 (7C) CHARACTER 10 XD02ITOIA match Interval end:
124 (7C) CHARACTER 6 XD02ITOIAD - YYMMDD
130 (82) CHARACTER 4 XD02ITOIAT - HHMM
134 (86) CHARACTER 26 XD02LTPKEY LTP key (used during pending)
134 (86) CHARACTER 6 XD02LOCCDATE - Run dateYYMMDD
140 (8C) CHARACTER 16 XD02LOCCNAME - Application Name
156 (9C) CHARACTER 4 XD02LOCCTIME - IA® time HHMM
160 (A0) CHARACTER 8 XD02CP3COCCTOK Occurrence Token of operation
168 (A8) CHARACTER 10 XD02JSTART Matched job start
168 (A8) CHARACTER 6 XD02JSTARTD ... date
174 (AE) SIGNED 4 XD02JSTARTT ... time
178 (B2) CHARACTER 1 XD02JSTAT Matched job status
179 (B3) CHARACTER 1 * FREE
180 (B4) CHARACTER 10 XD02JEND Matched job end
180 (B4) CHARACTER 6 XD02JENDD ... date
186 (BA) SIGNED 4 XD02JENDT ... time
190 (BE) CHARACTER 8 XD02JNAME Matched job name
198 (C6) CHARACTER 4 XD02JEC Matched job error code
202 (CA) CHARACTER 4 XD02WSNAME matched ws name
206 (CE) SIGNED 2 XD02IAGMT gmt for IA conversion
208 (D0) SIGNED 2 XD02JSGMT gmt for start time conv
210 (D2) SIGNED 2 XD02JEGMT gmt for end time conv
212 (D4) SIGNED 4 XD02DIDX destination index
216 (D8) SIGNED 4 XD02JADUR actual duration in secs
220 (DC) CHARACTER 72 * FREE

Variable part:

Offsets
Dec Hex Type Len Name (Dim) Description
292 (124) CHARACTER * XDVAR02 VAR DATA

Alternate dest variable part:

Offsets
Dec Hex Type Len Name (Dim) Description
0 (0) STRUCTURE 16 XDADEST(*)
0 (0) CHARACTER 8 XDADESTNAME DESTINATION NAME
8 (8) SIGNED 4 XDADIDX DESTINATION DTB index
12 (C) SIGNED 4 * free

Constants

Offsets
Dec Hex Type Len Name (Dim) Description
2 CHARACTER 02 XDTYP02 first 2 bytes of key
4 CHARACTER XD02 XDEYEC02 EYEcatcher
1 CHARACTER 1 XDVERSC02 version number
1 CHARACTER L WAITLT_XD2 L waiting for LTP
1 CHARACTER K LTLOCK_XD2 K waiting for LTP lock
1 CHARACTER P WAITCP_XD2 P waiting for CP
1 CHARACTER S SENDCH_XD2 S sending status changes
1 CHARACTER E NOTBND_XD2 E not bound
1 CHARACTER C KILLED_XD2 C killed
1 CHARACTER D DELETE_XD2 D deleted