*COMDECK TABLEDF
          CONTROL NOLIST;    #TABLEDF#
 #      CONTAINS DEFINITIONS AND DESCRIPTIONS OF TABLES                #
  
          DEF NBRTABLES  #35#;    # NUMBER OF MANAGED TABLES #
          DEF TTABLESIZE #6#;   #NUMBER OF WORDS IN TABLE#
          CONTROL DISJOINT; 
          CONTROL INERT;
          COMMON TABLETABLE;
              BEGIN 
              ARRAY TTABLE [1:NBRTABLES] P(TTABLESIZE); 
                  BEGIN 
                  ITEM TTABLASTENT    I(0,00,18);  #LAST ENTRY IN TABLE#
                  ITEM TTABFILENBR    U(0,18,06);  #FILE NUMBER        #
                  ITEM TTABFCENT      U(0,24,18);  #FIRST CORE ENTRY   #
                  ITEM TTABLCENT      I(0,42,18);  #LAST CORE ENTRY    #
                  ITEM TTABBASEWA     I(1,00,24);  #BASE WORD ADDRESS  #
                  ITEM TTABECSACC     U(1,24,12);  #ECS ACCESS COUNT   #
                  ITEM TTABFPTENT     U(1,36,06);  #FIRST PAGE TABLE   #
                  ITEM TTABLENB       I(1,42,18);  #LENGTH BASE SECT   #
                  ITEM TTABSPLIT      B(2,00,01);  #SPLIT TABLE FLAG   #
                  ITEM TTABFIRSTREF   B(2,01,01);  #FIRST REF FLAG     #
                  ITEM TTABFIXED      B(2,02,01);  #TABLE SIZE FIXED   #
                  ITEM TTABREOPEN     B(2,03,01);  #TABLE RE-OPENED    #
                  ITEM TTABGROUP1     B(2,04,01);  #GROUP ID 1 TABLE   #
                  ITEM TTABREADONLY   B(2,05,01);  #READ ONLY FLAG     #
                  ITEM TTABONECS      B(2,06,01);  #ON ECS FLAG        #
                  ITEM TTABECSCAND    B(2,07,01);  #ECS CANDIDATE TBL  #
                  ITEM TTABASGD       B(2,10,01);  #ASSIGNED           #
                  ITEM TTABFILECR     B(2,11,01);  #FILE CREATED       #
                  ITEM TTABALLONF     B(2,12,01);  #ALL ON FILE        #
                  ITEM TTABALLINCOR   B(2,13,01);  #ALL IN CORE IF SET #
                  ITEM TTABRELD       B(2,14,01);  #TABLE RELEASED     #
                  ITEM TTABSAVEIT     B(2,15,01);  #SAVE TABLE WHEN REL#
                  ITEM TTABNBRSPLTS  U(2,16,02); #NBR SPLITS XPECTED   #
                  ITEM TTABINITSZ     U(2,18,09);  #INIT ALLOC SIZE    #
                  ITEM TTABINC        U(2,27,09);  #EXTEND INCREMENT   #
                  ITEM TTABFIXOVL     U(2,36,06);  #FIXED AFTER OVL    #
                  ITEM TTABNBRREF     I(2,42,18);  #NUMBER OF REFS     #
                  ITEM TTABECSBASE    I(3,00,18);  #ECS BASE ADDRESS   #
                  ITEM TTABECSLWA    U(3,18,18);  #LAST WORD ADDR OF EC#
                  ITEM TTABPRINBR     U(3,36,06);  #PRIORITY NBR       #
                  ITEM TTABBASE       I(3,42,18);  #BASE ADDR POINTER  #
                  ITEM TTABCALLOC     I(4,00,18);  #CORE ALLOCATED     #
                  ITEM TTABROOVL      U(4,18,06);  #READ ONLY OVERL    #
                  ITEM TTABFILEACC    U(4,24,12);  #FILE ACCESSES      #
                  ITEM TTABNBRINC     U(4,36,09);  #NBR TABLE INCS     #
                  ITEM TTABRTNOVL     U(4,45,06);  #RETURNED AFT OVL   #
                  ITEM TTABENTSIZE    U(4,51,09);  #ENTRY SIZE         #
                  ITEM TTABLVENT      I(5,00,18);  #LAST VIRTUAL ENTRY #
                  ITEM TTABHLDSPLIT   U(5,18,18);  #HELD SPLIT POINTER #
                  ITEM TTABHIGHWA     U(5,36,24);  #HIGHEST WORD ADDR  #
                  END 
              END 
          XREF
              BEGIN 
              ARRAY SCFLLST [0:100]  S(1);   #SCRATCH FILE POINTERS#
                  BEGIN 
                  ITEM SCRFNAME  C(0,00,07);  #FILE NAME               #
                  ITEM SCRFCOUNT U(0,00,60);  #COUNT OF FILES - 0 ENTRY#
                  ITEM SCRFADDR  U(0,42,18);  #FIT ADDRESS             #
                  END 
              END 
          CONTROL LIST;   #TABLEDF# 
