I obcsEstartdate, obcsEperiod
_RL obcsEstartdate
& obcsEperiod, obcsEstartdate,
obcsEstartdate = 0.
call CAL_TOSECONDS ( difftime, obcsEstartdate ,mythid )
obcsEstartdate = modelstart + obcsEstartdate