& xx_sststartdate1, xx_sststartdate2, xx_sstperiod,
& , xx_sststartdate2
integer xx_sststartdate2
call CAL_FULLDATE( xx_sststartdate1, xx_sststartdate2,
xx_sststartdate2 = 0