COMBMAT 
COMMON
  
#     COMBMAT - MEMORY ALLOCATION TABLE.                              # 
                                               CONTROL NOLIST;
                                               CONTROL IFEQ LISTCON,1;
                                               CONTROL LIST;
                                               CONTROL FI;
      BEGIN  # COMBMAT #
  
# 
***   COMBMAT - MEMORY ALLOCATION TABLE.
* 
*     COMBMAT DEFINES A STATUS LIST FOR THE MEMORY ALLOCATION 
*     TABLE AND THE STRUCTURE OF THE MEMORY ALLOCATION TABLE. 
*     THE MEMORY ALLOCATION TABLE DESCRIBES THE ALLOCATION OF 
*     MEMORY AMONG THE VARIABLE LENGTH TABLES.  AN ENTRY FOR A
*     SPECIFIC TABLE CAN BE ACCESSED THROUGH THE STATUS LIST. 
# 
  
  
# 
*     STATUS LIST FOR MEMORY ALLOCATION TABLE ENTRIES.
# 
  
      STATUS MAT$ENTRY
        HLRQ,                        # HIGH LEVEL REQUEST QUEUE # 
        LLRQ,                        # LOW LEVEL REQUEST QUEUE #
        RTRQ,                        # RAW *TDAM* REQUEST QUEUE # 
        FCTQ,                        # *FCT* QUEUE #
        BST,                         # BUFFER STATUS TABLE #
        LTCT,                        # LONG TERM CONNECT TABLE #
        MRFT,                        # MOVE REQUEST FILE TABLE #
        OMT,                         # OPEN MAP TABLE # 
        OCT,                         # OPEN CATALOG TABLE # 
        PREAMBLE,                    # CATALOG PREAMBLE # 
        CAT$FET,                     # CATALOG *FET* #
        CAT$BUF,                     # CATALOG BUFFER # 
        MAP$FET,                     # MAP *FET* #
        MAP$BUF,                     # MAP BUFFER # 
        TEMP$FET,                    # TEMPORARY *FET* #
        TEMP$BUF,                    # TEMPORARY BUFFER # 
        TEMP$WB,                     # TEMPORARY WORKING BUFFER # 
        AST$BUF,                     # *AST* BUFFER # 
        SCR$BUF,                     # DESTAGE SCRATCH BUFFERS #
        UDT$CONT,                    # UDT CONTROLLER TABLE # 
        UDT$SM,                      # UDT SM/DRD TABLE # 
        LABBUF,                      # LABEL HOLD BUFFER #
        MW$BUFS,                     # MESSAGE WRITE BUFFERS #
        MR$BUFS,                     # MESSAGE READ BUFFERS # 
        SBT,                         # STORAGE BUFFER TABLE # 
        MAT$LAST;                    # LAST ITEM + 1 #
  
      COMMON BMATCOM; 
  
        BEGIN  # COMMON AREA #
  
# 
*     MEMORY ALLOCATION TABLE ARRAY.
# 
  
        ARRAY MAT[0:MAT$ENTRY"MAT$LAST"] S(1);
          BEGIN 
          ITEM MAT$COUNT  U(00,06,18);  # NUMBER OF ENTRIES IN TABLE #
          ITEM MAT$SPACE  U(00,24,18);  # SPACE ALLOCATED FOR TABLE # 
          ITEM MAT$FWA    U(00,42,18);  # THE *FWA* OF THE TABLE #
          END 
  
        END  # COMMON AREA #
  
      END  # COMBMAT #
  
                                               CONTROL LIST;
