createor replace function FUN_CYCLE_DAYS(iv_date inchar,
iv_cycle inchar) returnintegeris--*****************************************************************************-- CopyRight (c) 2010, XXXX *-- All rights reserved. *-- *-- 文件名称 : FUN_CYCLE_DAYS.fnc *-- 摘 要 : 换算比年初/季初/月初天数 *-- 输入参数说明 : iv_date 换算日期 格式为'yyyymmdd' *-- iv_cycle 换算周期年初(Y/y)季初(Q/q)月初 (M/m) *-- ov_days 换算后的天数 *--输出结果说明:根据输入参数返回相应的天数 *-- 当前版本 : V1.0.0 *-- 作 者 : fly *-- 完成日期 : 2010/08/10 *-- 错误码段 : *--*****************************************************************************
ov_days integer;
v_date date;
iv_cycle_not_found exception; --自定义异常 输入参数未在约定范围begin
v_date := to_date(iv_date, 'yyyymmdd'); --转换为DATE类型IFUpper(iv_cycle) = 'M' thenselect floor(v_date - trunc(v_date, 'mm')) + 1 into ov_days from dual;
elsif Upper(iv_cycle) = 'Q' thenselect floor(v_date - trunc(v_date, 'Q')) + 1 into ov_days from dual;
elsif Upper(iv_cycle) = 'Y' thenselect floor(v_date - trunc(v_date, 'Y')) + 1 into ov_days from dual;else
RAISE iv_cycle_not_found;endif;return(ov_days);exceptionwhen iv_cycle_not_found then
dbms_output.put_line('输入的周期未在约定范围 年初(Y/y)季初(Q/q)月初 (M/m)' || sqlcode ||
SQLERRM);--如果发现输入日期格式不对 等错误直接抛出异常when others then dbms_output.put_line('发生异常 错误码:' || sqlcode ||
SQLERRM);end FUN_CYCLE_DAYS;
Oracle developer的异常处理机制
Oracle developer以其快速的数据处理开发而闻名,其异常处理机制也是比较完善,不可小觑。
1、 异常的优点
如果没有异常,在程序中,应当检查每个命令的成功还是失败,如
BEGIN
SELECT ...
-- check for ’no data found’ error
SELECT ...
-- check for ’no data found’ error
SELECT ...
-- check for ’no data found’ error
这种实现的方法缺点在于错误处理没有与正常处理分开,可读性差,使用异常,可以方便处理错误,而且异常处理程序与正常的事务逻辑分开,提高了可读性,如
BEGIN
SELECT ...
SELECT ...
SELECT ...
...
EXCEPTION
WHEN NO_DATA_FOUND THEN -- catches all ’no data found’ errors
2、 异常的分类
有两种类型的异常,一种为内部异常,一种为用户自定义异常,内部异常是执行期间返回到PL/SQL块的ORACLE错误或由PL/SQL代码的某操作引起的错误,如除数为零或内存溢出的情况。用户自定义异常由开发者显示定义,在PL/SQL块中传递信息以控制对于应用的错误处理。
每当PL/SQL违背了ORACLE原则或超越了系统依赖的原则就会隐式的产生内部异常。因为每个ORACLE错误都有一个号码并且在PL/SQL中异常通过名字处理,ORACLE提供了预定义的内部异常。如SELECT
INTO 语句不返回行时产生的ORACLE异常NO_DATA_FOUND。对于预定义异常,现将最常用的异常列举如下:
exception oracle error sqlcode value condition
no_data_found ora-01403 +100 select into 语句没有符合条件的记录返回
too_mang_rows ora-01422 -1422 select into 语句符合条件的记录有多条返回
dup_val_on_index ora-00001 -1
对于数据库表中的某一列,该列已经被限制为唯一索引,程序试图存储两个重复的值
value_error ora-06502 -6502
在转换字符类型,截取或长度受限时,会发生该异常,如一个字符分配给一个变量,而该变量声明的长度比该字符短,就会引发该异常
storage_error ora-06500 -6500 内存溢出
zero_divide ora-01476 -1476 除数为零
case_not_found ora-06592 -6530
对于选择case语句,没有与之相匹配的条件,同时,也没有else语句捕获其他的条件
cursor_already_open ora-06511 -6511 程序试图打开一个已经打开的游标
timeout_on_resource ora-00051 -51 系统在等待某一资源,时间超时
如果要处理未命名的内部异常,必须使用OTHERS异常处理器或PRAGMA EXCEPTION_INIT
。PRAGMA由编译器控制,或者是对于编译器的注释。PRAGMA在编译时处理,而不是在运行时处理。EXCEPTION_INIT告诉编译器将异常名与ORACLE错误码结合起来,这样可以通过名字引用任意的内部异常,并且可以通过名字为异常编写一适当的异常处理器。
在子程序中使用EXCEPTION_INIT的语法如下:
PRAGMA EXCEPTION_INIT(exception_name-Oracle_error_number);
在该语法中,异常名是声明的异常,下例是其用法:
DECLARE
deadlock_detected EXCEPTION;
PRAGMA EXCEPTION_INIT(deadlock_detected-60);
BEGIN
... -- Some operation that causes an ORA-00060 error
EXCEPTION
WHEN deadlock_detected THEN
-- handle the error
END;
对于用户自定义异常,只能在PL/SQL块中的声明部分声明异常,异常的名字由EXCEPTION关键字引入:
reserved_loaned Exception
产生异常后,控制传给了子程序的异常部分,将异常转向各自异常控制块,必须在代码中使用如下的结构处理错误:
Exception
When exception1 then
Sequence of statements;
When exception2 then
Sequence of statements;
When others then
3、异常的抛出
由三种方式抛出异常
1.通过PL/SQL运行时引擎
2. 使用RAISE语句3.
调用RAISE_APPLICATION_ERROR存储过程
当数据库或PL/SQL在运行时发生错误时,一个异常被PL/SQL运行时引擎自动抛出。异常也可以通过RAISE语句抛出
RAISE exception_name;
显式抛出异常是程序员处理声明的异常的习惯用法,但RAISE不限于声明了的异常,它可以抛出任何任何异常。例如,你希望用TIMEOUT_ON_RESOURCE错误检测新的运行时异常处理器,你只需简单的在程序中使用下面的语句:
RAISE TIMEOUT_ON_RESOUCE;
比如下面一个订单输入的例子,若当订单小于库存数量,则抛出异常,并且捕获该异常,处理异常
DECLARE
inventory_too_low EXCEPTION;
---其他声明语句
BEGIN
IF order_rec.qty>inventory_rec.qty THEN
RAISE inventory_too_low;
END IF
EXCEPTION
WHEN inventory_too_low THEN
order_rec.staus:='backordered';
END;
RAISE_APPLICATION_ERROR内建函数用于抛出一个异常并给异常赋予一个错误号以及错误信息。自定义异常的缺省错误号是+1缺省信息是User_Defined_Ex