Database Journal
MS SQL Oracle DB2 Access MySQL PostgreSQL Sybase PHP SQL Etc SQL Scripts & Samples Tips Database Forum Rss Feed

» Database Journal Home
» Database Articles
» Database Tutorials
MS Access
SQL Scripts & Samples
» Database Forum
» Slideshows
Free Newsletters:

News Via RSS Feed

Rss Feed

Database Journal |DBA Support |SQLCourse |SQLCourse2

Featured Database Articles

SQL Scripts & Samples

Posted Jul 30, 2008

DateAdd function Oracle

By DatabaseJournal.com Staff

>>Script Language and Platform: Oracle
Get a new date based in interval parameter.

Author: Alexis

Create or replace  Function DateADD(DatePart VarChar , Number int, CurrentDate Date)
     DatePart       :  Specifies which part of the date to calculate the difference.
                    The table below list DateParts and abbreviations recognized
                     1)    D, DD, Day;
                     2)    M, MM, Month;
                     3)    Y, YY, Year;
                     4)    H, HH, Hour;
                     5)    N, NN, MI, Minute;
                     6)    S, SS, Second;
                     7)    W, WW, Week;
     Number         :  The count of days, months, hours, etc to be apply
     CurrentDate    :  The date for the calculation
 return date
 result    Date;
 sType    char(1);
     sType := substr(upper(DatePart), 1, 1);
     if sType = ''S'' then
         result := CurrentDate + Number/(24*60*60);
     end if;
     if sType = ''H'' then
         result := CurrentDate + Number/24;
     end if;
     if sType = ''D'' then
         result := CurrentDate + Number;
     end if;
     if sType = ''W'' then
         result := CurrentDate + (Number*7);
     end if;
     if sType = ''Y'' then
         result := Add_Months(CurrentDate, Number*12);
     end if;
     if sType = ''N'' then
         result := CurrentDate + Number/(24*60);
     end if;
     if sType = ''M'' then
         if upper(DatePart) like ''MI%'' then
             result := CurrentDate + Number/(24*60);
             result := Add_Months(CurrentDate, Number);
         end if;
     end if;
 return result;
 exception  when others then return null;

Disclaimer: We hope that the information on these script pages is valuable to you. Your use of the information contained in these pages, however, is at your sole risk. All information on these pages is provided "as -is", without any warranty, whether express or implied, of its accuracy, completeness, or fitness for a particular purpose... Disclaimer Continued

Back to Database Journal Home

SQL Scripts & Samples Archives

Latest Forum Threads
SQL Scripts & Samples Forum
Topic By Replies Updated
sql help!! add 1 August 22nd, 11:58 AM
How To Combine These 2 Queries into 1 Query ? tarek_land 1 June 7th, 08:37 AM
solving query svibuk 1 February 3rd, 06:08 AM
converting from a character string to uniqueidentifier saturnius 4 January 4th, 05:56 AM