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