CONTROL BLOCK NAME = DFHWCSDS
NAME OF MATCHING PLS CONTROL BLOCK = DFHWCSPS
DESCRIPTIVE NAME = CICS TS (XRF) - CAVM Static Control Block
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1985, 1987
FUNCTION =
The CAVM Static Control Block provides a common anchor to
enable CAVM State Management and Message Management
functions to be invoked from code running in a CICS
environment. It resides below the 16M line and includes
the few items of CAVM data referenced by AMODE 24 routines.
Each XRF system contains a single CAVM Static Control Block.
LIFETIME =
The CAVM Static Control Block is created by DFHWSSN1 at
the beginning of SIGNON and destroyed by DFHWSRTR at the
end of SIGNOFF.
STORAGE CLASS =
Non-CICS storage. In MVS subpool 0 below 16M line.
LOCATION =
Fields SSAXRF in the CICS SSA (DFHSSADS) and WCGSTATA in
the CAVM Global Control Block (DFHWCGDS) both contain a
pointer to the CAVM Static Control Block.
INNER CONTROL BLOCKS =
None.
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS =
None.
MODULE TYPE = Control block definition
--------------------------------------------------------------------
EXTERNAL REFERENCES =
None.
DATA AREAS =
None.
CONTROL BLOCKS =
None.
GLOBAL VARIABLES (Macro pass) =
None.
--------------------------------------------------------------------
Table 1.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
0 |
DFHWCSDS |
CAVM Static Control Block |
(0) |
CHARACTER |
8 |
WCSIDENT |
Eye Catcher XRF-STAT |
(8) |
ADDRESS |
4 |
WCSGLBLA |
Pointer to CAVM Global Control Block |
(C) |
ADDRESS |
4 |
WCSXTCBP |
Pointer to CAVM TCB |
(10) |
ADDRESS |
4 |
WCSETECB |
End of task ECB for CAVM TCB |
(14) |
BITSTRING |
1 |
WCSSMRST |
State Management record status |
(14) |
.... .... |
|
WCSSSOFN |
"0" Signed off normally or did not sign on (must be zero) |
(14) |
.... ...1 |
|
WCSSSON |
"1" Signed on |
(14) |
.... ..1. |
|
WCSSSOFA |
"2" Signed off abnormally |
(14) |
1... ...1 |
|
WCSSSNIP |
"X'81'" SIGNON in progress |
(14) |
1111 1111 |
|
WCSSSFIP |
"X'FF'" SIGNOFF in progress |
(15) |
BITSTRING |
1 |
WCSCSAVM |
CAVM Services available mask |
(15) |
1... .... |
|
WCSSMMAV |
"X'80'" State and message management services are available |
(15) |
.1.. .... |
|
WCSPUTAV |
"X'40'" Message management PUT is available |
(16) |
HALFWORD |
2 |
WCSSOFML |
Length of TAKEOVER message for ACTIVE job if it signs off during TAKEOVER |
(18) |
ADDRESS |
4 |
WCSSOFMP |
Pointer to TAKEOVER message for ACTIVE job |
(1C) |
ADDRESS |
4 |
WCSTCECB |
TAKEOVER response or SIGNON ECB |
(20) |
ADDRESS |
4 |
WCSTXECB |
TAKEOVER request ECB |
(24) |
ADDRESS |
4 |
WCSTKVPP |
Pointer to TAKEOVER parameter area |
(28) |
HALFWORD |
2 |
WCSRESP (0) |
(28) |
FULLWORD |
1 |
|
Response code for CAVM request |
(29) |
FULLWORD |
1 |
WCSREASC |
Reason code for CAVM request |
(2A) |
BITSTRING |
1 |
WCSTKRID |
TAKEOVER request ID |
(2B) |
CHARACTER |
1 |
WCSSOFCD |
SIGNOFF code (normal or abnormal) |
(2B) |
11.. ...1 |
|
WCSRSOFA |
"C'A'" Request for SIGNOFF ABNORMAL |
(2B) |
11.1 .1.1 |
|
WCSRSOFN |
"C'N'" Request for SIGNOFF NORMAL |
(2C) |
ADDRESS |
4 |
|
Reserved |
(30) |
ADDRESS |
4 |
WCSACSVC |
Pointer to CSVC's SVC instruction in the CICS CSA |
(30) |
..11 .1.. |
|
WCSL |
"*-DFHWCSDS" |
Table 2.
Offset Hex |
Type |
Len |
Name (Dim) |
Description |
(0) |
STRUCTURE |
0 |
WCSENTAB |
Entry point table for code below 16M |
(0) |
ADDRESS |
4 |
WCSEMS |
Message management services EPA |
(4) |
ADDRESS |
4 |
|
Not used |
(8) |
ADDRESS |
4 |
|
Not used |