FCTSR - File control shared resources

    CONTROL BLOCK NAME = DFHFCTSR
    DESCRIPTIVE NAME = CICS TS FCT SHARED RESOURCES CONTROL BLOCK
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1982, 2013 
    FUNCTION =
           To represent CICS's requirements of, and use made of,
           a VSAM local shared resources pool.
           Part of FILE CONTROL (the database component).
           There is one instance for each pool mentioned in the
           FCT, ie up to a maximum of 255 pools.
    LIFETIME & STORAGE CLASS =
           Same as the rest of the FCT.
    LOCATION =
           By pointers and identifying numbers, all within the FCT.
    INNER CONTROL BLOCKS =
           None in the strict sense.
           Certain fields repeat others defined in DFHFCSBK,
           and can be used as a work area.
    NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS = None.
       MODULE TYPE = Control block definition
   ---------------------------------------------------------------------
    EXTERNAL REFERENCES =
        DATA AREAS =
            The six fields named FCTVR... are all defined over
            the list-form of VSAM macro BLDVRP.
        CONTROL BLOCKS =
                 None.
        GLOBAL VARIABLES (Macro pass) = Used only for splitting source.
   ---------------------------------------------------------------------
                    FILE CONTROL TABLE
                 SHARED RESOURCES CONTROL
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHFCTSR VSAM SHARED RESOURCES CONTROL
(0) CHARACTER 8 FCTSRGRP (0) (RDO group name)
(0) CHARACTER 8   SHARED RESOURCES CONTROL EYE-CATCHER
(8) BITSTRING 1 FCTSRCSN (0) String num. status (next build)
(8) 1... ....   FCTCPSTN "X'80'" MUST COMPUTE STRING NUMBER
(8) BITSTRING 1 FCTSRCKL (0) Key length status (next build)
(8) .1.. ....   FCTCPKYL "X'40'" MUST COMPUTE LENGTH FOR KEYS
(8) BITSTRING 1 FCTSRCCI (0) CI size sataus (next build)
(8) ..1. ....   FCTCPCIS "X'20'" MUST COMPUTE CI SIZES
(8) BITSTRING 1 FCTSRNDI (0) Data/index buffer status (next build)
(8) ...1 ....   FCTSRNSP "X'10'" Use separate buffers
(8) BITSTRING 1   Next build control flags
(9) FULLWORD 1 FCTSRPID NUMERICAL POOL IDENTIFIER
(A) HALFWORD 2 FCTSRUC NUMBER OF OPEN ACBs ON THE POOL
(C) ADDRESS 4 FCTSRBWC BUFFER WAIT CHAIN START
(10) FULLWORD 4   # CS Failures
(14) ADDRESS 4 FCTSRTSC Transaction ID suspend chain
(18) HALFWORD 2 FCTSRPCT PERCENTILE VALUE
(1A) HALFWORD 2   RESERVED
(1C) HALFWORD 2 FCTSRNKL KEY LENGTH FOR NEXT BUILD
(1E) HALFWORD 2 FCTSRNST STRING NUMBER FOR NEXT BUILD
(20) FULLWORD 4 FCTSRCHN String wait chain
(24) CHARACTER 8 FCTSRCTD STCK Creation Time
(2C) CHARACTER 8 FCTSRDTD STCK Deletion Time
(34) HALFWORD 2 FCTSRKYL COMPUTED KEY LENGTH
(36) HALFWORD 2 FCTSRSTN COMPUTED NUMBER OF STRINGS
(38) HALFWORD 2   RESERVED
(3A) HALFWORD 2   RESERVED
(3C) BITSTRING 1 FCTSRNBB NO BUFFER byte
(3C) 1... ....   FCTSRNBF "X'80'" This BIT requires own BYTE
(3D) CHARACTER 3   reserved
(40) FULLWORD 4 FCTSRMAP WRTBFR TRANSID USE MAP
(44) BITSTRING 1 FCTSRSDI (0) Separate DATA/INDEX buffers
(44) 1... ....   FCTSRSEP "X'80'" Use separate buffers (was 10)
(44) BITSTRING 1 FCTSRERR (0) ERROR BUILDING POOL
(44) .1.. ....   FCTSRDMP "X'40'" FORMATTED DUMP ISSUED (was 02)
(44) BITSTRING 1 FCTSRPST (0) STATUS OF THIS POOL
(44) ..1. ....   FCTSRBLT "X'20'" POOL IS BUILT (was 01)
(44) BITSTRING 1   Current build control flags
(45) CHARACTER 3   Reserved
(48) FULLWORD 4 FCTSRHAS HIGHEST # ACTIVE STRINGS
(4C) FULLWORD 4   # CS Failures
(50) FULLWORD 4 FCTSRHSW HIGHEST # WAITED FOR STRING
(54) FULLWORD 4   # CS Failures
(58) FULLWORD 4 FCTSRTSW TOTAL # WAITED FOR STRING
(5C) FULLWORD 4   # CS Failures
(60) FULLWORD 4 FCTSRNAS # ACTIVE STRINGS
(64) FULLWORD 4   # CS Failures
(68) FULLWORD 4 FCTSRCSW CURRENT # WAITING FOR STRING
(6C) FULLWORD 4   # CS Failures
(70) FULLWORD 4 FCTSR_LOCK_TOKEN Pool lock token
(74) FULLWORD 4 FCTSRCIS (0) FORMAT OF REPEATING FIELDS
(74) ADDRESS 2 FCTSRBSZ Buffer size
(76) HALFWORD 2 FCTSRVBN Virtual buffers this build
(78) FULLWORD 4 FCTSRVBX Virtual buffers next build
(7C) FULLWORD 4 FCTSRHBN Hiperspace bufs this build
(80) FULLWORD 4 FCTSRHBX Hiperspace bufs next build
(84) FULLWORD 4 FCTSRBFF NUMBER OF LOOK-ASIDE HITS
(88) FULLWORD 4 FCTSRFRD NUMBER OF BUFFER READS
(8C) FULLWORD 4 FCTSRUIW NO OF USER INITIATED WRITES
(90) FULLWORD 4 FCTSRNUW NO OF NON-USER INITIATED WRITES
(94) FULLWORD 4 FCTSRCRS Number successful CREADS
(98) FULLWORD 4 FCTSRCWS Number successful CWRITES
(9C) FULLWORD 4 FCTSRCRF Number failing CREADS
(A0) FULLWORD 4 FCTSRCWF Number failing CWRITES
(A0) ..11 ....   FCTSRCIL "*-FCTSRCIS" LENGTH OF BUFFER SIZE ENTRY
(74) BITSTRING 1 FCTSR512_DATA (0) 512 CI'S NUMBER AND STATISTICS
(A4) BITSTRING 1 FCTSR1K_DATA (0) 1K CI'S NUMBER AND STATISTICS
(D4) BITSTRING 1 FCTSR2K_DATA (0) 2K CI'S NUMBER AND STATISTICS
(104) BITSTRING 1 FCTSR4K_DATA (0) 4K CI'S NUMBER AND STATISTICS
(134) BITSTRING 1 FCTSR8K_DATA (0) 8K CI'S NUMBER AND STATISTICS
(164) BITSTRING 1 FCTSR12K_DATA (0) 12K CI'S NUMBER AND STATISTICS
(194) BITSTRING 1 FCTSR16K_DATA (0) 16K CI'S NUMBER AND STATISTICS
(1C4) BITSTRING 1 FCTSR20K_DATA (0) 20K CI'S NUMBER AND STATISTICS
(1F4) BITSTRING 1 FCTSR24K_DATA (0) 24K CI'S NUMBER AND STATISTICS
(224) BITSTRING 1 FCTSR28K_DATA (0) 28K CI'S NUMBER AND STATISTICS
(254) BITSTRING 1 FCTSR32K_DATA (0) 32K CI'S NUMBER AND STATISTICS
(254) 0 FCTSRRFL "(*-FCTSRCIS)" Length of repeating fields
(254) .... 1.11   FCTSRNCI "(FCTSRRFL/FCTSRCIL)" Number of CI sizes
(284) BITSTRING 1 FCTSR512_INDX (0) 512 CI'S NUMBER AND STATISTICS
(2B4) BITSTRING 1 FCTSR1K_INDX (0) 1K CI'S NUMBER AND STATISTICS
(2E4) BITSTRING 1 FCTSR2K_INDX (0) 2K CI'S NUMBER AND STATISTICS
(314) BITSTRING 1 FCTSR4K_INDX (0) 4K CI'S NUMBER AND STATISTICS
(344) BITSTRING 1 FCTSR8K_INDX (0) 8K CI'S NUMBER AND STATISTICS
(374) BITSTRING 1 FCTSR12K_INDX (0) 12K CI'S NUMBER AND STATISTICS
(3A4) BITSTRING 1 FCTSR16K_INDX (0) 16K CI'S NUMBER AND STATISTICS
(3D4) BITSTRING 1 FCTSR20K_INDX (0) 20K CI'S NUMBER AND STATISTICS
(404) BITSTRING 1 FCTSR24K_INDX (0) 24K CI'S NUMBER AND STATISTICS
(434) BITSTRING 1 FCTSR28K_INDX (0) 28K CI'S NUMBER AND STATISTICS
(464) BITSTRING 1 FCTSR32K_INDX (0) 32K CI'S NUMBER AND STATISTICS
(494) 0 FCTSRLNG "*-DFHFCTSR" RESOURCE CONTROL ENTRY LENGTH