SQL打印全年日历

原文:SQL打印全年日历数据库环境：SQL SERVER 2008R2

我之前有写过打印本月日历的SQL，里头有详细的说明。具体请参考前面的博文——生成本月日历。

全年日历只是在本月日历的基础上加了月信息，并按月份分组求得。

下面直接分享SQL

/*基础数据：年初日期，全年有多少天*/
WITH    x0
AS ( SELECT   CONVERT(DATE, '2015-01-01') AS yearbegin ,
CONVERT(DATE, '2015-12-31') AS yearend ,
DATEDIFF(DAY, '2015-01-01', '2015-12-31') AS dayscount
),/*枚举全年的所有日期*/
x1
AS ( SELECT   DATEADD(DAY, number, yearbegin) AS ndate
FROM     x0 ,
master.dbo.spt_values spt
WHERE    spt.type = 'P'
AND spt.number >= 0
AND spt.number <= dayscount
),/*罗列全年日期对应的月份，第几周，星期几，本月第几天*/
x2
AS ( SELECT   ndate ,
DATEPART(month, ndate) AS nmonth ,
DATEPART(week, ndate) AS nweek ,
DATEPART(weekday, ndate) AS nweekday ,
DATEPART(day, ndate) AS nday
FROM     x1
),/*按月份、所在周分组，生成全年日历*/
x3
AS ( SELECT   nmonth ,
nweek ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 1 THEN nday
END) AS VARCHAR(2)), '') AS 日 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 2 THEN nday
END) AS VARCHAR(2)), '') AS 一 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 3 THEN nday
END) AS VARCHAR(2)), '') AS 二 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 4 THEN nday
END) AS VARCHAR(2)), '') AS 三 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 5 THEN nday
END) AS VARCHAR(2)), '') AS 四 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 6 THEN nday
END) AS VARCHAR(2)), '') AS 五 ,
ISNULL(CAST(MAX(CASE nweekday
WHEN 7 THEN nday
END) AS VARCHAR(2)), '') AS 六
FROM     x2
GROUP BY nmonth ,
nweek
)/*将月份相同的值只在第一行显示*/
SELECT  REPLACE(CASE WHEN ROW_NUMBER() OVER ( PARTITION BY nmonth ORDER BY nweek ) = 1
THEN nmonth
ELSE -1
END, -1, '') AS 月份 ,
日 ,
一 ,
二 ,
三 ,
四 ,
五 ,
六
FROM    x3

代码不算多，60多行，而且也好理解。如果觉得把“周日”放在第一列有点别扭，可以x2中生成所在周时对周日

做一些特别处理就可以了。

贴一下结果







（本文完）