*COMDECK DNT
          CONTROL NOLIST;     #DNT# 
          CONTROL EJECT;
  
      STATUS DNTSREGVALS   # VALUES FOR DNTSREG # 
          LINE$CTR,        # LINE-COUNTER # 
          LINAGE$CTR,      # LINAGE-COUNTER # 
          PAGE$CTR,        # PAGE-COUNTER # 
          DBG$ITEM,        # DEBUG-ITEM # 
          DBG$LINE,        # DEBUG-LINE # 
          DBG$NAME,        # DEBUG-NAME # 
          DBG$SUB$1,       # DEBUG-SUB-1 #
          DBG$SUB$2,       # DEBUG-SUB-2 #
          DBG$SUB$3,       # DEBUG-SUB-3 #
          DBG$CONT,        # DEBUG-CONTENT #
          DBG$NUM$CONT,    # DEBUG-NUMERIC-CONTENT #
          HASHED$VALUE,    # HASHED-VALUE # 
          LAST;            # UNUSED - ENDS LIST # 
          DEF DNT$ENTSZ  #2#;   # SIZE OF DNT ENTRY # 
          COMMON DNTCOMM; 
  BASED 
      ARRAY DNT [0:0] S(DNT$ENTSZ); 
        BEGIN 
          ITEM DNTNAMEINFO  U(0,00,60);  # ALL OF NAME INFO WORD #
          ITEM DNTBIGHASH   U(0,00,30);  # 30 BIT HASHED NAME # 
          ITEM DNTNBRWORDS  U(0,30,02);  # NUMBER OF WORDS IN NAME #
          ITEM DNTNAMETPTR  U(0,33,15);  # NAME TABLE POINTER # 
          ITEM DNTFILLER    B(0,48,01);  # FILLER FLAG #
          ITEM DNTSREG      B(0,49,01);  # SPECIAL REGISTER FLAG #
          ITEM DNTSREGVAL  S:DNTSREGVALS(0,50,04);  # VALUES FOR SRS# 
          ITEM DNTIDUNQ     U(0,54,02);  #UNQ,FST,LST,BETWEEN, FOR CID #
          ITEM DNTINFO      U(1,00,60);  # INFORMATION WORD # 
          ITEM DNTNOTUNIQUE U(1,00,01);  # NOT UNIQUE FLAG #
          ITEM DNTCOLUMN    U(1,01,07);  # COLUMN NUMBER #
          ITEM DNTLEVEL     U(1,08,08); 
          ITEM DNTLINE      U(1,16,16); 
          ITEM DNTLINK      U(1,32,16);  # LINK TO ITEM W/SAME HASH # 
          ITEM DNTGROUP     U(1,48,01);  # SET IF IN GROUP #
          ITEM DNTSCOPE     U(1,49,11);  # SCOPE OF GROUP # 
        END 
          CONTROL LIST;      #DNT#
