WXL - XRF LIFO stack area

      CONTROL BLOCK NAME = DFHWXLPS
      DESCRIPTIVE NAME = CICS TS (XRF) XRF LIFO Stack Areas
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1985 
      FUNCTION =
           Control data at the beginning of a block of storage from
           which XRF LIFO storage is allocated.
      LIFETIME =
           Created by GET LIFO (DFHWLGET) when a new stack block is
           acquired for an XRF process.
           Destroyed by FREE LIFO (DFHWLFRE) when a all allocations
           of LIFO in the block have been released.
           An instance is also imbedded within an XRF process block
           (DFHWXBPS) to provide a first block containing space for
           just a standard OS Save Area used when a process is first
           dispatched.
      STORAGE CLASS =
           Non-CICS storage. MVS subpool 0 storage above 16M line.
      LOCATION =
           WXBLBLKA addresses the currently active stack block for
           a given XRF process.
      INNER CONTROL BLOCKS =
           WXLAHDR Describes the allocation header which precedes
                    each individual LIFO allocation within a LIFO
                    stack block. The current allocation for a given
                    XRF process is addressed by WXBLA.
      NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS =
             None
       MODULE TYPE = Control block definition
     ------------------------------------------------------------------
      EXTERNAL REFERENCES =
        DATA AREAS =
            None
        CONTROL BLOCKS =
            WXBLBLKA
            WXBLA
        GLOBAL VARIABLES (Macro pass) =
            None
     ------------------------------------------------------------------
      Stack Block header
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 16 DFHWXLPS XRF LIFO Stack block hdr
(0) ADDRESS 4 WXLPREV Previous block address
(4) ADDRESS 4 WXLBOS Bottom of this block
(8) ADDRESS 4 WXLEOS End of this block
(C) ADDRESS 4 WXLNAB Next available byte in the block.
(10) CHARACTER 0 WXLEND
      Allocation header
Table 2.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 16 WXLAHDR XRF LIFO Allocation header
(0) CHARACTER 8 WXLAHID Module identifier
(8) ADDRESS 4 WXLAHPLA Previous LIFO allocation
(C) FULLWORD 4 WXLAHALN Length of allocation (not including this header).
(10) CHARACTER 0 WXLAHEND