& xx_hfluxstartdate1, xx_hfluxstartdate2, xx_hfluxperiod,
& xx_hfluxstartdate1
integer xx_hfluxstartdate1
call CAL_FULLDATE( xx_hfluxstartdate1, xx_hfluxstartdate2,
xx_hfluxstartdate1 = 0