XRH - Extended recovery facility

      CONTROL BLOCK NAME = DFHXRHPS
      DESCRIPTIVE NAME = CICS TS - Extended Recovery Facility
                              XRP - Health Data Definition
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1986 
      FUNCTION =
           DFHXRHPS contains the PL/S structure that describes
           the XRF health data managed by CICS.
           XRF health data can be set by
             1. DFHXRA
             2. DFHXRC
             3. DFHXRCP
             4. DFHXRSP
           DFHXRC, the health exit routine, passes XRF health
           data to the CAVM from whence it is written as part
           of the CAVM status data.
      LIFETIME =
           There is only one instance of the control block - it
           forms part of XRP static storage which is allocated
           by DFHSIB1.
      STORAGE CLASS =
           The control block forms part of XRP static storage.
      LOCATION =
           The control block is addressed from XRSAXRHD in XRP
           static storage.
      INNER CONTROL BLOCKS =
           There are no inner control blocks.
      NOTES :
       DEPENDENCIES =
           S/370
       RESTRICTIONS =
           There are no restrictions.
       MODULE TYPE =
           Control block definition.
           PLS/3
     ------------------------------------------------------------------
      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 52 DFHXRHPS
(0) CHARACTER 8 XRHDPFX - prefix
(8) CHARACTER 16 * - "general" values
(8) CHARACTER 8 XRHDGAPL - generic applid
(10) CHARACTER 8 XRHDSAPL - specific applid
(18) CHARACTER 4 * - "control" values
(18) CHARACTER 1 XRHDTAK - TAKEOVER
(19) CHARACTER 1 XRHDSUR - SURVEILLANCE
(1A) HALFWORD 2 * - not used
(1C) CHARACTER 16 * - "control" values
(1C) FULLWORD 4 XRHDADI - ADI
(20) FULLWORD 4 XRHDJDI - JESDI
(24) FULLWORD 4 XRHDPDI - PDI
(28) FULLWORD 4 XRHDHBI - heartbeat interval
(2C) CHARACTER 8 * - "clock" data
(2C) FULLWORD 4 XRHDCLK1 - "clock" for DFHXRSP - CICS TCB "time stamp"
(30) FULLWORD 4 XRHDCLK2 - "clock" for DFHXRC - CAVM TCB "time stamp"
(34) CHARACTER 0 XRHDEND
       Error data definition
Table 2.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 72 XRHE
(0) FULLWORD 4 XRHDNRER - total number
(4) FULLWORD 4 XRHDIRER - latest error - index to *
(8) CHARACTER 8 XRHDRERR (8) - errors
(8) CHARACTER 4 XRHDDOMI - domain id
(C) CHARACTER 4 XRHDERRI - error id
       Extension descriptor
Table 3.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 8 XRHX
(0) CHARACTER 4 * - not used - 0
(4) HALFWORD 2 XRHXGN - no. global elements
(6) CHARACTER 2 * - not used - 0
(8) CHARACTER 0 XRHXEND
       Health work element
Table 4.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 84 XRHW
(0) ADDRESS 4 XRHWNEXT Chain (when free)
(0) BIT(16) 2 XRHWFLG Flags (when in use)
(0) 1... ....   XRHWFSET Data already passed to CAVM surveillance.
(2) BIT(16) 2 * Not used
(4) CHARACTER 72 XRHWE Error data
(4C) CHARACTER 8 XRHWX Extension data
(54) CHARACTER 0 XRHWEND Start of global data
       Global element definition
Table 5.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE * XRHG
(0) CHARACTER 8 XRHGP Prefix
(0) HALFWORD 2 XRHGLTH Total length of entry
(2) BIT(16) 2 XRHGFLG Flags
(2) 1... ....   XRHGFALT - created when alt.
(4) CHARACTER 4 XRHGDOMI Domain id
(8) CHARACTER * XRHGDATA Data
Table 6.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE * XRHGD Data part
(0) CHARACTER 4 XRHGDP Prefix
(0) HALFWORD 2 XRHGDDLN Data length
(2) HALFWORD 2 * Reserved - 0
(4) CHARACTER * XRHGDTXT Data text