CRB - Cross region block

      CONTROL BLOCK NAME = DFHCRBPS
      DESCRIPTIVE NAME = CICS TS Cross Region Block
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1992 
      FUNCTION =
           This DSECT describes the CICS region block, which is
           used by the CICS inter-region communication facility.
           The block is used to control inter-region activity
           at a global level, as opposed to controlling the
           activity of individual links with other regions.
           The conversational TCTTE (hung off the 'ISLINK'
           system entry in the TCT) is the block which
           controls individual 'conversations' between CICS
           and other regions.
           The CRB is allocated when the facility is started
           up (by the start-up program, DFHCRSP), and freed when
           the facility is shut down (via the IS LOGOFF COMMND).
           The block contains, amongst other things, argument
           lists and other information required to communicate
           with the inter-region SVC (DFHIRCP)
      LIFETIME =
      STORAGE CLASS =
      LOCATION =
      INNER CONTROL BLOCKS =
      NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS =
       MODULE TYPE = Control block definition
     ------------------------------------------------------------------
      EXTERNAL REFERENCES =
        DATA AREAS =
        CONTROL BLOCKS =
        GLOBAL VARIABLES (Macro pass) =
     ------------------------------------------------------------------
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 112 DFHCRBDS
(0) CHARACTER 8 CRBEYE Eyecatcher
(8) FULLWORD 4 CRBSVCLS ALIST FOR SVC FULL WORD ALIGNMENT
(C) CHARACTER 40 CRBSVCSB SUBLIST FOR SVC
(34) ADDRESS 4 * Reserved
(38) FULLWORD 4 CRBUSID SVC USER ID ALLOC'D TO CICS
(3C) ADDRESS 4 CRBSLCB A(SVC'S SLCB CTL BLOCK)
(40) CHARACTER 8 CRBIMQTK Immed queue token for queue manager
(48) CHARACTER 8 CRBDLQTK Delay queue token for queue manager
(50) CHARACTER 8 CRBSTASV SAVE REGS 13, 14 IN STAE
(50) FULLWORD 4 * REGS 13
(54) FULLWORD 4 * REGS 14
(58) HALFWORD 2 CRBSVCIN INSTR TO INVOKE INTER-RGN SVC
(5A) CHARACTER 2 * Reserved
(5C) BIT(8) 1 CRBFLG1 FLAG BYTE
(5C) 1... ....   * 80 reserved
(5C) .1.. ....   CRBSCSMT 40 SUPPRESS 'QUIESCE COMPLETE' MSG TO CSMT IN CSNC. (THIS BIT SET WHEN INTER-RGN FCLY STOPPED BY STP OR SRP)
(5C) ..1. ....   * 20 reserved
(5C) ...1 ....   * 10 reserved
(5C) .... 1...   CRBABND 08 CSNC HAS ABENDED- NRML SHUT MUSTN'T ISSUE IS STOPNML
(5D) CHARACTER 3 * alignment
(60) ADDRESS 4 * Reserved
(64) ADDRESS 4 CRBDSTOK DS token for work exit
(68) CHARACTER 8 CRBMPTOK MP rule token