*COMDECK TSBDATA
# 
      DEFINE DATA AREA IN LABELED COMMON FOR TSB MANAGER
                                                                       #
      COMMON TSBMDAT; 
      BEGIN # COMMON TSBMDAT #
      ITEM
           CTSBLWA U,        # CURRENT TSB AREA LAST WORD ADDRESS      #
           TSBFWA U,         # TSB AREA FIRST WORD ADDRESS             #
           PTSBLWA U,        # PRIMARY TSB AREA LAST WORD ADDRESS,     #
                             # TSB AREA IS NEVER REDUCED BELOW THIS    #
           BIGFREE U,        # BIGGEST FREE TSB IN THE TSB AREA        #
           FFFWA U;          # FIRST FREE TSB FIRST WORD ADDRESS       #
      END # COMMON TSBMDAT #
