C                                           *--> FROM COMMON.FCARY
      COMMON/FCARY/IFILLC,NCSTOR,ICDAY(20),ICHOUR(20)
C