& xx_obcswstartdate1, xx_obcswstartdate2, xx_obcswperiod,
& , xx_obcswstartdate1
integer xx_obcswstartdate1
call CAL_FULLDATE( xx_obcswstartdate1, xx_obcswstartdate2,
xx_obcswstartdate1 = 0