_RL siobWperiod
& siobWperiod, siobWstartdate,
IF ( siobWperiod .GT. 0. ) THEN
& siobWstartdate1, siobWstartdate2, siobWperiod
siobWperiod = UNSET_RL
IF(siobWperiod .EQ.UNSET_RL) siobWperiod =obcsWperiod
I siobWstartdate, siobWperiod,