& xx_tauustartdate1, xx_tauustartdate2, xx_tauuperiod,
& , xx_tauustartdate1
integer xx_tauustartdate1
call CAL_FULLDATE( xx_tauustartdate1, xx_tauustartdate2,
xx_tauustartdate1 = 0