integer siobNstartdate1
& siobNstartdate1, siobNstartdate2,
CALL CAL_FULLDATE ( siobNstartdate1, siobNstartdate2,
& siobNstartdate1, siobNstartdate2, siobNperiod,
siobNstartdate1 = UNSET_I
IF(siobNstartdate1.EQ.UNSET_I ) siobNstartdate1 = obcsNstartdate1