PSG - System spooling interface

      CONTROL BLOCK NAME = DFHPSGPS
       DESCRIPTIVE NAME = CICS TS System Spooling Interface
                          Global Control Block.
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1984, 1995 
      FUNCTION =
         DFHPSGPS (PSG) is the master control block for the System
         Spooling Interface facility.
       Description
         PSG - This Block contains the central control information
                through which the System Spooling Interface works.
                It is anchored from CSAPSCBA in the CSA Optional
                Features List.
      LIFETIME =
           If SPOOL=YES is specified at CICS Initialization, then
           control will be passed to DFHPSIP from DFHSIJ1. PSIP will
           construct and intialize DFHPSGPS, which will remain in
           existence all the time that CICS is running.
      STORAGE CLASS = shared
      LOCATION =
           Chained off CSA optional features list by CSAPSCBA
      INNER CONTROL BLOCKS = NONE
      NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS = NONE
       MODULE TYPE = PLS copy-book
     ------------------------------------------------------------------
      EXTERNAL REFERENCES = none
        DATA AREAS = none
        CONTROL BLOCKS = none
        GLOBAL VARIABLES (Macro pass) = none
     ------------------------------------------------------------------
                                        getmained by JES as commarea
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 208 DFHPSGPS
(0) CHARACTER 4 * Storage accounting area
(4) CHARACTER 8 PSGID Control block ID - DFHPSGPS. The following VSAM info. is used by DFHPSIP & DFHPSPSS:
(C) HALFWORD 2 PSGACBL Length of VSAM ACB
(E) HALFWORD 2 PSGRPLL Length of VSAM RPL
(10) HALFWORD 2 PSGEXLL Length of VSAM EXIT LIST
(12) HALFWORD 2 * Reserved
(14) FULLWORD 4 PSGOPNCT Count of JES files OPEN-ed
(18) FULLWORD 4 PSGCLSCT Count of JES files CLOSE-ed
(1C) ADDRESS 4 * Reserved
(20) ADDRESS 4 * Reserved
(24) FULLWORD 4 PSGNXTK Next Report Token
(28) CHARACTER 4 PSGJTFL Job transfer flags
(28) CHARACTER 1 PSGTHRD In-Use flag for SGL thread
(29) CHARACTER 3 * Reserved
(2C) CHARACTER 4 *
(2C) BIT(8) 1 PSGFE Extra service facilities
(2C) 1... ....   PSGFETR Additional trace required
(2C) .111 111.   * Reserved
(2C) .... ...1   PSGFECH Enable FE Chain checking
(2D) CHARACTER 3 * Reserved
(30) ADDRESS 4 PSGCRB Reserved
(34) ADDRESS 4 PSGCSAA CSA address save area
(38) HALFWORD 2 PSGOSLC Operating system lines per page
(3A) CHARACTER 8 PSGFLGS CICS Sub-system Interface control status flags
(3A) CHARACTER 1 PSGIACT CICS SSI is active/enabled
(3B) CHARACTER 1 PSGIENA CICS SSI is being enabled
(3C) CHARACTER 1 PSGIDIS CICS SSI is being disabled
(3D) CHARACTER 1 PSGITRM CICS SSI is being terminated
(3E) CHARACTER 1 PSGIDIP Reserved
(3F) CHARACTER 1 PSGIDPP Reserved
(40) CHARACTER 1 PSGCLAS Reserved
(41) CHARACTER 1 PSGSYSID Reserved
(42) CHARACTER 2 * Reserved
(44) ADDRESS 4 PSGRRB Reserved
(48) ADDRESS 4 PSGTRB Reserved
(4C) ADDRESS 4 PSGWRB Reserved
(50) ADDRESS 4 * Reserved
(54) ADDRESS 4 * Reserved
(58) ADDRESS 4 * Reserved
(5C) CHARACTER 47 PSGSTAT CICS SSI statistics area
(5C) CHARACTER 3 PSGSCRS Reserved
(5F) CHARACTER 3 PSGSCRR Reserved
(62) CHARACTER 3 PSGSCRC Reserved
(65) CHARACTER 4 PSGSOR Reserved
(69) CHARACTER 3 PSGSERS Reserved
(6C) CHARACTER 3 PSGSERC Reserved
(6F) CHARACTER 3 PSGSLR Reserved
(72) CHARACTER 3 PSGSPI Reserved
(75) CHARACTER 3 PSGSTD Reserved
(78) CHARACTER 3 PSGSER Reserved
(7B) CHARACTER 4 PSGDDAT Date SSI last ended
(7F) CHARACTER 4 PSGDTIM Time SSI last ended
(83) CHARACTER 4 PSGEDAT Date SSI last started
(87) CHARACTER 4 PSGETIM Time SSI last started
(8B) CHARACTER 10 PSGIDENT Reserved
(8B) CHARACTER 8 PSGXIDK Reserved
(93) CHARACTER 2 PSGITID Reserved
(95) BIT(8) 1 PSGNFYE Reserved
(96) CHARACTER 3 * Reserved
(9C) ADDRESS 4 PSGCXPB CXPB TCA address
(A0) CHARACTER 44 PSGIDSN Input DSNAME
(CC) ADDRESS 4 * Reserved

Constants

Table 2.
Len Type Value Name Description
     PSGFLAG - general Sub-system Interface flags
1 HEX FF PSGON Flag is on.
1 HEX 00 PSGOFF Flag is off.