C                                           *--> FROM PRDCOMMON.PICDMG
C  PROCESSED DATA BASE IN-CORE BUFFER MANAGEMENT COMMON BLOCK
      COMMON /PICDMG/ MTSICD,NTSICD,TSICDT(20),TSICDN(20),
     *   TSICD1(20),TSICDL(20)
      INTEGER TSICDT,TSICDN,TSICD1,TSICDL
C