PowerBuilder小函数 fn_relativedatetime( oriDT /*原始日期*/,secs/*多少秒以后/以前*/ ) long secs_ secs_=mod(secs,24*60*60) int day day=secs/(24*60*60) time time_ time_=time(oriDT) if secs_>0 and secondsafter(time_,time('23:59:59'))< secs_ then day ++ secs_ = secs_ - 24*60*60 end if if secs_<0 and secondsafter(time('00:00:00'),time_)< -secs_ then day -- secs_ = secs_ + 24*60*60 end if return datetime(relativedate(date(oriDT),day),relativetime(time_,secs_))