& xx_snowprecipstartdate1, xx_snowprecipstartdate2,
& , xx_snowprecipstartdate1
integer xx_snowprecipstartdate1
call CAL_FULLDATE( xx_snowprecipstartdate1,
xx_snowprecipstartdate1 = 0