Oracle数据库实现日期遍历功能
内容导读
互联网集市收集整理的这篇技术教程文章主要介绍了Oracle数据库实现日期遍历功能，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含6061字，纯文字阅读大概需要9分钟。
内容图文
遍历开始日期到结束日期的每一天，若有查询某段日期下有什么业务或者事件发生时，可用到此函数。 Oracle SQL Developer create or replace type class_date as object( year varchar2(10), month varchar2(10), day varchar2(20))--定义所需要的日期类-------
遍历开始日期到结束日期的每一天，若有查询某段日期下有什么业务或者事件发生时，可用到此函数。 Oracle SQL Developercreate or replace type class_date as object
(
year varchar2(10),
month varchar2(10),
day varchar2(20)
)--定义所需要的日期类
-----------------------------------------------------------------------------
create or replace type table_date is table of class_date--日期类返回table类型
------------------------------------------------------------------------------
create or replace function minusDay(firstDay in varchar2,lastDay in varchar2)
return table_date pipelined
as
firstYear number;
firstMonth number;
lastYear number;
lastMonth number;
totalDay number;
totalMonth number;
currentDay varchar2(40);
currentYear varchar2(40);
type tt is record(
day varchar2(20),
month varchar2(20),
year varchar2(20)
);
v_date tt;
begin
--第一天的日期转换
select to_number(substr(firstDay,1,4))into firstYear from dual ;
select to_number(substr(firstDay,6,2)) into firstMonth from dual;
--第二天的日期转换
select to_number(substr(lastDay,1,4)) into lastYear from dual;
select to_number(substr(lastDay,6,2)) into lastMonth from dual;
--1 第一个日期早于第二个日期
if to_number(to_date(firstDay,'yyyy-mm-dd')-to_date(lastDay,'yyyy-mm-dd')) <0 then
dbms_output.put_line('第一个日期早于第二个日期！');
end if;
--2 第一个日期晚于第二个日期
--------相同年份
if firstYear = lastYear then
v_date.year := to_char(firstYear);
--------相同月份
if firstMonth = lastMonth then
v_date.month := to_char(firstMonth);
-- 天数差
totalDay := to_number(to_date(lastDay,'yyyy-mm-dd')-to_date(firstDay,'yyyy-mm-dd'));
if totalDay = 0 then
v_date.day := firstDay;
pipe row(class_date(v_date.year,v_date.month,v_date.day));
elsif totalDay >0 then
for dayId in to_number(substr(firstDay,9,2))..to_number(substr(lastDay,9,2)) loop
v_date.day :=to_char(substr(firstDay,1,7)||'-'||to_char(dayId)) ;
pipe row(class_date(v_date.year,v_date.month,v_date.day));
dbms_output.put_line( v_date.day);
end loop;
end if;
--------不同月份
elsif firstMonth < lastMonth then
---月份差
--totalMonth := lastMonth - firstMonth;
for id in firstMonth..lastMonth-1 loop
v_date.month := to_char(id);
--满月天数差
totalDay := to_number(last_day(to_date(firstYear||'-'||to_char(id)||'-'||'01','yyyy-mm-dd'))-to_date(firstYear||'-'||to_char(id)||'-'||'01','yyyy-mm-dd'))+1;
for dayId in 1..totalDay loop
v_date.day := substr(firstDay,1,7)||'-'||to_char(dayId) ;
pipe row(class_date(v_date.year,v_date.month,v_date.day));
dbms_output.put_line( v_date.day);
end loop;
end loop;
--最后一个月的遍历
v_date.month := to_char(lastMonth);
-- totalDay :=to_date(lastMonth,'yyyy-mm-dd') -to_date(to_char(lastYear)||'-'||to_char(lastMonth)||'-01','yyyy-mm-dd');
totalDay := to_number(to_date(lastDay,'yyyy-mm-dd')-to_date(substr(lastDay,1,7)||'-01','yyyy-mm-dd'))+1;
for id in 1..totalDay loop
v_date.day := substr(lastDay,1,7)||'-'||to_char(id);
pipe row(class_date(v_date.year,v_date.month,v_date.day));
dbms_output.put_line( v_date.day);
end loop;
end if;
--------不同年份
elsif firstYear < lastYear then
----------------------------------------------
--第一个月
v_date.year := to_char(firstYear);
v_date.month := substr(firstDay,6,2);
totalDay :=to_number(substr( to_char(last_day(to_date(firstDay,'yyyy-mm-dd')),'yyyy-mm-dd'),9,2));
for dayId in to_number(substr(firstDay,9,2)) ..totalDay loop
v_date.day := to_char(dayId);
pipe row(class_date(v_date.year,v_date.month,v_date.day));
end loop;
---------------------------------------------------------------
--中间所有月数的日期添加
totalMonth := to_number( months_between(to_date(lastDay,'yyyy-mm-dd'),to_date(firstDay,'yyyy-mm-dd')))-1;
currentDay := firstDay;
currentDay := substr(currentDay,1,8)||'01';
for monthId in 1..totalMonth loop
--月数循环
currentDay:=
to_char(add_months(to_date(currentDay,'yyyy-mm-dd'),1),'yyyy-mm-dd') ;
currentYear := substr(currentDay,1,4);
v_date.year := to_char(substr(trim(currentDay),1,4));
v_date.month := to_char(substr(trim(currentDay),6,2));
--天数循环
totalDay := to_number(last_day(to_date(currentDay,'yyyy-mm-dd'))-to_date(currentYear||'-'||substr(currentDay,6,2)||'-01','yyyy-mm-dd'))+1;
for dayId in 1 .. totalDay loop
v_date.day := to_char(dayId);
pipe row(class_date(v_date.year,v_date.month,v_date.day));
dbms_output.put_line( v_date.day);
end loop;
end loop;
-----------------------------------------------------------------------------------
--最后一个月
totalDay := to_number(substr(lastDay,9,2));
v_date.month := to_number(substr(lastDay,6,2));
for dayId in 1 .. totalDay loop
v_date.day := to_char(dayId);
pipe row(class_date(v_date.year,v_date.month,v_date.day));
end loop;
end if;
end minusDay;
内容总结
以上是互联网集市为您收集整理的Oracle数据库实现日期遍历功能全部内容，希望文章能够帮你解决Oracle数据库实现日期遍历功能所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。
内容备注
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。
内容手机端
扫描二维码推送至手机访问。
来源：【匿名】