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