[转] SQL日期函数dayadd/datediff/datepart

Posted 博客园

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了[转] SQL日期函数dayadd/datediff/datepart相关的知识,希望对你有一定的参考价值。

  1 函数一:
  2 
  3 CREATE OR REPLACE FUNCTION dayadd(p_Component varchar2,
  4                                   p_Number    number,
  5                                   p_Date      date) RETURN DATE IS
  6   /****************************************************************/
  7   /*      该函数为日期计算函数主要是计算〕                              */
  8   /*     从当前日期开始经过多少日、季、月、年等后的日期。                 */
  9   /*     入参说明:p_Component         时间元件,如年月日季度等等       */
 10   /*                 p_Number        加数, 注意:应该为整数(可正可负) */
 11   /*                 p_Date                基准时间                */
 12   /*  注意:其他日期元件,如世纪等等,暂时未考虑                         */
 13   /***************************************************************/
 14  
 15   v_Component       varchar2(10);
 16   v_MiddleNumber    number;
 17   v_ReturnValue_Str varchar2(20); --字符串日期格式
 18   v_ReturnValue     date; --返回日期
 19  
 20 BEGIN
 21   v_Component := upper(ltrim(rtrim(p_Component)));
 22   if v_Component in (Y, YY, YEAR, YYYY) then
 23     --年情况
 24     v_ReturnValue := add_months(p_Date, p_Number * 12);
 25   elsif v_Component in (M, MM, MONTH, MON) then
 26     --月情况
 27     v_ReturnValue := add_months(p_Date, p_Number);
 28   elsif v_Component in (D, DD, DAY) then
 29     --日情况
 30     v_ReturnValue := p_Date + p_Number;
 31   elsif v_Component in (H, HH, HOUR) then
 32     --时情况
 33     v_ReturnValue := p_Date + p_Number / 24;
 34   elsif v_Component in (MI, MINUTE) then
 35     --分情况
 36     v_ReturnValue := p_Date + p_Number / 1440;
 37   elsif v_Component in (S, SS, SECOND) then
 38     --秒情况
 39     v_ReturnValue := p_Date + p_Number / 86400;
 40   elsif v_Component in (Q, QQ, QUARTER) then
 41     --季度情况
 42     v_ReturnValue := p_Date + p_Number * 3;
 43   elsif v_Component in (W, WW, WK, WEEK) then
 44     --周情况
 45     v_ReturnValue := p_Date + p_Number * 7;
 46   else
 47     v_ReturnValue := to_date(1-1-1, yyyy-mm-dd);
 48   end if;
 49   RETURN v_ReturnValue;
 50 EXCEPTION
 51   WHEN OTHERS THEN
 52     RETURN to_date(1-1-1, yyyy-mm-dd); --例外处理
 53  
 54 END;
 55  
 56  
 57 
 58 函数二:
 59 
 60  
 61 
 62 create or replace function datediff(p_Component   varchar2,
 63                                     p_Subtranhend date,
 64                                     p_Minuend     date) RETURN NUMBER IS
 65   /*************************************************************************/
 66   /*      功    能:返回两个日期之间的天、周、月、年等数量。               */
 67   /*      入参说明: p_Component    时间元件,如年月日季度等等             */
 68   /*                 p_Subtrahend   减数时间                               */
 69   /*                 p_Minuend     被减数时间                              */
 70   /*************************************************************************/
 71  
 72   v_ReturnValue   number; -- 结果数值
 73   v_Component     varchar2(10); --日期组件中间转换形式,截取空格并且转为大写
 74   v_YearNum1      number; --减数年份数
 75   v_YearNum2      number; --被减数年份数
 76   v_MonthNum1     number; --减数月份数
 77   v_MonthNum2     number; --被减数月份数
 78   v_HourNum1      number; --减数时数
 79   v_HourNum2      number; --被减数时数
 80   v_MinuteNum1    number; --减数分钟数
 81   v_MinuteNum2    number; --被减数分钟数
 82   v_SecondNum1    number; --减数秒钟数
 83   v_SecondNum2    number; --减数秒钟数
 84   v_QuarterValue1 number; --减数季度数
 85   v_QuarterValue2 number; --被减数季度数
 86   v_WeekNum1      number; --减数与标准时间周差
 87   v_WeekNum2      number; --被减数与标准时间周差
 88 BEGIN
 89   v_Component := upper(ltrim(rtrim(p_Component)));
 90   if v_Component in (Y, YY, YEAR, YYYY) then
 91     --年情况 
 92     v_YearNum1    := to_number(to_char(p_Subtranhend, YYYY));
 93     v_YearNum2    := to_number(to_char(p_Minuend, YYYY));
 94     v_ReturnValue := v_YearNum2 - v_YearNum1;
 95   elsif v_Component in (M, MM, MONTH, MON) then
 96     --月情况
 97     --请注意,这个部分与Oracle内置日期函数MONTH_BETWEEN()不同,忽略了日因素
 98     --而后者的两个日期如都是所在月的最后一天,才返回整数,否则,返回分数
 99     --而且这个分数是以31天作为一个月进行计算的结果
100     v_YearNum1    := to_number(to_char(p_Subtranhend, YYYY));
101     v_YearNum2    := to_number(to_char(p_Minuend, YYYY));
102     v_MonthNum1   := to_number(to_char(p_Subtranhend, MM));
103     v_MonthNum2   := to_number(to_char(p_Minuend, MM));
104     v_ReturnValue := (v_YearNum2 - v_YearNum1) * 12 +
105                      (v_MonthNum2 - v_MonthNum1);
106   elsif v_Component in (D, DD, DAY) then
107     --日情况
108     --这里与两个日期直接相减的oracle日期算术也不同,只返回整数天数;
109     --而后者可以返回一天的几分之几(以小数形式表达)
110     v_ReturnValue := to_date(to_char(p_Minuend, yyyy-mm-dd), YYYY-MM-DD) -
111                      to_date(to_char(p_Subtranhend, yyyy-mm-dd),
112                              YYYY-MM-DD);
113   elsif v_Component in (H, HH, HOUR) then
114     --时情况
115     --第一步:求出天数
116     v_ReturnValue := (to_date(to_char(p_Minuend, yyyy-mm-dd),
117                               YYYY-MM-DD) -
118                      to_date(to_char(p_Subtranhend, yyyy-mm-dd),
119                               YYYY-MM-DD));
120     --第二步:求出时数
121     v_HourNum1    := to_number(to_char(p_Subtranhend, HH24));
122     v_HourNum2    := to_number(to_char(p_Minuend, HH24));
123     v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
124   elsif v_Component in (MI, MINUTE) then
125     --分情况
126     --第一步:求出天数
127     v_ReturnValue := (to_date(to_char(p_Minuend, yyyy-mm-dd),
128                               YYYY-MM-DD) -
129                      to_date(to_char(p_Subtranhend, yyyy-mm-dd),
130                               YYYY-MM-DD));
131     --第二步:求出时数
132     v_HourNum1    := to_number(to_char(p_Subtranhend, HH24));
133     v_HourNum2    := to_number(to_char(p_Minuend, HH24));
134     v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
135     --第三步:求出分钟数
136     v_MinuteNum1  := to_number(to_char(p_Subtranhend, MI));
137     v_MinuteNum2  := to_number(to_char(p_Minuend, MI));
138     v_ReturnValue := v_ReturnValue * 60 + (v_MinuteNum2 - v_MinuteNum1);
139   elsif v_Component in (S, SS, SECOND) then
140     --秒情况
141     --第一步:求出天数
142     v_ReturnValue := (to_date(to_char(p_Minuend, yyyy-mm-dd),
143                               YYYY-MM-DD) -
144                      to_date(to_char(p_Subtranhend, yyyy-mm-dd),
145                               YYYY-MM-DD));
146     --第二步:求出时数
147     v_HourNum1    := to_number(to_char(p_Subtranhend, HH24));
148     v_HourNum2    := to_number(to_char(p_Minuend, HH24));
149     v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
150     --第三步:求出分钟数
151     v_MinuteNum1  := to_number(to_char(p_Subtranhend, MI));
152     v_MinuteNum2  := to_number(to_char(p_Minuend, MI));
153     v_ReturnValue := v_ReturnValue * 60 + (v_MinuteNum2 - v_MinuteNum1);
154     --第四步:求出秒钟数
155     v_SecondNum1  := to_number(to_char(p_Subtranhend, SS));
156     v_SecondNum2  := to_number(to_char(p_Minuend, SS));
157     v_ReturnValue := v_ReturnValue * 60 + (v_SecondNum2 - v_SecondNum1);
158   elsif v_Component in (Q, QQ, QUARTER) then
159     --季度情况
160     v_YearNum1      := to_number(to_char(p_Subtranhend, YYYY));
161     v_YearNum2      := to_number(to_char(p_Minuend, YYYY));
162     v_QuarterValue1 := to_number(to_char(p_Subtranhend, Q));
163     v_QuarterValue2 := to_number(to_char(p_Minuend, Q));
164     v_ReturnValue   := (v_YearNum2 - v_YearNum1) * 4 +
165                        (v_QuarterValue2 - v_QuarterValue1);
166   elsif v_Component in (W, WW, WK, WEEK) then
167     --周情况
168     --一周的起始日期应当为星期日
169     --关于周差的计算,尝试采用中间日期的方法
170     --经查,‘1-1-2’即公元一年1月2日为周日,我们就可以用两个时间分别与其相减求周差
171     --两个结果再相减,即可得到正确的数值
172     v_WeekNum1    := floor((to_date(to_char(p_Subtranhend, YYYY-MM-DD),
173                                     YYYY-MM-DD) -
174                            to_date(1-1-2, YYYY-MM-DD)) / 7);
175     v_WeekNum2    := floor((to_date(to_char(p_Minuend, YYYY-MM-DD),
176                                     YYYY-MM-DD) -
177                            to_date(1-1-2, YYYY-MM-DD)) / 7);
178     v_ReturnValue := v_WeekNum2 - v_WeekNum1;
179   else
180     v_ReturnValue := -88888;
181   end if;
182   RETURN v_ReturnValue;
183 EXCEPTION
184   WHEN OTHERS THEN
185     RETURN - 99999; --例外处理
186 END datediff;
187  
188 函数三:
189 
190  
191 
192 create or replace function datepart(p_Component varchar2, p_Date date)
193   RETURN NUMBER IS
194   /*************************************************************************/
195   /*       功   能:获取某个日期中的部分时间元件(日、月、年、分、秒、等) */
196   /*       入参说明:        p_Component 时间元件,如年月日季度等等        */
197   /*                          p_Date            需要解析的时间             */
198   /*************************************************************************/
199   v_Component   varchar2(10);
200   v_ReturnValue NUMBER;
201 BEGIN
202   v_Component := upper(ltrim(rtrim(p_Component)));
203   if v_Component in (Y, YY, YEAR, YYYY) then
204     --年情况
205     v_ReturnValue := to_number(to_char(p_Date, YYYY));
206   elsif v_Component in (M, MM, MONTH, MON) then
207     --月情况
208     v_ReturnValue := to_number(to_char(p_Date, MM));
209   elsif v_Component in (D, DD, DAY) then
210     --日情况
211     v_ReturnValue := to_number(to_char(p_Date, DD));
212   elsif v_Component in (H, HH, HOUR, HH24) then
213     --时情况
214     v_ReturnValue := to_number(to_char(p_Date, HH24));
215   elsif v_Component in (MI, MINUTE) then
216     --分情况
217     v_ReturnValue := to_number(to_char(p_Date, MI));
218   elsif v_Component in (S, SS, SECOND) then
219     --秒情况
220     v_ReturnValue := to_number(to_char(p_Date, SS));
221   elsif v_Component in (Q, QQ, QUARTER) then
222     --季度情况
223     v_ReturnValue := to_number(to_char(p_Date, Q));
224   elsif v_Component in (W, WW, WK, WEEK) then
225     --周几情况(周日为第一天)
226     v_ReturnValue := to_number(to_char(p_Date, D));
227   elsif v_Component in (WEEK_NO) then
228     -- 第几周情况
229     v_ReturnValue := to_number(to_char(p_Date, IW));
230   else
231     v_ReturnValue := -88888;
232   end if;
233  
234   RETURN v_ReturnValue;
235 EXCEPTION
236   WHEN OTHERS THEN
237     RETURN - 99999; --例外处理
238  
239 END datepart;

 

以上是关于[转] SQL日期函数dayadd/datediff/datepart的主要内容,如果未能解决你的问题,请参考以下文章

sql 怎样将时间转成日期?

sql日期转string

Sql字符串转日期格式的问题

SQL语句中, 怎样把日期转为字符串?

sql sqlsever操作 日期格式 yyyy-mm-dd hh:mm:ss 用CONVERT函数怎么转成yyyy-mm-dd

(转)Sql日期时间格式转换