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