& xx_obcsestartdate1, xx_obcsestartdate2, xx_obcseperiod,
& , xx_obcsestartdate2
integer xx_obcsestartdate2
call CAL_FULLDATE( xx_obcsestartdate1, xx_obcsestartdate2,
xx_obcsestartdate2 = 0