I obcsSstartdate, obcsSperiod,
_RL obcsSstartdate
& obcsSperiod, obcsSstartdate,
CALL CAL_TOSECONDS ( difftime, obcsSstartdate ,myThid)
obcsSstartdate = modelstart + obcsSstartdate
obcsSstartdate = 0.