oracle 日期校验 (判断)

oracle 日期校验 (判断)

作者: nsq029  时间: 2010-06-24
oracle 日期判断,判断日期是否合法,返回标记值 若为0则表名日期合法,若日期格式不合法则会返回负值
输入日期格式为 YYYY-MM-DD 或 YYYYMMDD   类型 varchar2
 

CREATE OR REPLACE FUNCTION IS_DATE(
    IN_DATE IN VARCHAR2)
  RETURN INTEGER
AS
  FLAG INTEGER;
  YER VARCHAR2(4);
  MON VARCHAR2(2);
  TOD VARCHAR2(2);
BEGIN
  IF INSTR(IN_DATE, '-', 1, 1)=AND LENGTH(IN_DATE)=THEN
    YER :=SUBSTR(IN_DATE,1,4);
    MON :=SUBSTR(IN_DATE,5,2);
    TOD :=SUBSTR(IN_DATE,7,2);
  ELSE
    IF INSTR(IN_DATE, '-', 1, 1)=AND LENGTH(IN_DATE)=10 THEN
      YER :=SUBSTR(IN_DATE,1,4);
      MON :=SUBSTR(IN_DATE,6,2);
      TOD :=SUBSTR(IN_DATE,9,2);
    ELSE
      RETURN -1;
    END IF;
  END IF;
  IF MON NOT IN ('01','02','03','04','05','06','07','08','09','10','11','12') THEN
    RETURN -2;
  END IF;
  IF MON IN ('01','03','05','07','08','10','12') AND (TOD>'31' OR TOD<'01') THEN
    RETURN -3;
  END IF;
  IF MON IN('04','06','09','11') AND (TOD>'30' OR TOD<'01') THEN
    RETURN -4;
  END IF;
  IF MON='02' AND ((MOD(YER,4)=AND MOD(YER,100)<>OR MOD(YER,400)=0)) AND (TOD>'29' OR TOD<'01') THEN
    RETURN -5;
  END IF;
  IF MON='02' AND ( TOD>'28' OR TOD<'01') THEN
    RETURN -6;
  END IF;
  RETURN 0;
END IS_DATE;


http://www.phpfans.net/article/htmls/201006/Mjg4ODU4.html

  • 0
    点赞
  • 5
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值