oracle打开打印功能,Oracle打印日历功能

Oracle用SQL打印日历

1.1  打印当月日历

SELECT MAX(DECODE(DOW, 1, D, NULL)) SUN,

MAX(DECODE(DOW, 2, D, NULL)) MON,

MAX(DECODE(DOW, 3, D, NULL)) TUE,

MAX(DECODE(DOW, 4, D, NULL)) WED,

MAX(DECODE(DOW, 5, D, NULL)) THU,

MAX(DECODE(DOW, 6, D, NULL)) FRI,

MAX(DECODE(DOW, 7, D, NULL)) SAT

FROM (SELECT ROWNUM D,

ROWNUM - 2 + TO_NUMBER(TO_CHAR(TRUNC(SYSDATE, 'MM'), 'D')) P,

TO_CHAR(TRUNC(SYSDATE, 'MM') - 1 + ROWNUM, 'D') DOW

FROM ALL_OBJECTS

WHERE ROWNUM <=

TO_NUMBER(TO_CHAR(LAST_DAY(TO_DATE(SYSDATE)), 'DD')))

GROUP BY TRUNC(P / 7)

ORDER BY sun NULLS FIRST;

b396989864d23666cb896bca0a247a1a.png

1.2  打印年历

SELECT CASE

WHEN (NEW_YWEEK = MIN(NEW_YWEEK)

OVER(PARTITION BY MON ORDER BY NEW_YWEEK)) THEN

MON_NAME

ELSE

NULL

END AS MONTH,

NEW_YWEEK AS YWEEK,

ROW_NUMBER() OVER(PARTITION BY MON ORDER BY NEW_YWEEK) AS MWEEK,

SUM(DECODE(WDAY, '1', MDAY, NULL)) AS SUN,

SUM(DECODE(WDAY, '2', MDAY, NULL)) AS MON,

SUM(DECODE(WDAY, '3', MDAY, NULL)) AS TUE,

SUM(DECODE(WDAY, '4', MDAY, NULL)) AS WED,

SUM(DECODE(WDAY, '5', MDAY, NULL)) AS THU,

SUM(DECODE(WDAY, '6', MDAY, NULL)) AS FRI,

SUM(DECODE(WDAY, '7', MDAY, NULL)) AS SAT

FROM (SELECT DAYOFYEAR AS EVERYDAY,

TO_CHAR(DAYOFYEAR, 'mm') AS MON,

TO_CHAR(DAYOFYEAR, 'Month') AS MON_NAME,

TO_CHAR(DAYOFYEAR, 'w') AS MWEEK,

TO_CHAR(DAYOFYEAR, 'ww') AS YWEEK,

CASE

WHEN (TO_CHAR(TO_DATE(&YEAR || '0101', 'yyyymmdd'), 'd') > '1') AND

(TO_CHAR(DAYOFYEAR, 'd') <

TO_CHAR(TO_DATE(&YEAR || '0101', 'yyyymmdd'), 'd')) THEN

TO_CHAR(TO_CHAR(DAYOFYEAR, 'ww') + 1, 'fm00')

ELSE

TO_CHAR(DAYOFYEAR, 'ww')

END AS NEW_YWEEK,

TO_CHAR(DAYOFYEAR, 'd') AS WDAY,

TO_CHAR(DAYOFYEAR, 'dd') AS MDAY

FROM (SELECT TO_DATE(&YEAR || '0101', 'yyyymmdd') + LEVEL - 1 AS DAYOFYEAR

FROM DUAL

CONNECT BY LEVEL <=

TO_CHAR(TO_DATE(&YEAR || '1231', 'yyyymmdd'),

'ddd')))

GROUP BY MON, MON_NAME, NEW_YWEEK;

0a3be8a0afa40851c50033776ddf0988.png

1eac2090693e7c318ad5fbabe694fe29.png

1.3  打印某月日历

1.3.1  方法1

ALTER session set nls_language='SIMPLIFIED CHINESE';

select  to_char(everyday,'ww') as week,

sum(decode(to_char(everyday,'dy'),'星期日',to_char(everyday,'dd'))) as 星期日,

sum(decode(to_char(everyday,'dy'),'星期一',to_char(everyday,'dd'))) as 星期一,

sum(decode(to_char(everyday,'dy'),'星期二',to_char(everyday,'dd'))) as 星期二,

sum(decode(to_char(everyday,'dy'),'星期三',to_char(everyday,'dd'))) as 星期三,

sum(decode(to_char(everyday,'dy'),'星期四',to_char(everyday,'dd'))) as 星期四,

sum(decode(to_char(everyday,'dy'),'星期五',to_char(everyday,'dd'))) as 星期五,

sum(decode(to_char(everyday,'dy'),'星期六',to_char(everyday,'dd'))) as 星期六

from(select to_date('20170301','yyyymmdd') + level - 1 as everyDay

from dual

connect by level <= (last_day(to_date('20170301','yyyymmdd')) - to_date('20170301','yyyymmdd') +1)

)

group by to_char(everyday,'ww')

ORDER BY week;

7d8358221e246e5374510da0e195b0b6.png

1.3.2  方法2

select  to_char(everyday,'ww') as week,

sum(decode(to_char(everyday,'d'),'1',to_char(everyday,'dd'))) as 星期日,

sum(decode(to_char(everyday,'d'),'2',to_char(everyday,'dd'))) as 星期一,

sum(decode(to_char(everyday,'d'),'3',to_char(everyday,'dd'))) as 星期二,

sum(decode(to_char(everyday,'d'),'4',to_char(everyday,'dd'))) as 星期三,

sum(decode(to_char(everyday,'d'),'5',to_char(everyday,'dd'))) as 星期四,

sum(decode(to_char(everyday,'d'),'6',to_char(everyday,'dd'))) as 星期五,

sum(decode(to_char(everyday,'d'),'7',to_char(everyday,'dd'))) as 星期六

from(select to_date('20170301','yyyymmdd') + level - 1 as everyDay

from dual

connect by level <= (last_day(to_date('20170301','yyyymmdd')) - to_date('20170301','yyyymmdd') +1)

)

group by to_char(everyday,'ww')

ORDER BY week;

fc350eec4297b17663bcf3d1426036a8.png

http://jackywood.itpub.net/post/1369/127565

一条SQL语句生成年历。select case

when (new_yweek = min(new_yweek)over(partition by mon order by new_yweek)) then

mon_name

else

null

end as month,

new_yweek as yweek,

row_number() over(partition by mon order by new_yweek) as mweek,

sum(decode(wday, '1', mday, null)) as sun,

sum(decode(wday, '2', mday, null)) as mon,

sum(decode(wday, '3', mday, null)) as tue,

sum(decode(wday, '4', mday, null)) as wed,

sum(decode(wday, '5', mday, null)) as thu,

sum(decode(wday, '6', mday, null)) as fri,

sum(decode(wday, '7', mday, null)) as sat

from (select dayofyear as everyday,

to_char(dayofyear, 'mm') as mon,

to_char(dayofyear, 'Month') as mon_name,

to_char(dayofyear, 'w') as mweek,

to_char(dayofyear, 'ww') as yweek,

case

when (to_char(to_date(&year || '0101', 'yyyymmdd'), 'd') > '1') and

(to_char(dayofyear, 'd') <

to_char(to_date(&year || '0101', 'yyyymmdd'), 'd')) then

to_char(to_char(dayofyear, 'ww') + 1, 'fm00')

else

to_char(dayofyear, 'ww')

end as new_yweek,

to_char(dayofyear, 'd') as wday,

to_char(dayofyear, 'dd') as mday

from (select to_date(&year || '0101', 'yyyymmdd') + level - 1 as dayofyear

from dual

connect by level <= to_char(to_date(&year || '1231', 'yyyymmdd'),'ddd')

)

)

group by mon, mon_name, new_yweek

/

链接是作者的解读,我感觉年历的实现主要有三个步骤

1.生成一年之中所有的日期

2.在上步的基础上,得到每个日期所在周、月、年的具体信息。

3.行列转置

其中new_yweek这部分看的真是云里雾里,它主要解决Oracle to_char函数IW和WW坑爹的问题。select to_char(d,'yyyy-mm-dd'),to_char(d,'d') dayofweek,to_char(d,'WW') WW,to_char(d,'IW') IW    from (

select to_date('20131229','yyyymmdd')+level-1 as d from dual connect by level<=10);

TO_CHAR(D, D WW IW

---------- - -- --

2013-12-29 1 52 52

2013-12-30 2 52 01

2013-12-31 3 53 01

2014-01-01 4 01 01

2014-01-02 5 01 01

2014-01-03 6 01 01

2014-01-04 7 01 01

2014-01-05 1 01 01

2014-01-06 2 01 02

2014-01-07 3 01 02

已选择10行。

对比日历,发现2013年12月30,31日的IW,均划分到了2014年的第一周

MONTH  YWE MWEEK   SUN   MON   TUE   WED   THU   FRI   SAT

------ --- ----- ----- ----- ----- ----- ----- ----- -----

12月   49      1     1     2     3     4     5     6     7

50      2     8     9    10    11    12    13    14

51      3    15    16    17    18    19    20    21

52      4    22    23    24    25    26    27    28

53      5    29    30    31

1)ww的算法为每年1月1日为第一周开始,date+6为每一周结尾

例如20050101为第一周的第一天,而第一周的最后一天为20050101+6=20050107

公式 每周第一天 :date + 周 * 7 - 7

每周最后一天:date + 周 * 7 - 1

2)iw的算法为星期一至星期日算一周,且每年的第一个星期一为第一周,

例如20050101为星期六,所以用iw的算法是前年的53周,而20050103之后才是第一周的开始。

公式 每周第一天 :next_day(date) + 周 * 7 - 7

每周最后一天:next_day(date) + 周 * 7 - 1

按照上述算法,WW的结果相差较远,而IW比较贴近我们对于日期的认识。

但是问题是IW存在边界问题。它会认为12月30日和31日是2014年的第一周,以此统计年历,则会出现问题。所以new_yweek解决的应该是这个问题。

可以使用下面的方法解决IW边界问题。select case

when (yweek = min(yweek)over(partition by mon order by yweek)) then

mon_name

else

null

end as month,

yweek as yweek,

row_number() over(partition by mon order by yweek) as mweek,

sum(decode(wday, '1', mday, null)) as sun,

sum(decode(wday, '2', mday, null)) as mon,

sum(decode(wday, '3', mday, null)) as tue,

sum(decode(wday, '4', mday, null)) as wed,

sum(decode(wday, '5', mday, null)) as thu,

sum(decode(wday, '6', mday, null)) as fri,

sum(decode(wday, '7', mday, null)) as sat

from (select dayofyear as everyday,

to_char(dayofyear, 'mm') as mon,

to_char(dayofyear, 'Month') as mon_name,

to_char(dayofyear, 'w') as mweek,

max(decode(to_char(dayofyear,'d'),'1',to_char(dayofyear, 'iw')+1,to_char(dayofyear, 'iw'))) over(order by dayofyear) as yweek,

to_char(dayofyear, 'd') as wday,

to_char(dayofyear, 'dd') as mday

from (select to_date(&year || '0101', 'yyyymmdd') + level - 1 as dayofyear

from dual

connect by level <= to_char(to_date(&year || '1231', 'yyyymmdd'),'ddd')

)

)

group by mon, mon_name, yweek

/

解决IW边界问题:

max(decode(to_char(dayofyear,'d'),'1',to_char(dayofyear, 'iw')+1,to_char(dayofyear, 'iw'))) over(order by dayofyear) as yweek

decode部分,如果日期是周日,则将iw的值+1,以便日历对齐。

而max分析函数部分,解决类似12月30日,31日划分到下一年的问题。

这个实现存在一些问题。

如果元旦是周五,周六或者周日,例如20110101,它是周六,IW会认为这天是2010年的第五十二周。SQL> select to_char(to_date('20110101','yyyymmdd'),'IW') from dual;

TO

--

52

对于这个问题,我没有解决的方法,但是一个同事有另外一个方案,用自定义的周序列,使用偏移量。select case

when (yweek = min(yweek)over(partition by mon order by yweek)) then

mon_name

else

null

end as month,

yweek as yweek,

row_number() over(partition by mon order by yweek) as mweek,

sum(decode(wday, '1', mday, null)) as sun,

sum(decode(wday, '2', mday, null)) as mon,

sum(decode(wday, '3', mday, null)) as tue,

sum(decode(wday, '4', mday, null)) as wed,

sum(decode(wday, '5', mday, null)) as thu,

sum(decode(wday, '6', mday, null)) as fri,

sum(decode(wday, '7', mday, null)) as sat

from (select dayofyear as everyday,

to_char(dayofyear, 'mm') as mon,

to_char(dayofyear, 'Month') as mon_name,

to_char(dayofyear, 'w') as mweek,

ceil(to_number(dayIndex)/7) as yweek,

to_char(dayofyear, 'd') as wday,

to_char(dayofyear, 'dd') as mday

from (

select

to_date(&year || '0101', 'yyyymmdd') + level - 1 as dayofyear,

to_char(s.firstday,'d')+rownum dayIndex

from

dual,(select to_date(&year || '0101','yyyymmdd')-1 firstday from dual) s

connect by level <= to_char(to_date(&year || '1231', 'yyyymmdd'),'ddd')

)

)

group by mon, mon_name, yweek

/

98cb7cf90bc1dd4a17ee964f0e9d6759.gifcase when   (to_char(to_date(&year || '0101', 'yyyymmdd'), 'd') > '1')

and

(to_char(dayofyear, 'd') 

then

to_char(to_char(dayofyear, 'ww') + 1, 'fm00')

else

to_char(dayofyear, 'ww')

end as new_yweek

以2013年一月为例,元旦是周二(不是周日,满足了Case When的第一个条件)

6,7日是周日、周一,小于元旦的周二,所以所在周+1,那么行列转置后在日历上就下沉了一层。

1 要构造某年某月的日历,必须先知道这个月的开始时间,结束时间及天数

开始日期 例如 2006年11月

select to_date('20061101','yyyymmdd') as startDayOfMon from  dual;

结束日期

select last_day(to_date('20061101','yyyymmdd')) as endDayOfMon from  dual;

日期区间天数

select last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1 as DayOfMon

from dual;

2 接下来就是需要得到开始时间到结束时间每一天的结果集

select * from (

select to_date('20061101','yyyymmdd') + level - 1 as everyDay from dual

connect by level <=

(last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1));

3 再进一步则是将该月中的日期分解成第几周,星期几。

select everyDay,to_char(everyday,'yyyy') as 年,

to_char(everyday,'mm') as 月,

to_char(everyday,'dd') as 日,

to_char(everyday,'dy') as 星期几,

lpad(to_char(everyday,'w'),6) as 该月的第几周,

lpad(to_char(everyday,'ww'),6) as 该年的第几周

from(select to_date('20061101','yyyymmdd') + level - 1 as everyDay from dual

connect by level <=

(last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1));

4 这个结果集求出来后,接下拉就是使用DECODE函数进行行列转换了

select everyDay,to_char(everyday,'yyyy') as 年,

to_char(everyday,'mm') as 月,

to_char(everyday,'dd') as 日,

to_char(everyday,'dy') as 星期几,

lpad(to_char(everyday,'w'),6) as 该月的第几周,

lpad(to_char(everyday,'ww'),6) as 该年的第几周,

lpad(decode(to_char(everyday,'dy'),'星期日',to_char(everyday,'dd')),3) as 星期日,

lpad(decode(to_char(everyday,'dy'),'星期一',to_char(everyday,'dd')),3) as 星期一,

lpad(decode(to_char(everyday,'dy'),'星期二',to_char(everyday,'dd')),3) as 星期二,

lpad(decode(to_char(everyday,'dy'),'星期三',to_char(everyday,'dd')),3) as 星期三,

lpad(decode(to_char(everyday,'dy'),'星期四',to_char(everyday,'dd')),3) as 星期四,

lpad(decode(to_char(everyday,'dy'),'星期五',to_char(everyday,'dd')),3) as 星期五,

lpad(decode(to_char(everyday,'dy'),'星期六',to_char(everyday,'dd')),3) as 星期六

from(select to_date('20061101','yyyymmdd') + level - 1 as everyDay from dual

connect by level <=

(last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1));

5 再进一步就是统计汇总了,大家发现一个小问题没有?

就是该月的第几周这里是按本月开始是星期几为开始的日期,很有意思,

这样我们按该日是该年的第几周则是以今年开始日期是星期几为开始日期

select  to_char(everyday,'w') as week,

sum(decode(to_char(everyday,'dy'),'星期日',to_char(everyday,'dd'))) as 星期日,

sum(decode(to_char(everyday,'dy'),'星期一',to_char(everyday,'dd'))) as 星期一,

sum(decode(to_char(everyday,'dy'),'星期二',to_char(everyday,'dd'))) as 星期二,

sum(decode(to_char(everyday,'dy'),'星期三',to_char(everyday,'dd'))) as 星期三,

sum(decode(to_char(everyday,'dy'),'星期四',to_char(everyday,'dd'))) as 星期四,

sum(decode(to_char(everyday,'dy'),'星期五',to_char(everyday,'dd'))) as 星期五,

sum(decode(to_char(everyday,'dy'),'星期六',to_char(everyday,'dd'))) as 星期六

from(select to_date('20061101','yyyymmdd') + level - 1 as everyDay

from dual

connect by level <= (last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1)

)

group by to_char(everyday,'w');

6 以上日历基本成功,但还有一个问题,就是一周的开始时间问题

select  to_char(everyday,'ww') as week,

sum(decode(to_char(everyday,'dy'),'星期日',to_char(everyday,'dd'))) as 星期日,

sum(decode(to_char(everyday,'dy'),'星期一',to_char(everyday,'dd'))) as 星期一,

sum(decode(to_char(everyday,'dy'),'星期二',to_char(everyday,'dd'))) as 星期二,

sum(decode(to_char(everyday,'dy'),'星期三',to_char(everyday,'dd'))) as 星期三,

sum(decode(to_char(everyday,'dy'),'星期四',to_char(everyday,'dd'))) as 星期四,

sum(decode(to_char(everyday,'dy'),'星期五',to_char(everyday,'dd'))) as 星期五,

sum(decode(to_char(everyday,'dy'),'星期六',to_char(everyday,'dd'))) as 星期六

from(select to_date('20061101','yyyymmdd') + level - 1 as everyDay

from dual

connect by level <= (last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1)

)

group by to_char(everyday,'ww');

7  这样虽然可以解决,但还存在问题,大家可以考虑下!也可以考虑下年历怎么做!

select  ceil((to_char(everyday,'dd')+(to_char(to_date('20061101','yyyymmdd'),'d')-1))/7) as week,

sum(decode(to_char(everyday,'dy'),'星期日',to_char(everyday,'dd'))) as 星期日,

sum(decode(to_char(everyday,'dy'),'星期一',to_char(everyday,'dd'))) as 星期一,

sum(decode(to_char(everyday,'dy'),'星期二',to_char(everyday,'dd'))) as 星期二,

sum(decode(to_char(everyday,'dy'),'星期三',to_char(everyday,'dd'))) as 星期三,

sum(decode(to_char(everyday,'dy'),'星期四',to_char(everyday,'dd'))) as 星期四,

sum(decode(to_char(everyday,'dy'),'星期五',to_char(everyday,'dd'))) as 星期五,

sum(decode(to_char(everyday,'dy'),'星期六',to_char(everyday,'dd'))) as 星期六

from(select to_date('20061101','yyyymmdd') + level - 1 as everyDay

from dual

connect by level <= (last_day(to_date('20061101','yyyymmdd')) - to_date('20061101','yyyymmdd') +1)

)

group by ceil((to_char(everyday,'dd')+(to_char(to_date('20061101','yyyymmdd'),'d')-1))/7);

以上是最终的结果。

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值