*COMDECK ARTDCLS
  
#**********************************************************************#
# THE FOLLOWING ITEMS DESCRIBE THE LAYOUT OF THE AUTOMATIC RECOVERY    #
# TABLE (ART).  THE ART CONSISTS OF A FIXED HEADER PLUS A NUMBER OF    #
# FIXED ENTRIES.  THE SIZE OF THE ART IS DETERMINED BY THE VALUE       #
# RECORDED IN THE MD SCHEMA INFORMATION (NUMBER OF BEGIN/COMMIT        #
# SEQUENCES).                                                          #
#                                                                      #
# NOTE -- THE HEADER AND INDIVIDUAL ENTRY ARE THE SAME SIZE TO         #
# PERMIT SUBSCRIPT REFERENCES.  SUBSCRIPT 0 REFERS TO THE HEADER,      #
# SUBSCRIPT 1 TO THE FIRST ENTRY, AND SO ON.                           #
#**********************************************************************#
  
  
#     DEFS                                                             #
  
      DEF DFARTENSIZE #03#;             # SIZE (WORDS) OF ART ENTRY    #
      DEF DFARTHDSIZE #03#;             # SIZE (WORDS) OF ART HEADER   #
      DEF DFTRBUFEX  #128#;             # NUMBER OF EXTRA BUFFER WORDS #
                                        # DFTRBUFEX MINIMUM IS 64      #
  
#     FORMULA FOR COMPUTING THE BASE SECTOR ADDRESS FOR THE SEGMENT    #
  
      DEF BSAFORMULA
          #DFARTENSIZE*(ARNTUN[0]+1)/64+ARNPRU[0]*(TQARTX[0]-1)+3#; 
  
  
      BASED ARRAY ART S(DFARTENSIZE); 
        BEGIN 
  
#     THE FOLLOWING DECLARATIONS REFER TO THE ART HEADER.              #
  
        ITEM ARWORD     U(00,00,60);   # FOR FULL-WORD REFERENCING     #
        ITEM ARNPRU     U(00,30,30);   # NUMBER PRUS/SEGMENT IN TRF    #
        ITEM ARMODFET   I(01,00,18);   # POINTER TO THE MODEL TRF FET  #
        ITEM ARNTRF     U(01,18,06);   # NUMBER TRF FILES              #
        ITEM ARNTUP     U(01,36,12);   # NUMBER UPDATES IN B/C SEQUENCE#
        ITEM ARNTUN     U(01,48,12);   # NUMBER B/C SEQUENCES          #
        ITEM ARLARID    C(02,00,10);   # LAST ASSIGNED RESTART ID      #
  
#     THE FOLLOWING DECLARATIONS REFER TO THE ART ENTRY.               #
  
        ITEM ARBCID     C(00,00,10);   # B/C IDENTIFIER                #
        ITEM ARURID     C(01,00,10);   # RESTART ID                    #
        ITEM ARWORD2    I(02,00,60);   # FOR FULL WORD REFERENCING     #
        ITEM ARTRCS     B(02,00,01);   # COMMIT STATUS - TRUE=COMMITTED#
        ITEM ARFLSH     B(02,01,01);   # TRUE - FLUSH WHEN COMMITTING  #
        ITEM ARTRN      U(02,03,06);   # NUMBER OF ASSIGNED TRF        #
        ITEM ARLOCKS    U(02,09,15);   # NUMBER OF LOCKS ASSIGNED      #
        ITEM ARCURUP    U(02,24,18);   # CURRENT UPDATE COUNT          #
        ITEM ARFETPTR   I(02,42,18);   # PTR TO ASSIGNED FET/I-O BUFFER#
        END 
  
