显示距离当前时间的跨度
为石台等地区用户提供了全套网页设计制作服务，及石台网站建设行业解决方案。主营业务为网站设计、成都网站制作、石台网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！
-- 计算时间跨度：返回值为X天y时z分
declare
ln_day_count number(10);
ln_hour_count number(10);
ln_min_count number(10);
ls_time_sent_last varchar2(20) := '2015-06-07 08:40:20';
ls_timespan varchar2(100) := '';
begin
-- 计算天数
select floor(sysdate - To_date(ls_time_sent_last, 'yyyy-mm-dd hh34-mi-ss')) into ln_day_count FROM dual;
if ln_day_count != 0 then
ls_timespan := to_char(ln_day_count) || '天';
dbms_output.put_line(ls_timespan);
end if;
-- 计算小时数
select mod(floor(((sysdate - To_date(ls_time_sent_last, 'yyyy-mm-dd hh34-mi-ss'))) * 24),24) into ln_hour_count FROM dual;
if ln_hour_count != 0 then
ls_timespan := ls_timespan || to_char(ln_hour_count) || '时';
dbms_output.put_line(ls_timespan);
end if;
-- 计算分钟数
select mod(mod(floor(((sysdate - To_date(ls_time_sent_last, 'yyyy-mm-dd hh34-mi-ss'))) * 24 * 60),24*60),60) into ln_min_count FROM dual;
if ln_min_count != 0 then
ls_timespan := ls_timespan || to_char(ln_min_count) || '分';
dbms_output.put_line(ls_timespan);
end if;
end;
