I siobEstartdate, siobEperiod,
_RL siobEperiod
& siobEperiod, siobEstartdate,
IF ( siobEperiod .GT. 0 ) THEN
& siobEstartdate1, siobEstartdate2, siobEperiod,
siobEperiod = UNSET_RL
IF(siobEperiod .EQ.UNSET_RL) siobEperiod = obcsEperiod