& xx_obcssstartdate1, xx_obcssstartdate2, xx_obcssperiod,
& , xx_obcssstartdate2
integer xx_obcssstartdate2
call CAL_FULLDATE( xx_obcssstartdate1, xx_obcssstartdate2,
xx_obcssstartdate2 = 0