FCT - File control table entry layout

    CONTROL BLOCK NAME = DFHFCTDS
     DESCRIPTIVE NAME = CICS/ESA FILE CONTROL TABLE ENTRY LAYOUT
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1982, 2014 
     FUNCTION =
           To map an entry in the File Control Table.
           The File Control Table is the principal repository of
           definitions of the database (or FILE) component.
           Other modules access it at their peril.
           Each entry ordinarily matches a call of the DFHFCT macro,
           and describes a database file.
           There is another dsect (DFHFCTSR) to treat shared resource
           pools, which appear in another connected table.
           The following fields form part of the Product Sensitive
           Programming Interface:
                    FCTDSID
                    FCTDSVR1 to FCTDSKL
                    FCTDSRKP
                    FCTDSJID
                    FCTDSDP
                    FCTDSBCP
                    Bit settings FCTKSDS,FCTESDS,FCTRRDS of FCTVSVR1
                    Bit settings FCTJFR, FCTJWAC of byte FCTDSVR6
                    FCTDSREC
                    FCTDSBLK
                    FCTDTSIZ
    LIFETIME =
           FCT entries are created at File Control restart and are
           always present thereafter.
    STORAGE CLASS =
           Part of the CICS nucleus.
    LOCATION =
           By the Table Management Program.
    INNER CONTROL BLOCKS =
           None. There are some fields with alternative meanings.
    NOTES :
       DEPENDENCIES = S/370
       RESTRICTIONS = Sequence symbols must not coincide with any that
           are used by objects that imbed this; in particular, the
           prefix .FC causes the Assembler to loop.
       MODULE TYPE = Control block definition
                         FILE CONTROL TABLE
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHFCTDS DUMMY SECTION FILE CONTROL TABLE 
                         FCTE prefix
(0) CHARACTER 8 FCTDSID File identification
(8) CHARACTER 8 FCTRFILE Remote file id
(10) CHARACTER 4 FCTSYSID Sysid of remote file
(14) ADDRESS 2 FCTDSTEL Table entry length 
                      DATA SET CONTROL INDICATOR 1
             All 'Capabilities' (as derived from SERVREQ)
(16) BITSTRING 1 FCTDSVR1 DATA SET CONTROL INDICATOR 1
(16) ...1 .11.   FCTDSRI "FCTDSVR1" READ INDICATOR
(16) 1... ....   FCTRDIM "X'80'" READ VALID
(16) ...1 .11.   FCTDSUPD "FCTDSVR1" READ UPDATE INDICATOR
(16) ..1. ....   FCTUPDIM "X'20'" UPDATE VALID
(16) ...1 .11.   FCTDSADD "FCTDSVR1" WRITE NEW RECORD INDICATOR
(16) ...1 ....   FCTADDIM "X'10'" ADD VALID
(16) ...1 .11.   FCTDSDI "FCTDSVR1" DELETION VALIDITY INDICATOR
(16) .... 1...   FCTDELIM "X'08'" DELETE VALID
(16) ...1 .11.   FCTBRWSE "FCTDSVR1" BROWSE VALIDITY INDICATOR
(16) .... ..1.   FCTBRZIM "X'02'" BROWSE VALID 
                     DATA SET CONTROL INDICATOR 2
         Flags relating to structure of records (mainly BDAM)
(17) BITSTRING 1 FCTDSVR2 DATA SET CONTROL INDICATOR 2
(17) ...1 .111   FCTDSEXC "FCTDSVR2" EXCLUSIVE CONTROL INDICATOR
(17) 1... ....   FCTEXCIM "X'80'" EXCLUSIVE CONTROL (BDAM)
(17) .1.. ....   FCT_SET_AFTER "X'40'" Acquire SET storage after file request is complete
(17) ...1 .111   FCTDSDRT "FCTDSVR2" DECIMAL RELATIVE TRACK INDICATOR
(17) ...1 ....   FCTDRTIM "X'10'" DECIMAL RELATIVE TRACK ACCESSING
(17) ...1 .111   FCTDSVLI "FCTDSVR2" RECORD LENGTH TYPE INDICATOR
(17) .... 1...   FCTVRLIM "X'08'" VARIABLE LENGTH RECORDS
(17) .... .1..   FCTFIXIM "X'04'" FIXED LENGTH RECORDS
(17) ...1 .111   FCTDSNBK "FCTDSVR2" RECORD BLOCKING INDICATOR
(17) .... ..1.   FCTBLKIM "X'02'" BLOCKED RECORDS
(17) ...1 .111   FCTDSKEY "FCTDSVR2" BDAM KEY SEARCH INDICATOR
(17) .... ...1   FCTKEYIM "X'01'" KEYED BDAM 
                     DATA SET CONTROL INDICATOR 3
                   Flags defining the access method
(18) BITSTRING 1 FCTDSVR3 DATA SET CONTROL INDICATOR 3
(18) ...1 1...   FCTDSVSM "FCTDSVR3" VSAM INDICATOR
(18) 1... ....   FCTVSAMI "X'80'" VSAM DATA SET
(18) .1.. ....   FCTDTBL "X'40'" Data table
(18) ..1. ....   FCTDTUM "X'20'" User data table
(18) .... 1...   FCTREMOT "X'08'" Remote FCTE
(18) .... .1..   FCTRLS "X'04'" RLS file
(18) .... ..1.   FCTCFDT "X'02'" Coupling Facility Data Table
(18) ...1 1...   FCTDSBDM "FCTDSVR3" BDAM DATA SET INDICATOR
(18) .... ...1   FCTBDAMI "X'01'" BDAM DATA SET 
                      DATA SET CONTROL INDICATOR 4
               Flags to govern journalling and logging.
(19) BITSTRING 1 FCTDSVR4 DATA SET CONTROL INDICATOR 4
(19) ...1 1..1   FCTDSJRO "FCTDSVR4" JOURNAL READ ONLYS INDICATOR
(19) 1... ....   FCTJRO "X'80'" JOURNAL READ ONLYS
(19) ...1 1..1   FCTDSJRU "FCTDSVR4" JOURNAL READS FOR UPDATE INDICATOR
(19) .1.. ....   FCTJRU "X'40'" JOURNAL READS FOR UPDATE
(19) ...1 1..1   FCTDSJWU "FCTDSVR4" JOURNAL WRITE UPDATES INDICATOR
(19) ..1. ....   FCTJWU "X'20'" JOURNAL WRITE UPDATES
(19) ...1 1..1   FCTDSJWA "FCTDSVR4" JOURNAL WRITE ADDS INDICATOR
(19) ...1 ....   FCTJWA "X'10'" JOURNAL WRITE ADDS
(19) ...1 1..1   FCTDSJDS "FCTDSVR4" DSNAME HAS BEEN JOURNALLED IND
(19) ...1 1..1   FCTDSJSY "FCTDSVR4" SYNCHRONOUS READS JOURNAL INDICATOR
(19) .... .1..   FCTJSYN "X'04'" SYNCHRONOUS READS JOURNAL
(19) ...1 1..1   FCTDSJAS "FCTDSVR4" ASYNCHRONOUS WRITES JRNL INDICATOR
(19) .... ..1.   FCTJASY "X'02'" ASYNCHRONOUS WRITES JOURNAL
(19) ...1 1..1   FCTDSLOG "FCTDSVR4" USE SYSTEM LOG INDICATOR
(19) .... ...1   FCTLOG "X'01'" USE SYSTEM LOG 
                          FILE STATE
      THE NEW FILE STATES ALLOW FOR "TRANSITIONAL" CONDITIONS.
       IF " TM FCTDSTAT,FCTDSENI" YIELDS "ONES", THEN I/O REQUESTS
        ARE ALLOWED, EVEN IF THE TASK MUST WAIT FOR A DATA SET TO
         BE OPENED, SUBJECT TO SERVREQ CHECKING.
(1A) BITSTRING 1 FCTDSTAT File state
(1A) ...1 1.1.   FCTDSOPN "FCTDSTAT" (Early-open indicator)
(1A) 1... ....   FCTOPNIM "X'80'" Data set is to be opened by utility rather than on first reference.
(1A) .1.. ....   FCTDSOPI "X'40'" Data set is open or opening 
    HENCE:
           .1...... OPEN
           .0...... CLOSED
           .0...... CLOSING (with FCTDSCLX set)
(1A) ...1 ....   FCTDSCRQ "X'10'" 'CLOSE' has been requested
(1A) .... .1..   FCTDSENI "X'04'" Data set is enabled
(1A) .... ..1.   FCTDSIMP "X'02'" Disabled only implicitly via close 
    HENCE:
           .....10. ENABLED
           .....01. DISABLED implicitly via CLOSE
           .....00. DISABLED explicitly
           .....11. ( never valid )
(1A) .... ...1   FCTDTCLS "X'01'" Close data table source
(1B) BITSTRING 1 FCTDSKL Key length
(1C) BITSTRING 1 FCTBFLGS Backout Flags
(1C) 1... ....   FCTBACKO "X'80'" LOG=Y for this file while open
(1C) .1.. ....   FCT_ESDS_COMPAT_ERR "X'40'" ESDS Compat Error Message sent
(1C) ..1. ....   FCT_ESDS_COMPAT_INFO "X'20'" ESDS Compat Info (6037) sent
(1C) .... .1..   FCTFOPEN "X'04'" Dynamically allocated and the first to be opened
(1C) .... ..1.   FCTCLUN "X'02'" File closed & marked unena- bled after an open failure
(1D) BITSTRING 1 FCTCFKL CFDT user specified keylength
(1E) BITSTRING 1 FCTFLAG1 Saved temporary flag
(1F) BITSTRING 1 FCTFLG2 Saved temporary flag
(20) FULLWORD 4 FCTLGTKN Autojnl log token from Logger
(24) BITSTRING 1   Reserved
(25) BITSTRING 1   Reserved
(26) ADDRESS 2 FCTDSRKP RELATIVE KEY POSITION
(28) BITSTRING 1 FCTDSJID USER JOURNAL ID 
                      DATA SET CONTROL INDICATOR 5
    Certain conditions that apply to any local data set, while open.
(29) BITSTRING 1 FCTDSVR5 DATA SET CONTROL INDICATOR 5 
     CONDITIONS GIVEN AT TABLE-GENERATION -
(29) 1... ....   FCTDPSHR "X'80'" "DISP=SHR" FOUND
(29) .1.. ....   FCTDPOLD "X'40'" "DISP=OLD" FOUND 
     CONDITIONS FOUND WHILE PROCESSING AN "OPEN" REQUEST -
(29) .... ..1.   FCTDSDA "X'02'" DYNAMICALLY ALLOCATED DATA SET
(29) .... ...1   FCTDSCLX "X'01'" CLOSE IN PROGRESS
(2A) BITSTRING 1 FCTFLG3 Saved temporary flag 
             ACCESS - STATE PROTECTION
   Some flags are defined for in-progress state changes
   The following three ECBs (or "wait bytes") exist to serialise
   certain combinations of state-change requests. Only one of
   them can be WAITing at any moment, but any combination may be
   POSTed (implying present or past existence of tasks that waited
   for an action of the specific kind to complete).
   Next there is an ECB for serialising data table loads
(2B) BITSTRING 1 FCTINPFL In-progress flags
(2B) ..1. 1.11   FCTDIINP "FCTINPFL" Disable in-progress indicator
(2B) 1... ....   FCTDISIN "X'80'" Disable is in progress
(2C) BITSTRING 1 FCTOPECB "OPEN" state-change ECB
(2D) BITSTRING 1 FCTDIECB "DISABLE" state-change ECB
(2E) BITSTRING 1 FCTCLECB "CLOSE" state-change ECB
(2F) BITSTRING 1 FCTDTLDC Table load complete 
                          STATISTICS
(30) FULLWORD 4 FCTDSRD NUMBER OF READ REQUESTS
(34) FULLWORD 4 FCTDSWRA NUMBER OF ADD RECORD REQS
(38) FULLWORD 4 FCTDSWRU NUMBER OF UPDATE REQUESTS
(3C) FULLWORD 4 FCTDSXCP NO. OF EXCP CALLS TO LAST CLOSE
(40) FULLWORD 4 FCTDSIXP NUMBER OF EXCP REQUESTS TO INDEX
(44) FULLWORD 4 FCTDSGU COUNT GET UPDATE REQUESTS
(48) FULLWORD 4 FCTDSBR NUMBER OF BROWSE REQUESTS
(4C) FULLWORD 4 FCTDSBRU No. of update browse requests
(50) FULLWORD 4   Reserved
(54) CHARACTER 8 FCTOPENT Time file opened
(5C) ADDRESS 4 FCTDSFRT Address of a FRTE
(60) FULLWORD 4 FCTDYNAL (0) 
                    DYNAMIC ALLOCATION
(60) ADDRESS 4 FCTDSDP >-> DSNAME ENTRY FOR DYNAMIC ALLOCATION.
(64) ADDRESS 4 FCTDSBCP >-> DSNAME ENTRY WITH BASE CLUSTER NAME. 
                    Buffer pool pointer
(68) ADDRESS 4 FCTDSBFP Pointer to buffer pool header 
  New or moved fields for making FCT threadsafe
(6C) ADDRESS 4 FCT_LOCK_TOKEN Unique lock token per FCT
(70) BITSTRING 1 FCT_IN_PROGRESS Flags for add or delete
(70) 1... ....   FCT_ADD_IN_PROGRESS "X'80'"
(70) .1.. ....   FCT_DELETE_IN_ PROGRESS "X'40'"
(71) CHARACTER 3   Reserved
(74) ADDRESS 4 FCT_STRING_LOCK_TOKEN
(78) BITSTRING 4 FCT_TOD_CREATED 1st word of TOD
(7C) FULLWORD 4 FCTDSXCL No. of exclusive ctl conflicts
(80) FULLWORD 4   Reserved for # CS Failures
(84) ADDRESS 4 (7) Reserved 
     Resource Signature data
(A0) CHARACTER 1 FCT_RESOURCE_SIG matches the PLX version 
                    Access-method dependent sections
(E0) DBL WORD 8 FCTVSEXT (0) BASE FOR OVERLAYING 
                        VSAM EXTENSION
(E0) ADDRESS 4   Reserved
(E4) FULLWORD 4 FCTDSTBW TOTAL # WAITED FOR BUFFER
(E8) FULLWORD 4   Reserved for # CS Failures
(EC) FULLWORD 4 (3) Reserved
(F8) ADDRESS 4 FCTVSWA Free VSWAs
(FC) FULLWORD 4 FCTVSWA_CNT # of changes to FCTVSWA
(100) BITSTRING 1 FCTDSDBN BUFFER SIZE INDEX FOR DATA BUFFERS
(101) BITSTRING 1 FCTDSIBN BUFFER SIZE INDEX FOR INDEX BUFFERS
(102) BITSTRING 1 FCTVSVR1 VSAM DATA SET CONTROL IND 1
(102) 0 FCTDSKSD "FCTVSVR1" KSDS INDICATOR
(102) 1... ....   FCTKSDS "X'80'" KEY SEQUENCED DATA SET
(102) 0 FCTDSESD "FCTVSVR1" ESDS INDICATOR
(102) .1.. ....   FCTESDS "X'40'" ENTRY SEQUENCED DATA SET
(102) 0 FCTDSSHR "FCTVSVR1" SHARED RESOURCES INDICATORS, THAT SIGNIFY CONNECTION WITH LSR POOLS
(102) ..1. ....   FCTSHRIM "X'20'" FILE IS NOW SHARING RESOURCES
(102) .... 1...   FCTSHRSP "X'08'" FILE IS TO USE AN LSR POOL
(102) 0 FCTDSSGF "FCTVSVR1" SHARED STATS COLLECTED FLAG
(102) ...1 ....   FCTSHBG "X'10'" STATISTICS HAVE BEEN COLLECTED
(102) .... .1..   FCTVRRDS "X'04'" Variable RRDS
(102) 0 FCTDSADR "FCTVSVR1" ADDRESSED ACCESS INDICATOR
(102) .... ..1.   FCTADR "X'02'" ADDRESSED ACCESS ONLY (SHARE OPTIONS 4 ONLY)
(102) 0 FCTDSRRD "FCTVSVR1" RRDS INDICATOR
(102) .... ...1   FCTRRDS "X'01'" RELATIVE RECORD DATA SET
(103) BITSTRING 1 FCTDSOBJ VSAM OBJECT TYPE (OR MODE) 
      MODE OF ACCESS THROUGH VSAM (DETERMINED AT OPEN-TIME, ON OS)
(103) 0 FCTDSPAT "FCTDSOBJ" AIX PATH INDICATOR
(103) ...1 ....   FCTPATH "X'10'" AIX PATH + DATASET SHARING
(103) 0 FCTDSALT "FCTDSOBJ" AIX INDICATOR
(103) .... 1...   FCTALTIX "X'08'" ACCESS THROUGH AIX
(103) .... .1..   FCTBASE "X'04'" ACCESSED AS A BASE
(104) ADDRESS 1 FCTIPOOL LSR POOL IDENTIFIER
(105) BITSTRING 1 FCTVSVR2 VSAM DS INDICATOR 2
(105) 1... ....   FCT_IMMCLOSE "X'80'" Immediate close requested
(105) .1.. ....   FCTDTOPN "X'40'" Data table is open
(105) ..1. ....   FCTNODSN "X'20'" DSN-SHARING NOT TO BE APPLIED IF READ-ONLY
(105) .... 1...   FCTILFLG "X'08'" DATA SET IS BEING INITIALLY LOADED
(105) .... .1..   FCTDREUS "X'04'" THE FILE HAS A "REUSE" SERVREQ
(105) .... ..1.   FCTMTYRQ "X'02'" "EMPTY" REQUEST IS OUTSTANDING
(105) .... ...1   FCTDLFLG "X'01'" VSAM "LOAD" MODE IS IN EFFECT 
                      DATA SET CONTROL INDICATOR 6
              VSAM only journalling and logging options.
(106) BITSTRING 1 FCTDSVR6 Dataset control indicator 6
(106) 1... ....   FCTJFR "X'80'" Forward recovery
(106) .1.. ....   FCTJWAC "X'40'" Write add complete
(106) ..1. ....   FCTFUZZY "X'20'" Fuzzy Image Copy Allowed according to FCTE
(106) ...1 ....   FCTBWO "X'10'" BWO allowed for this FCTE set according to FCTE or VSAM Catalog - whichever is being used 
         EQU X'08' Reserved
         EQU X'04' Reserved
         EQU X'02' Reserved
         EQU X'01' Reserved
                      DATA SET CONTROL INDICATOR 7
                         VSAM RLS options.
(107) BITSTRING 1 FCTDSVR7 RLS bit settings
(107) 1... ....   FCTCR "X'80'" Consistent read
(107) .1.. ....   FCTRR "X'40'" Repeatable read
(107) ..1. ....   FCTUQENA "X'20'" Re-ENABLE on QUIOPEN
(107) ...1 ....   FCTCQENA "X'10'" Re-ENABLE on QUICEND 
  The following two fields are used to record the catalog
  definition for read only RLS files.
(107) .... 1...   FCTROBO "X'08'" Backward Recovery
(107) .... .1..   FCTROFR "X'04'" Forward Recovery 
                      DATA SET CONTROL INDICATOR 8
                         VSAM bundle options.
(108) BITSTRING 1 FCTDSVR8 bundle options
(108) 1... ....   FCTBUNDL "X'80'" Installed from bundle
(109) BITSTRING 1   Reserved
(10A) HALFWORD 2   Reserved 
  THE NEXT TWO FIELDS CONTAIN LIMITS, AGAINST WHICH FCTDSASC IS TESTED.
(10C) HALFWORD 2 FCTDSMSC Upper limit for string count
(10E) HALFWORD 2 FCTDSPMS Limit for UPDATE/ADD string count 
   THE NEXT THREE FIELDS CONTAIN HISTORICAL INFORMATION, COLLECTED
     FOR USE IN STATISTICAL REPORTS
(110) FULLWORD 4 FCTDSTSW Total # tasks waited for string
(114) FULLWORD 4   Reserved for # CS Failures
(118) FULLWORD 4 (3) Reserved
(124) FULLWORD 4 FCTDSDEL Number of DELETEs
(128) HALFWORD 2   Reserved
(12A) HALFWORD 2 FCTUPSTG Number of strings required by VSAM during an UPDATE request 
         THE NEXT FIELD IS THE MAXIMUM RECORD LENGTH
         SPECIFIED IN THE DEFINITION OF THE VSAM DATA SET
         AND IS ALSO USED FOR ESTIMATING THE SIZE OF
         BUFFER REQUIRED FOR LARGE VSAM RECORDS.
(12C) FULLWORD 4 FCTMAXLN Maximum record length
(130) FULLWORD 4 FCTCFRLN CFDT user specified reclen 
            TWO FIELDS REPRESENT SYSTEM-PROGRAMMER-SUPPLIED VALUES,
               THAT WILL BE DYNAMICALLY INSERTED IN THE ACB :
(134) HALFWORD 2 FCTBUFND Specified number of data buffers
(136) HALFWORD 2 FCTBUFNI Specified number of index buffers
(138) FULLWORD 4 FCTDSACB Pointer to VSAM ACB
(13C) BITSTRING 1   Reserved
(13D) BITSTRING 1   Reserved
(13E) BITSTRING 1 FCTFRLOG Forward recovery log id
(13F) BITSTRING 1 FCTVSPWL VSAM password length
(140) CHARACTER 8 FCTVSPWD VSAM password
(148) CHARACTER 8 FCTBASEN Symbolic name of base
(150) FULLWORD 4 FCTDTSIZ Data table size
(154) ADDRESS 4 FCTDTTKN Data table token
(158) FULLWORD 4 FCTDTRDS Data table reads
(15C) FULLWORD 4 FCTDTRNF Data table reads via VSAM
(160) FULLWORD 4 FCTDTAVR Data table adds via read
(164) FULLWORD 4 FCTDTADS Data table adds via API
(168) FULLWORD 4 FCTDTARJ Data table adds suppressed
(16C) FULLWORD 4 FCTDTATF Data table adds and table full
(170) FULLWORD 4 FCTDTRWS Data table rewrites
(174) FULLWORD 4 FCTDTDLS Data table deletes
(178) FULLWORD 4 FCTDTLDS Data table LOADING responses
(17C) FULLWORD 4 FCTDTSHI Data table record hwm
(180) ADDRESS 4 FCTDTPTH Data table path token
(184) ADDRESS 4 FCTBCCHN Open file chain
(188) ADDRESS 4 FCT_NEXT_RLS_FCTE Address of next file open in RLS mode
(18C) ADDRESS 4 FCT_BC_CONN_CHAIN Address of next FCT entry connected to this base
(190) ADDRESS 4 FCT_RLS_TIMEOUTS Number Of RLS timeouts
(194) FULLWORD 4   Reserved for # CS Failures
(198) FULLWORD 4 (3) Reserved
(1A4) CHARACTER 8 FCTDT_NAME Data Table Name
(1AC) CHARACTER 8 FCTCF_POOL_NAME CFDT Pool Name
(1B4) ADDRESS 4 FCTCF_POOL_ELEM_ADDR Address of pool element
(1B8) ADDRESS 4 FCTCF_NEXT_IN_POOL_ CHAIN Address of next FCT entry open against a CFDT in this pool
(1BC) FULLWORD 4 FCTCF_DT_TOKEN CFDT Token
(1C0) BITSTRING 1 FCTCF_FLAGS CFDT Flags Byte
(1C0) 1... ....   FCTCF_UM_CONTEN "X'80'" CFDT update model is contention
(1C0) .1.. ....   FCTCF_LOADREQ "X'40'" CFDT requires loading
(1C0) ..1. ....   FCTCF_SOURCE "X'20'" CFDT has a source data set
(1C0) ...1 ....   FCTCF_REOPEN "X'10'" CFDT access needs reopening
(1C1) BITSTRING 1 FCTFLG1 Flags
(1C1) 1... ....   FCT_NOT_AUTH "X'80'" Connect failed - not auth
(1C1) ..1. ....   FCT_CONN_FAIL "X'20'" Last CONNECT attempt failed - retry later
(1C1) ...1 ....   FCT_LINK_FAIL "X'10'" Last CONNECT attempt failed link security check
(1C1) .... 1...   FCT_408_ISSUED "X'08'" Message 0408 issued - shipped request was successful
(1C1) .... .1..   FCT_408_NEEDED "X'04'" Message 0408 needed if shipped request is successful
(1C1) .... ..1.   FCT_FORCE "X'02'" Force users off
(1C2) CHARACTER 2   Reserved
(1C4) FULLWORD 4 FCTCF_LOADER_ID CFDT loader id
(1C8) DBL WORD 8 FCT_STCK Last shared table connect 
  New or moved fields for making FCT threadsafe
(1D0) FULLWORD 4 FCTDSCBW CURRENT # WAITING FOR BUFFER
(1D4) FULLWORD 4   Reserved for # CS Failures
(1D8) FULLWORD 4 FCTDSHBW HIGHEST # WAITED FOR BUFFER
(1DC) FULLWORD 4   Reserved for # CS Failures
(1E0) FULLWORD 4 FCTDSASC Active string count
(1E4) FULLWORD 4   Reserved for # CS Failures
(1E8) FULLWORD 4 FCTDSCWC VSAM current string wait count
(1EC) FULLWORD 4   Reserved for # CS Failures
(1F0) FULLWORD 4 FCTDSHSW Highest # tasks waited on string
(1F4) FULLWORD 4   Reserved for # CS Failures
(1F8) FULLWORD 4 FCT_ACTV_RLS_CNT # active RLS requests
(1FC) ADDRESS 4 FCT_STRING_HEAD Max. string wait chain head
(200) FULLWORD 4   Reserved for # CS Failures
(204) ADDRESS 4 FCT_PSEUDO_HEAD Pseudo max string wait chain hd.
(208) FULLWORD 4   Reserved for # CS Failures
(20C) BITSTRING 1 FCTTSFLG Threadsafe bit flags
(20C) 1... ....   FCT_THREADSAFE_WORK "X'80'" Flag Threadsafe work performed
(20D) BITSTRING 1 (3) on file. No CS needed. 
  New or moved fields for define file in bundle
(210) CHARACTER 4 FCT_BUNDLE_TOKEN
(214) CHARACTER 4 FCT_RESOURCE_TOKEN
(218) FULLWORD 4 FCT_SHARED_LOCK_COUNT
(21C) FULLWORD 4   Reserved for # CS Failures
(220) BITSTRING 1 FCT_BUNDLE_BITS
(220) 1... ....   FCT_BUNDLE_DISABLE_ DEFERRED "X'80'"
(221) BITSTRING 1 FCTLOECB 
  Here is the embedded resource signature object
(221) 0 FCTVSEL "*-DFHFCTDS" Length of VSAM file entry
(E0) FULLWORD 4 FCTDAEXT (0) 
                      BDAM EXTENSION
(E0) ADDRESS 4 FCTDSDCB Data Control Block address
(E4) ADDRESS 2 FCTDSREC Record length
(E6) ADDRESS 2 FCTDSBLK Block size
(E6) 111. 1...   FCTNVEL "*-DFHFCTDS" Length of BDAM file entry 
                    FILE CONTROL TABLE PREFIX
Table 2.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 0 DFHFPFDS TO PRECEDE FIRST FCT ENTRY
(0) BITSTRING 1 FPFATTR ATTRIBUTES OF LOCAL FILES SEE DFHFCT FOR SIGNIFICANCE
(1) BITSTRING 3   RESERVED
(4) ADDRESS 4   Reserved
(8) ADDRESS 4 FPFSELFA SELF-POINTER (FOR F-DUMP)
(C) ADDRESS 4   Reserved
(10) ADDRESS 4   Reserved
(14) ADDRESS 4   Reserved
(18) ADDRESS 4 FPFPVADR ADDRESS SHARED-POOL VECTOR
(1C) ADDRESS 4   Reserved
(1C) ..1. ....   FPFPRFL "*-DFHFPFDS" LENGTH OF FCT PREFIX