*COMDECK AAMFSTT
                             BASED ARRAY                                 GBKCOM 
 FSTT$AA    ADEF (0,0,1,P,BASED) ;#FSTT DESCRIPTION          #BEGIN ITEM GBKCOM 
 FSFRM1     IDEF (I,000,00,60) ;#                            #      ITEM GBKCOM 
 FSMIPBLK   IDEF (U,000,02,01) ;#THIS IS A MIP FSTT        #        ITEM GBKCOM 
 FSALTFLG   IDEF (U,000,03,01) ;#FSTT HAS BEEN ALTERED     #        ITEM GBKCOM 
 FSUSRCNT   IDEF (I,000,24,18) ;# COUNT OF FITS USING FSTT     #    ITEM AM2A130
 FSFRM2     IDEF (I,001,00,60) ;#                            #      ITEM GBKCOM 
 FSBCHNT    IDEF (I,001,24,18) ;#TAIL OF BUFFER CHAIN      #        ITEM GBKCOM 
 FSBCHNH    IDEF (I,001,42,18) ;#HEAD OF BUFFER CHAIN      #        ITEM GBKCOM 
 FSFRM3     IDEF (I,002,00,60) ;#                            #      ITEM GBKCOM 
 FSHDR1     IDEF (I,003,00,60) ;#                            #      ITEM GBKCOM 
 FSBLCHKSUM IDEF (U,003,00,30) ;#FSTT CHECKSUM          #           ITEM GBKCOM 
 FSHEADW    IDEF (I,004,00,60) ;#FSTTHEADER WORD            #       ITEM GBKCOM 
 FSMIPWORD  IDEF (I,006,00,60) ;#MIP WORD MUST MATCH IN BOTH #      ITEM GBKCOM 
 FSFILDAT   IDEF (I,007,00,60) ;#FILE CREATION DATE          #      ITEM GBKCOM 
 FSTERMTIM  IDEF (I,008,00,60) ;#TIME OF LAST FILE CLOSE   #        ITEM GBKCOM 
 FSTERMDAT  IDEF (I,009,00,60) ;#DATE OF LAST FILE CLOSE     #      ITEM GBKCOM 
 FSCOMPACT  IDEF (I,010,00,60) ;#COMPRESSION PASSWORD       #       ITEM GBKCOM 
 FSLOGOPT   IDEF (I,011,00,60) ;#LOGGING WORD               #       ITEM GBKCOM 
 FSGETCNT   IDEF (I,012,00,60) ;#COUNT OF GETS              #       ITEM GBKCOM 
 FSDELCNT   IDEF (I,013,00,60) ;#COUNT OF DELETES           #       ITEM GBKCOM 
 FSPUTCNT   IDEF (I,014,00,60) ;#COUNT OF PUTS              #       ITEM GBKCOM 
 FSREPCNT   IDEF (I,015,00,60) ;#COUNT OF REPLACES          #       ITEM GBKCOM 
 FSOPENFLG  IDEF (B,016,00,01) ;#OPEN FLAG                 #        ITEM GBKCOM 
 FSNCLSFLG  IDEF (B,016,01,01) ;#FILE NOT CLSED PROP IN PAS#        ITEM GBKCOM 
 FSRUINFLG  IDEF (B,016,02,01) ;#RUINED FLAG               #        ITEM GBKCOM 
 FSEXTFLG   IDEF (B,016,03,01) ;#FILE NEEDS TO BE EXTENDED #        ITEM GBKCOM 
 FSINXFUL   IDEF (U,016,04,01) ;#15 INDEX LEV IS FILLED   #         ITEM GBKCOM 
 FSRUFSTT   IDEF (U,016,05,01) ;#FSTT RUINED FLAG#                  ITEM GBKCOM 
 FSMIPFLG   IDEF (B,016,06,01) ;#MIP FLAG                   #       ITEM GBKCOM 
 FS2BLOX    IDEF (U,016,07,01) ;#MULTI-BLOCK CHANGE IN PROGRESS#    ITEM001200
 FS2BLOXH   IDEF (U,016,08,01) ;#RESERVED FOR TAF-AAMI#             ITEM
 FSCKSUMFLG IDEF (B,016,09,01) ;#CHECKSUM FLAG            #         ITEM GBKCOM 
 FSPARBAD   IDEF (U,016,18,06) ;#COUNT OF BAD BLOCK ENTRIES#        ITEM GBKCOM 
 FSSYSCOMP  IDEF (U,016,24,06) ;#SYSTEM COMPRESSION KEY   #         ITEM GBKCOM 
 FSBLKCNT   IDEF (U,016,36,24) ;#BLOCK COUNT             #          ITEM GBKCOM 
 FSMXNDXLV  IDEF (U,017,11,04) ;#MAX NUM INDEX LVLS ALLOW#          ITEM GBKCOM 
 FSMAXREC   IDEF (I,017,24,18) ;#MAX REC SIZE CHAR        #         ITEM GBKCOM 
 FSMINREC   IDEF (I,017,42,18) ;#MIN REC SIZE CHAR        #         ITEM GBKCOM 
 FSNXTPRU   IDEF (U,018,03,24) ;#NEXT UNUSED PRU           #        ITEM GBKCOM 
 FSBLKSIZ   IDEF (I,018,42,18) ;#BLOCK SIZE IN PRUS       #         ITEM GBKCOM 
 FSMTBCNT   IDEF (U,019,06,24) ;#COUNT OF EMPTY BLOCKS    #         ITEM GBKCOM 
 FSMTBPRU   IDEF (U,019,36,24) ;#PRU OF 1ST EMPTY BLOCK  #          ITEM GBKCOM 
 FSBADBLK   IDEF (I,020,00,60) ;#BAD BLOCKS TABLE          #        ITEM GBKCOM 
 FSLOSTBLK  IDEF (I,037,00,60) ;#LOST BLOCKS TABLE        #         ITEM GBKCOM 
 FSDICOTAB  IDEF (I,038,00,60) ;#DISPLAY/COLLATE CONVTABLE#         ITEM GBKCOM 
 FSCODITAB  IDEF (I,046,00,60) ;#COLLATE/DISPLAY CONV TABL#         ITEM GBKCOM 
 FSOBCNT    IDEF (U,046,00,30) ;#NO. OF OVERFLOW BLOCKS (DA ONLY)#  ITEM GBKCOM 
 FSHBCNT    IDEF (U,046,30,30) ;#NO. OF HOME BLOCKS (DA ONLY)#      ITEM GBKCOM 
 FSOORCNT   IDEF (U,047,00,30) ;#ORCNT AS AT LAST OPEN (DA ONLY)#   ITEM GBKCOM 
 FSOOBCNT   IDEF (U,047,30,30) ;#OBCNT AS AT LAST OPEN (DA ONLY)#   ITEM GBKCOM 
 FSORCNT    IDEF (I,048,00,60) ;#NO.LIVE RECORDS IN OVFL BLOX#      ITEM
 FSBKFACTR  IDEF (I,050,00,60) ;#NUMBER RECORDS PER BLOCK (AK ONLY)#ITEM GBKCOM 
 FSOKBIT    IDEF (B,051,00,01) ;#1=AK KEY IN BITS AT CREATION TIME# ITEM GBKCOM 
 FSPROBLIM  IDEF (U,051,01,04) ;#BLOCK READ LIMIT ON SERIAL PROBE#  ITEM GBKCOM 
 FSTRIGBNO  IDEF (U,051,30,30) ;#BLOCK NUMBER TO START SERIAL PROBE#ITEM GBKCOM 
 FSPRCNTBK  IDEF (I,052,00,60) ;#SERIAL PROB TRIGGER VALUE#         ITEM GBKCOM 
 FSSPSRCNT  IDEF (I,053,00,60) ;#SPACE REQ. COUNT TWIX SERIAL PASS# ITEM GBKCOM 
 FSDCOLTAB  IDEF (B,054,00,01) ;#DEFAULT COLLATE TABLE   #          ITEM GBKCOM 
 FSSCCWD    IDEF (U,054,19,15) ;# WORD HAVING SPARSE CODE#          ITEM GBKCOM 
 FSSCCPO    IDEF (U,054,34,04) ;#  CHAR. OFST FROM FSSCCWD#         ITEM GBKCOM 
 FSSCCLG    IDEF (B,054,38,01) ;#  TRUE=SCCDEF PRESENT    #         ITEM GBKCOM 
 FSPT2SZ    IDEF (U,054,39,06) ;#SIZE OF LEVEL 2 PTREE   #          ITEM GBKCOM 
 FSPT3SZ    IDEF (U,054,45,06) ;#SIZE OF LEVEL 3 PTREE   #          ITEM GBKCOM 
 FSMXALTKY  IDEF (U,054,51,09) ;#CHAR IN LARGEST ALT KEY #          ITEM GBKCOM 
 FSMODFLG   IDEF (B,058,03,01) ;#MOD-IN-PROGRESS FLG      #         ITEM GBKCOM 
 FSFSCHN    IDEF (I,058,24,18) ;#FSTT CHAIN LINK ADDR   #           ITEM GBKCOM 
 FSMIPFSTT  IDEF (I,058,42,18) ;#ADDR OF MIP/DATA FSTT  #           ITEM GBKCOM 
 FSIOBZFLG  IDEF (B,059,00,01) ;#I/O BUZY FLAG          #           ITEM GBKCOM 
 FSFTCHN    IDEF (I,059,24,18) ;#FIT CHAIN HEAD ADDR    #           ITEM GBKCOM 
 FSBZFET    IDEF (I,059,42,18) ;#ADDR OF BUZY FET       #           ITEM GBKCOM 
 FSBUFFREE  IDEF (U,060,24,09) ;#COUNT OF FREE UBS BUFS  #          ITEM GBKCOM 
 FSBUFCNT   IDEF (U,060,33,09) ;#COUNT OF UBS BUFS       #          ITEM GBKCOM 
 FSCOMPBUF  IDEF (I,060,42,18) ;#ADDR OF COMPRESSION BUF#           ITEM GBKCOM 
 FSDISASSOC IDEF (U,061,00,02) ;# DIS/ASSOCIATION FLG #             ITEM GBKCOM 
 FSKDUNCT   IDEF (U,061,24,12) ;#UNIQ KD COUNT          #           ITEM GBKCOM 
 FSKDISCT   IDEF (U,061,36,12) ;#IS KD COUNT            #           ITEM GBKCOM 
 FSKDFICT   IDEF (U,061,48,12) ;#FIFO KD COUNT          #           ITEM GBKCOM 
 FSNDXPRU   JDEF (U,062,FBLNDM) ;#PRU PRIM INDEX BLOCK#             ITEM GBKCOM 
 FSFDBPRU   JDEF (U,062,FDBLDM) ;#FIRST DATA BLOCK PRU#             ITEM GBKCOM 
 FSNDXLVLS  JDEF (U,063,NLEVDM) ;#INDEX LEVS IN USE  #              ITEM GBKCOM 
 FSLSTPRU   JDEF (U,063,LSTBDM) ;#LAST USED BLK PRU NU#             ITEM GBKCOM 
 FSRECCNT   JDEF (U,063,RCNTDM) ;#RECORD COUNT        #             ITEM GBKCOM 
 FSKEYPOS   JDEF (U,064,KYPODM) ;#STARTING CHAR POS   #             ITEM GBKCOM 
 FSFILEORG  JDEF (U,064,FLORDM) ;#FILE ORGANIZATION  #              ITEM GBKCOM 
 FSKEYTYPE  JDEF (U,064,KYTYDM) ;#KEY TYPE           #              ITEM GBKCOM 
 FSKEYLOC   JDEF (U,064,KYLODM) ;#STARTING WORD OF KEY#             ITEM GBKCOM 
 FSKEYSIZE  JDEF (I,064,KYLNDM) ;#LENGTH OF KEY      #              ITEM GBKCOM 
 FSPKDEF    IDEF (I,065,00,60) ;#PRIM KEY DEF (MIP FSTT)  #         ITEM GBKCOM 
 FSPKD      IDEF (U,065,00,27) ;#USABLE PKEY DEF          #         ITEM GBKCOM 
 FSPKW      IDEF (U,065,00,15) ;#STARTING WRD OF PKEY     #         ITEM GBKCOM 
 FSPKP      IDEF (U,065,15,04) ;#STARTING CHAR OF PKEY    #         ITEM GBKCOM 
 FSPKL      IDEF (U,065,19,08) ;#PKEY LENGTH              #         ITEM GBKCOM 
 FSPKT      IDEF (U,065,31,02) ;#PKEY TYPE                #         ITEM GBKCOM 
 FSUNWR1    IDEF (I,066,24,18) ;#ADDR OF 1ST UNWTN BLK   #          ITEM GBKCOM 
 FSUNWR2    IDEF (I,066,42,18) ;#ADDR OF 2ND UNWTN BLK   #          ITEM GBKCOM 
 FSCMWRD    IDEF (I,067,00,60) ;#                         #         ITEM GBKCOM 
 FSMINTARG  IDEF (I,067,24,18) ;#MIN TARGET THIS FILE    #          ITEM GBKCOM 
 FSTARGET   IDEF (I,067,42,18) ;#TARGET CONTRIB THIS FILE#          ITEM GBKCOM 
 FSGTNCNT   IDEF (I,068,00,60) ;# COUNT OF GETNS         #          ITEM GBKCOM 
 FSCIOCNT   IDEF (I,069,00,60) ;# COUNT OF CIO CALLS     #          ITEM GBKCOM 
 FSREADCNT  IDEF (I,069,00,30) ;# COUNT OF CIO READS           #    ITEM AM2A130
 FSRCLCNT   IDEF (I,069,30,30) ;# COUNT OF CIO RECALLS         #    ITEM AM2A130
 FSSEEKCNT  IDEF (I,070,00,60) ;# COUNT OF SEEKS         #          ITEM GBKCOM 
 FSGTNRCNT  IDEF (I,071,00,60) ;# COUNT OF GETNRS        #          ITEM GBKCOM 
 FSDATAPAD  IDEF (I,072,00,60) ;# DATA FILE PADDING FACTO#          ITEM GBKCOM 
 FSINDXPAD  IDEF (I,073,00,60) ;# INDX FILE PADDING FACTO#          ITEM GBKCOM 
 FSCIOSTAT  IDEF (I,074,00,60) ;# COUNT OF CIO CALLS           #    ITEM AM2A130
 FSWRITCNT  IDEF (I,074,00,30) ;# COUNT OF CIO WRITES          #    ITEM AM2A130
 FSRWRCNT   IDEF (I,074,30,30) ;# COUNT OF CIO REWRITES        #    ITEM AM2A130
 FSOLDRC    IDEF (I,075,00,60) ;#RECCNT AT LAST OPEN (AK ONLY)#     ITEM GAG0821
 FSPCEMTAB  IDEF (I,076,00,60) ;#START OF PCTEMPTY TABLE#           ITEM GAG0821
 FSEMPLIST  IDEF (I,087,00,60) ;#BEGIN MOSTEMPTY TABLE#             ITEM GAG0821
 FSMTUSW    IDEF (U,087,00,30) ;#UNUSED HALFWORDS#                  ITEM GAG0821
 FSMTPRU    IDEF (U,087,30,30) ;#PRU NUMBER#                        ITEM GAG0821
 FSFTERR    IDEF (I,124,00,60) ;#UNNOTIFIED FATAL ERROR#            ITEM GBKCOM 
 FSLGX      IDEF (I,125,42,18) ;#COPY OF LOGGING EXIT    #          ITEM GBKCOM 
 FSDFLG     IDEF (U,125,41,01) ;#DEFFERED LOGGING FLAG     #        ITEM GBKCOM 
 FSFWBOPN   IDEF (I,126,00,60) ;#FTFWB AT OPEN             #        ITEM GBKCOM 
 FSOGETCNT  IDEF (I,127,00,30) ;#COUNT OF GETS AT OPEN TI#          ITEM GBKCOM 
 FSODELCNT  IDEF (I,127,30,30) ;#COUNT OF DELETES AT OPE#           ITEM GBKCOM 
 FSOPUTCNT  IDEF (I,128,00,30) ;#COUNT OF PUTS AT OPEN TI#          ITEM GBKCOM 
 FSOREPCNT  IDEF (I,128,30,30) ;#COUNT OF RPLCS AT OPEN #           ITEM GBKCOM 
 FSEXCEDPT  IDEF (U,129,00,01) ;#FILE EXCEED PTREE SIZE#            ITEM GBKCOM 
 FSOGTNCNT  IDEF (I,129,30,30) ;#GETN COUNT AT OPEN TIME#           END  GBKCOM 
  
  
