數據庫日期加減處理

更新時間：2009年07月17日 01:12:53 作者：

對于日期指定部分的加減，使用DATEADD函數就可以輕松實現。

在實際的處理中，還有一種比較另類的日期加減處理，就是在指定的日期中，加上（或者減去）多個日期部分，比如將2005年3月11日，加上1年3個月11天2小時。對于這種日期的加減處理，DATEADD函數的力量就顯得有點不夠。

要實現多個日期部分的加減處理，最主要的就是把要加減的日期字符分解，然后根據分解的結果在指定日期的對應日期部分加上相應的值，其難點在于如何分解日期字符，以及判斷分解后的日期字符屬于哪個日期部分。要順利地分解出日期字符的話，首先要規(guī)定日期加減的日期字符的格式，可以這樣定義：
y-m-d h:m:s.m | -y-m-d h:m:s.m

復制代碼代碼如下:

說明：要加減的日期字符輸入方式與日期字符串相同。日期與時間部分用空格分隔，最前面一個字符如果是減號（-）的話，表示做減法處理，否則做加法處理。如果日期字符只包含數字，則視為日期字符中，僅包含天的信息。 

確定了日期字符格式后，處理方法就可以這樣確定：獲取日期字符的第一個字符，判斷處理方式，然后將要加減的日期字符按空格分拆為日期和時間兩部分，對于日期部分從低位到高位逐個截取日期數據進行處理，對于時間從高位到低位逐個處理。
以下是實現日期的多個部分同時加減處理的用戶定義函數代碼：

復制代碼代碼如下:

CREATE FUNCTION f_DateADD( 
@Date datetime, 
@DateStr varchar(23) 
)RETURNS datetime 
AS 
BEGIN 
DECLARE @bz int,@s varchar(12),@i int 
IF @DateStr IS NULL OR @Date IS NULL 
OR(CHARINDEX('.',@DateStr)>0 
AND @DateStr NOT LIKE '%[:]%[:]%.%') 
RETURN(NULL) 
IF @DateStr='' RETURN(@Date) 
SELECT @bz=CASE 
WHEN LEFT(@DateStr,1)='-' THEN -1 
ELSE 1 END, 
@DateStr=CASE 
WHEN LEFT(@Date,1)='-' 
THEN STUFF(RTRIM(LTRIM(@DateStr)),1,1,'') 
ELSE RTRIM(LTRIM(@DateStr)) END 
IF CHARINDEX(' ',@DateStr)>1 
OR CHARINDEX('-',@DateStr)>1 
OR(CHARINDEX('.',@DateStr)=0 
AND CHARINDEX(':',@DateStr)=0) 
BEGIN 
SELECT @i=CHARINDEX(' ',@DateStr+' ') 
,@s=REVERSE(LEFT(@DateStr,@i-1))+'-' 
,@DateStr=STUFF(@DateStr,1,@i,'') 
,@i=0 
WHILE @s>'' and @i<3 
SELECT @Date=CASE @i 
WHEN 0 THEN DATEADD(Day,@bz*REVERSE(LEFT(@s,CHARINDEX('-',@s)-1)),@Date) 
WHEN 1 THEN DATEADD(Month,@bz*REVERSE(LEFT(@s,CHARINDEX('-',@s)-1)),@Date) 
WHEN 2 THEN DATEADD(Year,@bz*REVERSE(LEFT(@s,CHARINDEX('-',@s)-1)),@Date) 
END, 
@s=STUFF(@s,1,CHARINDEX('-',@s),''), 
@i=@i+1 
END 
IF @DateStr>'' 
BEGIN 
IF CHARINDEX('.',@DateStr)>0 
SELECT @Date=DATEADD(Millisecond 
,@bz*STUFF(@DateStr,1,CHARINDEX('.',@DateStr),''), 
@Date), 
@DateStr=LEFT(@DateStr,CHARINDEX('.',@DateStr)-1)+':', 
@i=0 
ELSE 
SELECT @DateStr=@DateStr+':',@i=0 
WHILE @DateStr>'' and @i<3 
SELECT @Date=CASE @i 
WHEN 0 THEN DATEADD(Hour,@bz*LEFT(@DateStr,CHARINDEX(':',@DateStr)-1),@Date) 
WHEN 1 THEN DATEADD(Minute,@bz*LEFT(@DateStr,CHARINDEX(':',@DateStr)-1),@Date) 
WHEN 2 THEN DATEADD(Second,@bz*LEFT(@DateStr,CHARINDEX(':',@DateStr)-1),@Date) 
END, 
@DateStr=STUFF(@DateStr,1,CHARINDEX(':',@DateStr),''), 
@i=@i+1 
END 
RETURN(@Date) 
END 