I , climsaltstartdate1, climsaltstartdate2
call CAL_FULLDATE( climsaltstartdate1, climsaltstartdate2,
& climsaltstartdate1, climsaltstartdate2, climsaltperiod,
climsaltstartdate1 = 0
integer climsaltstartdate1
& climsaltstartdate1, climsaltstartdate2,