函数一:

 CREATE OR REPLACE FUNCTION dayadd(p_Component varchar2,
p_Number number,
p_Date date) RETURN DATE IS
/****************************************************************/
/* 该函数为日期计算函数主要是计算〕 */
/*  从当前日期开始经过多少日、季、月、年等后的日期。 */
/* 入参说明:p_Component 时间元件,如年月日季度等等 */
/* p_Number 加数, 注意:应该为整数(可正可负) */
/* p_Date 基准时间 */
/* 注意:其他日期元件,如世纪等等,暂时未考虑 */
/***************************************************************/ v_Component varchar2(10);
v_MiddleNumber number;
v_ReturnValue_Str varchar2(20); --字符串日期格式
v_ReturnValue date; --返回日期 BEGIN
v_Component := upper(ltrim(rtrim(p_Component)));
if v_Component in ('Y', 'YY', 'YEAR', 'YYYY') then
--年情况
v_ReturnValue := add_months(p_Date, p_Number * 12);
elsif v_Component in ('M', 'MM', 'MONTH', 'MON') then
--月情况
v_ReturnValue := add_months(p_Date, p_Number);
elsif v_Component in ('D', 'DD', 'DAY') then
--日情况
v_ReturnValue := p_Date + p_Number;
elsif v_Component in ('H', 'HH', 'HOUR') then
--时情况
v_ReturnValue := p_Date + p_Number / 24;
elsif v_Component in ('MI', 'MINUTE') then
--分情况
v_ReturnValue := p_Date + p_Number / 1440;
elsif v_Component in ('S', 'SS', 'SECOND') then
--秒情况
v_ReturnValue := p_Date + p_Number / 86400;
elsif v_Component in ('Q', 'QQ', 'QUARTER') then
--季度情况
v_ReturnValue := p_Date + p_Number * 3;
elsif v_Component in ('W', 'WW', 'WK', 'WEEK') then
--周情况
v_ReturnValue := p_Date + p_Number * 7;
else
v_ReturnValue := to_date('1-1-1', 'yyyy-mm-dd');
end if;
RETURN v_ReturnValue;
EXCEPTION
WHEN OTHERS THEN
RETURN to_date('1-1-1', 'yyyy-mm-dd'); --例外处理 END; 函数二: create or replace function datediff(p_Component varchar2,
p_Subtranhend date,
p_Minuend date) RETURN NUMBER IS
/*************************************************************************/
/* 功 能:返回两个日期之间的天、周、月、年等数量。 */
/* 入参说明: p_Component 时间元件,如年月日季度等等 */
/* p_Subtrahend 减数时间 */
/* p_Minuend 被减数时间 */
/*************************************************************************/ v_ReturnValue number; -- 结果数值
v_Component varchar2(10); --日期组件中间转换形式,截取空格并且转为大写
v_YearNum1 number; --减数年份数
v_YearNum2 number; --被减数年份数
v_MonthNum1 number; --减数月份数
v_MonthNum2 number; --被减数月份数
v_HourNum1 number; --减数时数
v_HourNum2 number; --被减数时数
v_MinuteNum1 number; --减数分钟数
v_MinuteNum2 number; --被减数分钟数
v_SecondNum1 number; --减数秒钟数
v_SecondNum2 number; --减数秒钟数
v_QuarterValue1 number; --减数季度数
v_QuarterValue2 number; --被减数季度数
v_WeekNum1 number; --减数与标准时间周差
v_WeekNum2 number; --被减数与标准时间周差
BEGIN
v_Component := upper(ltrim(rtrim(p_Component)));
if v_Component in ('Y', 'YY', 'YEAR', 'YYYY') then
--年情况
v_YearNum1 := to_number(to_char(p_Subtranhend, 'YYYY'));
v_YearNum2 := to_number(to_char(p_Minuend, 'YYYY'));
v_ReturnValue := v_YearNum2 - v_YearNum1;
elsif v_Component in ('M', 'MM', 'MONTH', 'MON') then
--月情况
--请注意,这个部分与Oracle内置日期函数MONTH_BETWEEN()不同,忽略了日因素
--而后者的两个日期如都是所在月的最后一天,才返回整数,否则,返回分数
--而且这个分数是以31天作为一个月进行计算的结果
v_YearNum1 := to_number(to_char(p_Subtranhend, 'YYYY'));
v_YearNum2 := to_number(to_char(p_Minuend, 'YYYY'));
v_MonthNum1 := to_number(to_char(p_Subtranhend, 'MM'));
v_MonthNum2 := to_number(to_char(p_Minuend, 'MM'));
v_ReturnValue := (v_YearNum2 - v_YearNum1) * 12 +
(v_MonthNum2 - v_MonthNum1);
elsif v_Component in ('D', 'DD', 'DAY') then
--日情况
--这里与两个日期直接相减的oracle日期算术也不同,只返回整数天数;
--而后者可以返回一天的几分之几(以小数形式表达)
v_ReturnValue := to_date(to_char(p_Minuend, 'yyyy-mm-dd'), 'YYYY-MM-DD') -
to_date(to_char(p_Subtranhend, 'yyyy-mm-dd'),
'YYYY-MM-DD');
elsif v_Component in ('H', 'HH', 'HOUR') then
--时情况
--第一步:求出天数
v_ReturnValue := (to_date(to_char(p_Minuend, 'yyyy-mm-dd'),
'YYYY-MM-DD') -
to_date(to_char(p_Subtranhend, 'yyyy-mm-dd'),
'YYYY-MM-DD'));
--第二步:求出时数
v_HourNum1 := to_number(to_char(p_Subtranhend, 'HH24'));
v_HourNum2 := to_number(to_char(p_Minuend, 'HH24'));
v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
elsif v_Component in ('MI', 'MINUTE') then
--分情况
--第一步:求出天数
v_ReturnValue := (to_date(to_char(p_Minuend, 'yyyy-mm-dd'),
'YYYY-MM-DD') -
to_date(to_char(p_Subtranhend, 'yyyy-mm-dd'),
'YYYY-MM-DD'));
--第二步:求出时数
v_HourNum1 := to_number(to_char(p_Subtranhend, 'HH24'));
v_HourNum2 := to_number(to_char(p_Minuend, 'HH24'));
v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
--第三步:求出分钟数
v_MinuteNum1 := to_number(to_char(p_Subtranhend, 'MI'));
v_MinuteNum2 := to_number(to_char(p_Minuend, 'MI'));
v_ReturnValue := v_ReturnValue * 60 + (v_MinuteNum2 - v_MinuteNum1);
elsif v_Component in ('S', 'SS', 'SECOND') then
--秒情况
--第一步:求出天数
v_ReturnValue := (to_date(to_char(p_Minuend, 'yyyy-mm-dd'),
'YYYY-MM-DD') -
to_date(to_char(p_Subtranhend, 'yyyy-mm-dd'),
'YYYY-MM-DD'));
--第二步:求出时数
v_HourNum1 := to_number(to_char(p_Subtranhend, 'HH24'));
v_HourNum2 := to_number(to_char(p_Minuend, 'HH24'));
v_ReturnValue := v_ReturnValue * 24 + (v_HourNum2 - v_HourNum1);
--第三步:求出分钟数
v_MinuteNum1 := to_number(to_char(p_Subtranhend, 'MI'));
v_MinuteNum2 := to_number(to_char(p_Minuend, 'MI'));
v_ReturnValue := v_ReturnValue * 60 + (v_MinuteNum2 - v_MinuteNum1);
--第四步:求出秒钟数
v_SecondNum1 := to_number(to_char(p_Subtranhend, 'SS'));
v_SecondNum2 := to_number(to_char(p_Minuend, 'SS'));
v_ReturnValue := v_ReturnValue * 60 + (v_SecondNum2 - v_SecondNum1);
elsif v_Component in ('Q', 'QQ', 'QUARTER') then
--季度情况
v_YearNum1 := to_number(to_char(p_Subtranhend, 'YYYY'));
v_YearNum2 := to_number(to_char(p_Minuend, 'YYYY'));
v_QuarterValue1 := to_number(to_char(p_Subtranhend, 'Q'));
v_QuarterValue2 := to_number(to_char(p_Minuend, 'Q'));
v_ReturnValue := (v_YearNum2 - v_YearNum1) * 4 +
(v_QuarterValue2 - v_QuarterValue1);
elsif v_Component in ('W', 'WW', 'WK', 'WEEK') then
--周情况
--一周的起始日期应当为星期日
--关于周差的计算,尝试采用中间日期的方法
--经查,‘1-1-2’即公元一年1月2日为周日,我们就可以用两个时间分别与其相减求周差
--两个结果再相减,即可得到正确的数值
v_WeekNum1 := floor((to_date(to_char(p_Subtranhend, 'YYYY-MM-DD'),
'YYYY-MM-DD') -
to_date('1-1-2', 'YYYY-MM-DD')) / 7);
v_WeekNum2 := floor((to_date(to_char(p_Minuend, 'YYYY-MM-DD'),
'YYYY-MM-DD') -
to_date('1-1-2', 'YYYY-MM-DD')) / 7);
v_ReturnValue := v_WeekNum2 - v_WeekNum1;
else
v_ReturnValue := -88888;
end if;
RETURN v_ReturnValue;
EXCEPTION
WHEN OTHERS THEN
RETURN - 99999; --例外处理
END datediff; 函数三: create or replace function datepart(p_Component varchar2, p_Date date)
RETURN NUMBER IS
/*************************************************************************/
/* 功 能:获取某个日期中的部分时间元件(日、月、年、分、秒、等) */
/* 入参说明: p_Component 时间元件,如年月日季度等等 */
/* p_Date 需要解析的时间 */
/*************************************************************************/
v_Component varchar2(10);
v_ReturnValue NUMBER;
BEGIN
v_Component := upper(ltrim(rtrim(p_Component)));
if v_Component in ('Y', 'YY', 'YEAR', 'YYYY') then
--年情况
v_ReturnValue := to_number(to_char(p_Date, 'YYYY'));
elsif v_Component in ('M', 'MM', 'MONTH', 'MON') then
--月情况
v_ReturnValue := to_number(to_char(p_Date, 'MM'));
elsif v_Component in ('D', 'DD', 'DAY') then
--日情况
v_ReturnValue := to_number(to_char(p_Date, 'DD'));
elsif v_Component in ('H', 'HH', 'HOUR', 'HH24') then
--时情况
v_ReturnValue := to_number(to_char(p_Date, 'HH24'));
elsif v_Component in ('MI', 'MINUTE') then
--分情况
v_ReturnValue := to_number(to_char(p_Date, 'MI'));
elsif v_Component in ('S', 'SS', 'SECOND') then
--秒情况
v_ReturnValue := to_number(to_char(p_Date, 'SS'));
elsif v_Component in ('Q', 'QQ', 'QUARTER') then
--季度情况
v_ReturnValue := to_number(to_char(p_Date, 'Q'));
elsif v_Component in ('W', 'WW', 'WK', 'WEEK') then
--周几情况(周日为第一天)
v_ReturnValue := to_number(to_char(p_Date, 'D'));
elsif v_Component in ('WEEK_NO') then
-- 第几周情况
v_ReturnValue := to_number(to_char(p_Date, 'IW'));
else
v_ReturnValue := -88888;
end if; RETURN v_ReturnValue;
EXCEPTION
WHEN OTHERS THEN
RETURN - 99999; --例外处理 END datepart;

[转] SQL日期函数dayadd/datediff/datepart的更多相关文章

  1. sqlserver日期函数 dateadd,datediff ,datepart ,datename,convert

    reference:http://www.cnblogs.com/coconut_zhang/archive/2009/02/02/1382598.html http://blog.itpub.net ...

  2. DB2 SQL 日期函数

    DB2 SQL 日期函数1:CURRENT TIMESTAMP 函数:获取当前日期时间语法:CURRENT TIMESTAMP参数:当前日期时间返回值:当前日期时间 2:CURRENT DATE 函数 ...

  3. 四个很好用的Sql Server 日期函数:DateDiff、DatePart、DateAdd、DateName

    我以前查一段时间范围内的数据都是在程序里计算好日期再掉查询语句,现在我用下面的函数.SQL SERVER没有查一季度数据的函数. DateDiff函数: 描述 返回两个日期之间的时间间隔. 语法 Da ...

  4. sql日期函数操作

    sql语句获取本周.本月.本年数据 SQL Serverselect * from [data] where  DATEPART(m,[date])=2 Accessselect * from [da ...

  5. sql日期函数

    1.sql常用日期函数 当我们在进行数据处理的时候,常常需要用到日期函数的计算,最难的任务恐怕是确保所插入的日期的格式,与数据库中日期列的格式相匹配.只要数据包含的只是日期部分,运行查询就不会出问题. ...

  6. sql日期函数总结

    sql 时间转换格式 convert(varchar(10),字段名,转换格式)   convert(varchar(10),字段名,转换格式) CONVERT(nvarchar(10),count_ ...

  7. SQL 日期函数转换

    1.转换函数 与date操作关系最大的就是两个转换函数:to_date(),to_char() to_date() 作用将字符类型按一定格式转化为日期类型: 具体用法:to_date('2004-11 ...

  8. Sql server日期函数用法

    SQL日期函数 SQL日期函数中的类型码可以为0,1,2,3,4,5,6,7,8,9,10,11,12,13,14 ,20,21,22,23,24,25,100,101,102,103,104,105 ...

  9. SQL日期查询语句

    --查询当天(1: select * from ShopOrder where datediff(day,ordTime,getdate()-1)=0 --查询当天(2:select * from i ...

随机推荐

  1. WIFI 万能钥匙万玉权:团队之中要有跨三界之外的“闲人” [转]

      在团队规模较小时,很多事情都可以变得特别简单.比如架构的选择,大部分情况下,最初的架构越简单越好,随着业务的演进,架构才不断完善. 连尚网络经历了从几人到上百人的管理过程,其自主创新研发的产品 W ...

  2. C++开发者都应该使用的10个C++11特性 转

    http://blog.jobbole.com/44015/// | 分类: C/C++, 开发 | 条评论 | 标签: C++, C语言 分享到: 本文由 伯乐在线 - 治不好你我就不是兽医 翻译自 ...

  3. springmvc文件上传示例

    首先要导包,用的的包是: commons-fileupload-*.*.*.jar commons-io-*.*.jar *号代表版本号 这里给大家分享一下下载链接:https://files.cnb ...

  4. tensoFlow之DNN文本分类

    TensorFlow文本分类: 亲测可用:https://blog.csdn.net/u012052268/article/details/77862202 简单实例:https://www.leip ...

  5. js splice函数 数组增加,替换,删除

    splice函数参数介绍: 第一个参数: 对于数数组的操作起始位置. 第二个参数: 从第一个参数开始,删除数组中的个数. 从第三个参数之后所有参数(如果有):执行完第二步之后,都插入到第一个参数的起始 ...

  6. ef core中如何实现多对多的表映射关系

    文档:https://docs.microsoft.com/en-us/ef/core/modeling/relationships class MyContext : DbContext { pub ...

  7. ES6 promise学习笔记 -- 基本用法

    ES6 规定,Promise对象是一个构造函数,用来生成Promise实例. 下面代码创造了一个Promise实例. const promise = new Promise(function(reso ...

  8. 网络编程 多线程/socketserver模块/ threading.local

    线程:进程中负责程序执行的执行单元. 多线程:在1个进程中存在多个线程. 进程只是用来把资源集中在一起,而线程才是cpu上的执行单位. 每个进程都会默认有一个控制线程也叫作主线程. 进程之间是竞争关系 ...

  9. Apache Shiro 快速入门教程,shiro 基础教程

    第一部分 什么是Apache Shiro     1.什么是 apache shiro :   Apache Shiro是一个功能强大且易于使用的Java安全框架,提供了认证,授权,加密,和会话管理 ...

  10. [转]Haproxy原理(1)

    本文出处:https://www.cnblogs.com/skyflask/p/6970151.html 目录 一.四层和七层负载均衡的区别二.HAProxy与LVS的异同三.快速安装HAProxy集 ...