& costIceEnd
_RL costIceEnd
call CAL_TOSECONDS ( tempDate2 , costIceEnd , mythid )
costIceEnd = costIceEnd + startTime