WXB - XRF process block

      CONTROL BLOCK NAME = DFHWXBPS
      DESCRIPTIVE NAME = CICS TS (XRF) Process Block
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1985 
      FUNCTION =
           XRF process analogue of the CICS TCA supporting the XRF
           LIFO mechanism and process dispatching.
      LIFETIME =
           Created by XRF ATTACH (DFHWDATT) and destroyed when
           process returns (DFHWDISP).
           Artificial instances are sometimes created by other
           modules, e.g. DFHWMS10, when they wish to create an
           environment in which the XRF LIFO mechanism can be
           used, though such instances are never visible to the
           XRF process dispatcher.
      STORAGE CLASS =
           Non-CICS storage. Usually in MVS subpool 0 storage
           above 16M line.
      LOCATION =
           Conventionally addressed by R12. Those created by
           ATTACH are also on the XRF dispatcher chain WDGFXPB.
      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 144 DFHWXBPS XRF Process block (XPB)
(0) CHARACTER 48 WXBDSTAT Dispatcher state data 
     Dispatcher chain and LIFO anchors
(0) CHARACTER 24 WXBBASE Basic part
(0) ADDRESS 4 WXBCHAIN Next XPB in dispatcher chain
(4) FULLWORD 4 WXBSIZE Size of block
(8) ADDRESS 4 WXBLA Current LIFO addr
(C) ADDRESS 4 WXBGLBLA WS Global address
(10) HALFWORD 2 WXBXPBNO Process identifier
(12) BIT(16) 2 WXBPFLGS Flags
(12) 1... ....   WXBFWAIT Process issued a WAIT
(12) .1.. ....   WXBFXRF XRF Process XPB
(12) BIT(14) POS(3) 2 * Spare
(14) ADDRESS 4 WXBLBLKA Current LIFO block addr 
     Locks and events
(18) CHARACTER 24 WXBLED Lock and event data
(18) ADDRESS 4 WXBEECBA External event address
(1C) ADDRESS 4 WXBIECBA Internal event address
(20) BIT(32) 4 WXBWEVM Broadcast events waited
(24) BIT(32) 4 WXBPEVM Broadcast events posted
(28) BIT(32) 4 WXBRLKM Freed locks mask
(2C) BIT(32) 4 WXBHLKM Locks held mask 
     Dispatcher save area
(30) CHARACTER 64 WXBDSVA Dispatcher register save area.
(30) ADDRESS 4 WXBDSV00 Register 0 save slot
(34) ADDRESS 4 WXBDSV01 Register 1 save slot
(38) ADDRESS 4 WXBDSV02 Register 2 save slot
(3C) ADDRESS 4 WXBDSV03 Register 3 save slot
(40) ADDRESS 4 WXBDSV04 Register 4 save slot
(44) ADDRESS 4 WXBDSV05 Register 5 save slot
(48) ADDRESS 4 WXBDSV06 Register 6 save slot
(4C) ADDRESS 4 WXBDSV07 Register 7 save slot
(50) ADDRESS 4 WXBDSV08 Register 8 save slot
(54) ADDRESS 4 WXBDSV09 Register 9 save slot
(58) ADDRESS 4 WXBDSV10 Register 10 save slot
(5C) ADDRESS 4 WXBDSV11 Register 11 save slot
(60) ADDRESS 4 WXBDSV12 Register 12 save slot
(64) ADDRESS 4 WXBDSV13 Register 13 save slot
(68) ADDRESS 4 WXBDSV14 Register 14 save slot
(6C) ADDRESS 4 WXBDSV15 Register 15 save slot 
     Data from ATTACH
(70) ADDRESS 4 WXBIDA Initial data parameter
(74) ADDRESS 4 WXBESPIE ESPIE exit address
(78) ADDRESS 4 WXBESPDA ESPIE parameter
(7C) ADDRESS 4 WXBESTAE ESTAE exit address
(80) ADDRESS 4 WXBESTDA ESTAE parameter
(84) ADDRESS 4 * (3) Reserved 
     Dummy stack block starts at end of XPB.
(90) CHARACTER 0 WXBISB Dummy stack block 
       Overlay of status used when XPB is a dummy built simply to
       gain access to LIFO support.
Table 2.
Offset Hex Type Len Name (Dim) Description
(18) STRUCTURE 8 WXBCICS
(18) ADDRESS 4 WXBTCA TCA address of task which is using this XPB.
(1C) ADDRESS 4 WXBCSA CSA address

Constants

Table 3.
Len Type Value Name Description 
     Special process number values (WXBXPBNO).
2 DECIMAL -1 WXBPNDSP Dispatcher pseudo-process
2 DECIMAL -2 WXBPNSRP Error pseudo-process