CONTROL BLOCK NAME = DFHDXPS
DESCRIPTIVE NAME = CICS XRF/DBCTL DGB Extension
FUNCTION =
DGBDXPS defines fields used by DBCTL/XRF which require
a longer lifetime than CICS lifo can offer.
LIFETIME =
Created at the same time as the DGB, and never deleted.
LOCATION = CSA->OPFL->DLP->DGB->DXPS
INNER CONTROL BLOCKS = None
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS = None
MODULE TYPE = Control block definition
Contained in PL/AS Copy Book DFHDXMAC
Invoke by DFHDXPS no operands
--------------------------------------------------------------
EXTERNAL REFERENCES = None
DATA AREAS = Refers to DFHDBWMS, DX_Q_ELEMENT
GLOBAL VARIABLES (Macro pass) = None
Table 1.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
36 |
DFHDXPS |
(0) |
ADDRESS |
4 |
DXLSTMSG |
Pointer to last DBCTL/XRF message |
(4) |
ADDRESS |
4 |
DXSQHDR |
Pointer to chain of MVS subtasks |
(8) |
ADDRESS |
4 |
DXAXIBA |
DFHAXI base address |
(C) |
ADDRESS |
4 |
DXAXIGP |
Pointer to current AXI group recd |
(10) |
ADDRESS |
4 |
DXAXIPT |
Pointer to current AXI record |
(14) |
ADDRESS |
4 |
DXRTRCNT |
Number of retry connect attempts |
(18) |
CHARACTER |
4 |
DXDBCID |
SSID of first connect attempt |
(1C) |
BIT(32) |
4 |
DXFLGS1 |
Miscellaneous flags |
(1C) |
1... .... |
|
AXI_LOADED |
Reminder that AXI is to be del |
(1C) |
.1.. .... |
|
DBCTL_RST |
Indicator that no DBCTL in RSE act |
(1C) |
..1. .... |
|
DFS690SW |
Indicator that DFS690 issued |
(1C) |
...1 .... |
|
* |
Reserved |
(1C) |
.... 1... |
|
RETCODE8 |
Code 8 returned by previous call |
(1C) |
.... .1.. |
|
DXEREFLG |
Flag to indicate wait on DXEREECB |
(1C) |
.... ..11 |
|
* |
Filler for remainder of byte |
(20) |
BIT(32) |
4 |
DXEREECB |
ECB cleared while ERE issued |
(20) |
BIT(8) |
1 |
* |
Reserved |
(21) |
BIT(12) |
2 |
DXERECMP |
ERE completion code Copy DXPS dsect |