CONTROL BLOCK NAME = DFHWMGPS
DESCRIPTIVE NAME = CICS TS (XRF) Message manager global area
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1985, 1989
FUNCTION =
Anchor for all XRF message management control information.
There is a single instance of this block.
LIFETIME =
Created by DFHWMI when it is called as part of the XRF
SIGNON process. It then remains for the life of the CICS
system.
STORAGE CLASS =
Non-CICS storage. Usually above the 16M line.
LOCATION =
Addressed by WCGMA in XRF Global area.
INNER CONTROL BLOCKS =
WMGPUT Control area specific to PUTMSG processing.
A single instance created by DFHWMP1 when called
during SIGNON by DFHWMI, and addressed by WMGPUTA
in DFHWMGPS. It contains, among other things, the
PUTMSG work queue anchor for the queued request
interface between XRF server and CICS user TCBs.
WMGGET Control area specific to GETMSG processing.
A single instance created by DFHWMG1 when called
during SIGNON by DFHWMI, and addressed by WMGGETA
in DFHWMGPS. It contains, among other things, the
hash table which is contains anchors for chains
of message queue anchor blocks (DFHWMMPS).
WMGRQR Control area specific to PUTREQ/PUTRSP processing.
A single instance created by DFHWMR1 when called
during SIGNON by DFHWMI, and addressed by WMGRQRA
in DFHWMGPS. It contains, among other things, the
PUTREQ and PUTRSP anchors for the queued request
between the XRF server and CICS user TCBs.
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS =
None
MODULE TYPE = Control block definition
------------------------------------------------------------------
EXTERNAL REFERENCES =
DATA AREAS =
None
CONTROL BLOCKS =
None
GLOBAL VARIABLES (Macro pass) =
None
------------------------------------------------------------------
Message Manager Global Area (in XRF Global area)
Common area
Table 1.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
40 |
DFHWMGPS |
Addressed from WS Global |
| (0) |
CHARACTER |
40 |
WMGCOMM |
Common data |
| (0) |
ADDRESS |
4 |
WMGCFKB |
Free 1K block chain |
| (4) |
ADDRESS |
4 |
WMGCFMQE |
Free message queue element chain |
| (8) |
BIT(8) |
1 |
WMGCFLG1 |
Flags |
| (8) |
1... .... |
|
WMGCFMOV |
Moving data |
| (8) |
.111 1111 |
|
* |
Reserved |
| (9) |
CHARACTER |
3 |
* |
Reserved |
| (C) |
ADDRESS |
4 |
WMGPUTA |
Address of PUTMSG area |
| (10) |
ADDRESS |
4 |
WMGGETA |
Address of GETMSG area |
| (14) |
ADDRESS |
4 |
WMGRQRA |
Address of RQR area |
| (18) |
ADDRESS |
4 |
WMGPMECB |
PUTMSG Start ECB |
| (1C) |
ADDRESS |
4 |
WMGCWAIT |
Work element waiting for MQS to post it. |
| (20) |
ADDRESS |
4 |
WMGCPOST |
Work element MQS is about to post. |
| (24) |
FULLWORD |
4 |
WMGCINST |
Current ACTIVE message source instance number. |
| (28) |
CHARACTER |
0 |
* |
PUTMSG area
Table 2.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
40 |
WMGPUT |
PUTMSG data |
| (0) |
CHARACTER |
16 |
WMGPUTQ |
PUTMSG request queue anchor area. |
| (10) |
ADDRESS |
4 |
WMGPMTA |
Message transmission state data. |
| (14) |
CHARACTER |
12 |
WMGPID |
Initial parameters for PUTMSG process |
| (20) |
ADDRESS |
4 |
* (2) |
Reserved |
| (28) |
CHARACTER |
0 |
WMGPEND |
End of fixed part |
Table 3.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
4 |
WMGPB (*) |
Alternate specific data for PUT process. |
| (0) |
UNSIGNED |
4 |
WMGPCLCK |
Start time for rejection of non-crucial messages. |
GETMSG area
Table 4.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
52 |
WMGGET |
GETMSG data |
| (0) |
ADDRESS |
4 |
WMGGMTA |
Message transmission state data. |
| (4) |
ADDRESS |
4 |
* |
Reserved |
| (8) |
BIT(8) |
1 |
* |
Flags |
| (8) |
1... .... |
|
WMGGFASA |
Final ACTIVE status seen |
| (8) |
.111 1111 |
|
* |
Reserved |
| (9) |
UNSIGNED |
1 |
* |
Reserved |
| (A) |
CHARACTER |
2 |
WMGGRESP |
Response data - like WMSRESP. |
| (C) |
CHARACTER |
12 |
WMGGID |
Initial parameters for GETMSG process |
| (18) |
ADDRESS |
4 |
WMGGHA |
Address of hash table |
| (1C) |
FULLWORD |
4 |
WMGGINDX |
BACKUP index number |
| (20) |
FULLWORD |
4 |
WMGGINST |
BACKUP instance number |
| (24) |
ADDRESS |
4 |
WMGGWAIT |
Queue anchor waiting for MQH to post it. |
| (28) |
ADDRESS |
4 |
WMGGPOST |
Queue anchor MQH is about to post. |
| (2C) |
ADDRESS |
4 |
* |
Reserved |
| (30) |
ADDRESS |
4 |
* |
Reserved |
Hash table for message queue anchor chains.
Table 5.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
8 |
WMGGH |
| (0) |
FULLWORD |
4 |
WMGGHTNM |
Number of entries in hash table. |
| (4) |
ADDRESS |
4 |
WMGGHT (1) |
Hash table entry array |
| (4) |
1... .... |
|
WMGGHTCL |
'Closed' indicator |
PUTREQ, PUTRSP area
Table 6.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
* |
WMGRQR |
PUTREQ, PUTRSP data |
| (0) |
CHARACTER |
16 |
WMGREQQ |
PUTREQ request queue anchor area. |
| (10) |
CHARACTER |
16 |
WMGRSPQ |
PUTRSP request queue anchor area. |
| (20) |
HALFWORD |
2 |
WMGRMINC |
Minimum source channel - 0 for BACKUP, 1 for ACTIVE |
| (22) |
HALFWORD |
2 |
WMGRMAXC |
Maximum source channel - 0 for BACKUP, WSAGBN for ACTIVE. |
| (24) |
CHARACTER |
12 |
WMGRID (3) |
Initial parameters for PUTREQ, PUTRSP and RECEIVE |
| (48) |
CHARACTER |
8 |
WMGRIVN |
Target of last PUTREQ |
| (48) |
FULLWORD |
4 |
WMGRINST |
Instance number |
| (4C) |
FULLWORD |
4 |
WMGRVERN |
Version Number |
| (50) |
CHARACTER |
0 |
WMGREND |
| (50) |
CHARACTER |
4 |
WMGRQA (*) |
Channel status array |
Table 7.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
4 |
WMGRQ |
Status of channel with individual partner |
| (0) |
UNSIGNED |
1 |
WMGRQIST |
Inbound State |
| (1) |
UNSIGNED |
1 |
WMGRQOST |
Outbound State |
| (2) |
HALFWORD |
2 |
* |
Reserved |
Request Queue Anchor Block
Table 8.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
16 |
WMGQANCH |
Addressed from message manager global area. |
| (0) |
ADDRESS |
4 |
WMGQFRST |
Address of first (newest) entry in request chain. |
| (0) |
1... .... |
|
WMGQCLSD |
Service is closed |
| (4) |
ADDRESS |
4 |
WMGQLAST |
Address of last (oldest) entry in request chain. |
| (4) |
CHARACTER |
2 |
* |
| (6) |
CHARACTER |
2 |
WMGQRESP |
Termination response like WMSRESP. |
| (8) |
ADDRESS |
4 |
WMGQECB |
MVS ECB posted by issuer of request. |
| (C) |
ADDRESS |
4 |
WMGQLSEL |
Address of latest entry selected for processing |
Table 9.
| Len |
Type |
Value |
Name |
Description |
| 2 |
DECIMAL |
1 |
WMGGHTN |
Number of entries in hash table. |
Constants for WMGRQIST/WMGRQOST
|
| 1 |
DECIMAL |
0 |
WMGRQNTR |
No traffic |
| 1 |
DECIMAL |
1 |
WMGRQRSP |
Response pending |
Constants for setting WMGQCLSD and WMGGHTCL
|
| 4 |
HEX |
80000000 |
WMGQCLON |
| 4 |
HEX |
7FFFFFFF |
WMGQCLOF |