& xx_sssstartdate1, xx_sssstartdate2, xx_sssperiod,
& , xx_sssstartdate1
integer xx_sssstartdate1
call CAL_FULLDATE( xx_sssstartdate1, xx_sssstartdate2,
xx_sssstartdate1 = 0