C                                           *--> FROM PRDCOMMON.PREADS
C  PROCESSED DATA BASE TIME SERIES USAGE INFORMATION COMMON BLOCK
      COMMON /PREADS/ NUMACC(50),IPDUM(2)
C