问题描述输入你要生成日历的年份,调用存储过程就可以生成该年的所有日历。创建表结构我们在普通日历表的基础上创建一个包含年、月、日、周的日历表。具体表结构如下:CREATETABLECALENDAR_INFO(COUNTRYVARCHAR(5),--'国家'CDR_CODEVARCHAR(5),--'日历代码'DATE_NAMEVARCHAR(20),--'日期名称'YEARCHAR(4),--'year'MONTHCHAR(2),--'month'WEEKCHAR(6),--'week'DAYCHAR(2),--'day'CDR_DATECHAR(10),--'calendardate'CREATORVARCHAR(32),--'creator'CREATE_DATEDATETIME,--'创建日期'CREATE_INSTVARCHAR(20),--'创建组织'DEL_FLAGCHAR(1)DEFAULT0,--'删除标志'0:不删除,1:删除TSDATETIMEDEFAULTGETDATE()--'时间戳')在上面的表结构中,我们将年、月、周、日等以日历的形式单独列显示,并且在最后添加了两个默认值,一个是删除标志,默认0表示不删除,1表示删除,时间戳为系统时间。创建存储过程调用参数,一般使用存储过程传递参数。下面我们根据需求创建一个存储过程。我们给存储过程传入??一个INT参数,表示年份,然后取一年中的天数,从1月1日到12月31日累计,将每一天的相关信息插入表中,这样一个完整的日历整整一年就结束了。让我们开始在SQLServer环境中编写这个存储过程。CREATEPROCPROC_CALENDAR(@YEARINT)ASBEGINDECLARE@iINT;DECLARE@START_DATEVARCHAR(20);DECLARE@END_DATEVARCHAR(20);DECLARE@DATE_COUNTINT;设置@i=0;CONCAT函数连接年月日期SET@START_DATE=CONCAT(@YEAR,'-01-01');--定义一年的结束日期SET@END_DATE=CONCAT(@YEAR+1,'-01-01');--如果表中已经存在要创建的日历,删除DELETEFROMCALENDAR_INFOWHEREYEAR=@YEAR;--计算从开始日期到结束日期的总天数,DATEDIFF函数计算numberofdaysbetweendatesSET@DATE_COUNT=DATEDIFF(DAY,@START_DATE,@END_DATE);--创建一个循环,条件是@i小于一年中的天数WHILE@i<@DATE_COUNTBEGININSERTINTOCALENDAR_INFO(COUNTRY,CDR_CODE,DATE_NAME,YEAR,MONTH,WEEK,DAY,CDR_DATE,CREATOR,CREATE_DATE,CREATE_INST)SELECT'CN','CN01',--CONVERT函数将@START_DATE转换成指定格式CONVERT(CHAR(10),@START_DATE,111)DATE_NAME,--DATENAME获取@START_DATECONVERT(CHAR(4),DATENAME(YEAR,@START_DATE))YEAR,--DATENAME获取@START_DATECONVERT(CHAR(2),DATENAME(MONTH,@START_DATE))MONTH,--DATENAME获取@START_DATE的星期CONVERT(CHAR(6),DATENAME(WEEKDAY,@START_DATE))WEEK,--DATENAME获取@START_DATE的日期CONVERT(CHAR(2),DATENAME(DAY,@START_DATE))DAY,CONVERT(CHAR(10),@START_DATE,120)CDR_DATE,'平凡的世界',GETDATE()CREATE_DATE,'Lyven'--插入完成后@i自增1SET@i=@i+1;--更新@START_DATE值,使用DATEADD函数在原来的基础上增加一天SET@START_DATE=CONVERT(CHAR(10),DATEADD(DAY,1,@START_DATE),120);为了方便阅读,在每行代码上方都添加了ENDEND注意如果对SQL系统函数不熟悉,可以搜索相关函数的用法。调用存储过程EXECPROC_CALENDAR2021验证结果后,我们查询CALENDAR_INFO表中的数据SELECT*FROMCALENDAR_INFO结果:查日历,2021-01-01是星期五,说明我们写的日历是正确的。细心的朋友们,不知道你们有没有发现,历法中少了中国的农历。有兴趣的朋友可以想想农历怎么写。
