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 |