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中生成所在周时对周日

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

贴一下结果

             

 

（本文完）