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