INTEGER climsststartdate2
& climsststartdate1, climsststartdate2,
I climsststartdate1, climsststartdate2,
& climsstfile, climsststartdate1, climsststartdate2,
climsststartdate2 = 0