WSR - XRF CAVM surveillance

    CONTROL BLOCK NAME = DFHWSRDS
    NAME OF MATCHING PLS CONTROL BLOCK = None
    DESCRIPTIVE NAME = CICS TS (XRF) - CAVM Surveillance
                                            Communications Area
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1985, 1990 
    FUNCTION =
           The Surveillance Communications Areas are needed to allow
           the 4 independent CAVM surveillance processes (2 status
           writers and 2 status readers) to share some common data.
           In each XRF system, there are separate Surveillance
           Communications Areas referring to each actual or potential
           partner XRF system as well as a single Surveillance
           Communications Area referring to that system itself.
           The Status Record Header contains a TOD clock reading used
           in clock difference calculations and a sequence number used
           to determine which of two status records contains the more
           up-to-date information. It is built immediately before
           writing an XRF system's status to its Status CI in the
           CAVM Control Data Set or Message Data Set.
    LIFETIME =
           All the Surveillance Communications Areas in a given XRF
           system are created at the same time during CAVM SIGNON by
           DFHWSSN2.
    STORAGE CLASS =
           Non-CICS storage. In MVS subpool 0 above 16M line.
    LOCATION =
           Field WSADSRCP in each Public Status Area Descriptor (WSAD)
           contains a pointer to the corresponding XRF system's
           Surveillance Communications Area.
    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 SRHEADER Status Record Header
(0) DBL WORD 8 SRHTOD Latest TOD clock reading
(8) FULLWORD 4 SRHSEQ# Sequence number of Status Write
(8) .... 11..   SRHEADRL "*-SRHEADER" Length of Status Record Header
(8) .... 11..   SRHWSAS "*" Start of common shared section of Status (WSAS)
Table 2.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 SRVCOM Surveillance Communications Area
(0) CHARACTER 1 SRVCHBOD Indicator that 'heart-beat overdue' NOTIFY has been issued
(1) CHARACTER 1 SRVCSOFA Indicator that 'sign-off' abnormal NOTIFY has been issued
(2) CHARACTER 1 SRVCSVCF Indicator that DFH6646 msg has been issued as a result of SVC failureL1A
(3) BITSTRING 1 SRVCHBPM 'Heart-beat' position mask showing which CAVM file is being read to track this partner's 'heart-beat'
(4) BITSTRING 1 SRVCHBLM 'Heart-beat' late mask showing which files have been read without finding this partner's 'heart-beat'
(5) BITSTRING 1 SRVCIOEM I/O error mask showing which files have had an I/O error during the last read or write of this status CI
(8) FULLWORD 4 SRVCLIHT TOD when most recent indication that this partner's 'INQUIRE HEALTH' exit had run was detected
(C) FULLWORD 4 SRVCPBS# Status write sequence no. of Public Status
(10) FULLWORD 4 SRVCLS#P Sequence no. of latest status read from or written to the control file
(14) FULLWORD 4 SRVCLS#S Sequence no. of latest status read from or written to the message file
(14) ...1 1...   SRVCOML "*-SRVCOM"