*COMDECK AAMFITDCL
 FTLFN      IDEF (U,000,00,42) ;#LOGICAL FILE NAME             #    ITEM GBKCOM 
 FTFWB      IDEF (I,001,42,18) ;#FWA CIRCULAR BUFFER           #    ITEM GBKCOM 
 FTLEN      IDEF (U,001,36,06) ;#FIT LENGTH -5 WORDS           #    ITEM GBKCOM 
 FTTAPE     IDEF (U,001,00,01) ;#DVT HIGH ORDER BIT - TAPE/DISK#    ITEM GAG0919
 FTIN       IDEF (I,002,00,60) ;#FWA BUFFER TO INSERT DATA     #    ITEM GBKCOM 
 FTOUT      IDEF (I,003,00,60) ;#FWA BUFFER TO REMOVE DATA     #    ITEM GBKCOM 
 FTLIMIT    IDEF (I,004,42,18) ;#LWA+1 OF BUFFER               #    ITEM GBKCOM 
 FTPRUNO    IDEF (U,006,30,30) ;#PRU NUMBER (FO=WA)            #    ITEM GBKCOM 
 FTRDB      IDEF (U,008,39,01) ;#READ PERMISSION BIT           #    ITEM GBKCOM 
 FTPMB      IDEF (U,008,36,04) ;#PF PERMISSION BITS            #    ITEM GBKCOM 
 FTMER      IDEF (U,008,37,03) ;#MODIFY/EXTEND/READ PERMISSIONS#    ITEM GAG0919
 FTEXB      IDEF (U,008,38,01) ;#EXTEND PERMISSION BIT         #    ITEM GAG0919
 FTMDB      IDEF (U,008,37,01) ;#MODIFY PERMISSION BIT         #    ITEM GAG0919
 FTFP       IDEF (U,010,26,07) ;#FILE POSITION                 #    ITEM GBKCOM 
 FTFO       IDEF (U,011,39,03) ;#FILE ORGANIZATION             #    ITEM GBKCOM 
 FTRT       IDEF (U,011,32,04) ;#RECORD TYPE                   #    ITEM GBKCOM 
 FTOF       IDEF (U,011,25,02) ;#OPEN FLAG                     #    ITEM GBKCOM 
 FTRL       IDEF (U,011,00,24) ;#RECORD LENGTH                 #    ITEM GBKCOM 
 FTFL       IDEF (U,012,00,24) ;#LENGTH OF F/Z RECORDS         #    ITEM GBKCOM 
 FTMRL      IDEF (U,012,00,24) ;#MAXIMUM RECORD LENGTH         #    ITEM GBKCOM 
 FTBFF      IDEF (U,013,24,01) ;#BAD FILE FLAG                 #    ITEM
 FTSFLG     IDEF (U,013,26,01) ;#SPECIAL TAF LOGGING#               ITEM001500
 FTNOFF     IDEF (U,013,27,01) ;#DONT FLUSH THE FSTT#               ITEM
 FTWSA      IDEF (I,015,42,18) ;#USER WORKING STORAGE ADDRESS  #    ITEM GBKCOM 
 FTPDF      IDEF (U,015,33,01) ;#FILE CC DATA PROCESSED        #    ITEM GAG0919
 FTMNR      IDEF (U,015,00,24) ;#MINIMUM RECORD LENGTH         #    ITEM GBKCOM 
 FTHRL      IDEF (I,016,42,18) ;#HASHING ROUTINE ADDRESS       #    ITEM GBKCOM 
 FTDP       IDEF (U,016,44,07) ;#DATA BLOCK PADDING FACTOR     #    ITEM GBKCOM 
 FTMKL      IDEF (U,016,33,09) ;#MAJOR KEY LENGTH              #    ITEM GBKCOM 
 FTFNF      IDEF (U,017,00,01) ;#FATAL ERROR FLAG            ***#   ITEM GBKCOM 
 FTOC       IDEF (U,017,01,02) ;#OPEN/CLOSE FLAG             ***#   ITEM GBKCOM 
 FTPD       IDEF (U,017,03,03) ;#PROCESSING DIRECTION        ***#   ITEM GBKCOM 
 FTBFS      IDEF (I,017,42,18) ;#CIRCULAR BUFFER SIZE        ***#   ITEM GBKCOM 
 FTRC       IDEF (U,018,30,30) ;#RECORD COUNT                  #    ITEM GBKCOM 
 FTHMB      IDEF (U,018,00,24) ;#NUMBER OF HOME BLOCKS       ***#   ITEM GBKCOM 
 FTPTL      IDEF (U,018,00,24) ;#PARTIAL TRANSFER LENGTH       #    ITEM GBKCOM 
 FTLGX      IDEF (I,019,42,18) ;#LOGGING EXIT ADDR           ***#   ITEM GBKCOM 
 FTDFLG     IDEF (U,019,41,01) ;#DEFERRED LOGGING FLAG       ***#   ITEM GBKCOM 
 FTNL       IDEF (U,019,24,06) ;#NO. LEVELS OF INDEX BLOCKS    #    ITEM GBKCOM 
 FTMBL      IDEF (U,019,00,24) ;#MAXIMUM BLOCK LENGTH          #    ITEM GBKCOM 
 FTDCT      IDEF (I,020,12,18) ;#DISPLAY TO COLLATING TABLE  ***#   ITEM GBKCOM 
 FTRB       IDEF (U,020,30,12) ;#RECORDS PER BLOCK           ***#   ITEM GBKCOM 
 FTBCK      IDEF (U,020,00,01) ;#CHECKSUM BIT                ***#   ITEM GBKCOM 
 FTPKA      IDEF (I,020,42,18) ;#PRIMARY KEY RETURN ADR      ***#   ITEM GBKCOM 
 FTXBS      IDEF (I,021,44,16) ;# INDEX BLOCK SIZE             #    ITEM GAG0725
 FTMIPFS    IDEF (I,021,42,18) ;#MIP(INDEX)FSTT ADDRESS        #    ITEM GBKCOM 
 FTXN       IDEF (U,021,00,42) ;#INDEX LFN                     #    ITEM GBKCOM 
 FTKA       IDEF (I,024,42,18) ;#KEY ADDRESS                   #    ITEM GBKCOM 
 FTEMK      IDEF (U,024,36,01) ;#EMBEDDED KEY FLAG           ***#   ITEM GBKCOM 
 FTFLM      IDEF (U,024,06,30) ;#FILE LIMIT                    #    ITEM GBKCOM 
 FTDT       IDEF (U,024,05,01) ;#DIVICE TYPE                   #    ITEM GBKCOM 
 FTON       IDEF (U,024,04,01) ;#OLD/NEW FLAG                  #    ITEM GBKCOM 
 FTFWI      IDEF (U,024,02,01) ;#FORCED WRITE INDICATOR        #    ITEM GBKCOM 
 FTKNE      IDEF (U,024,01,01) ;#KEY NOT EQUAL                 #    ITEM GBKCOM 
 FTNDX      IDEF (U,024,00,01) ;#RETRIEVAL OF MDX KEY LIST-DA  #    ITEM GBKCOM 
 FTBZF      IDEF (I,025,42,18) ;#BUZY FET ADDRESS              #    ITEM GBKCOM 
 FTMIPGN    IDEF (U,025,06,01) ;#MIPGEN FLAG           ***#         ITEM GBKCOM 
 FTFSTT     IDEF (I,027,42,18) ;#FSTT ADDRESS                  #    ITEM GBKCOM 
 FTFIAT     IDEF (I,027,24,18) ;#FIAAT ADDRESS                 #    ITEM GBKCOM 
 FTFTCH     IDEF (I,027,06,18) ;#POINTER TO NEXT FIT           #    ITEM GBKCOM 
 FTAAMSR1   IDEF (I,028,00,60) ;#AAM SCRATCH WORD              #    ITEM GBKCOM 
 FTSKP      IDEF (I,029,06,18) ;#SKIP COUNT             G S    #    ITEM GBKCOM 
 FTRRL      IDEF (U,031,36,24) ;#REAL RECORD LENGTH     GP     #    ITEM GBKCOM 
 FTIP       IDEF (U,031,29,07) ;#INDEX BLOCK PADDING FACTOR #       ITEM GBKCOM 
 FTKL       IDEF (U,031,20,09) ;#KEY LENFTH                    #    ITEM GBKCOM 
 FTKP       IDEF (U,031,16,04) ;#BEGINNING CHAR POS OF KEY     #    ITEM GBKCOM 
 FTRKP      IDEF (U,031,12,04) ;#RELATIVE KEY POSITION IN RKW  #    ITEM GBKCOM 
 FTRKW      IDEF (U,031,00,12) ;#RELATIVE KEY WORD             #    ITEM GBKCOM 
 FTCPA      IDEF (I,032,42,18) ;#COMPRESSION RTN ADDR          #    ITEM GBKCOM 
 FTREL      IDEF (U,032,33,03) ;#RELATIONALS                   #    ITEM GBKCOM 
 FTKT       IDEF (U,032,30,03) ;#KEY TYPE                      #    ITEM GBKCOM 
 FTDCA      IDEF (I,033,42,18) ;#DECOMPRESSION RTN ADDR        #    ITEM GBKCOM 
 FTCOP      IDEF (I,033,24,18) ;#CURRENT OPERATION             #    ITEM GBKCOM 
 FTPOP      IDEF (U,033,00,06) ;#PREVIOUS OP CODE              #    ITEM GBKCOM 
 FTWD42     IDEF (I,034,00,60) ;#JUST SO WD IS IN FIT CHART    #    END  GBKCOM 
  
  
