Pragma Exception_init 的用法

最新推荐文章于 2023-05-20 15:18:50 发布

Allen-Li

最新推荐文章于 2023-05-20 15:18:50 发布

阅读量901

点赞数

分类专栏： Oracle Exception 文章标签： Oracle 自定义异常

Oracle Exception 专栏收录该内容

4 篇文章

订阅专栏

本文深入探讨了在PL/SQL环境中处理未命名的内部异常的方法，包括使用PRAGMAEXCEPTION_INIT和EXCEPTION处理机制。通过实例展示了如何声明自定义异常并初始化特定的Oracle错误码，以及如何利用RAISE_APPLICATION_ERROR函数来抛出自定义错误。同时，文章还介绍了如何抛出PL/SQL异常，并提供了实际应用案例。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

如果要处理未命名的内部异常，必须使用OTHERS异常处理器或PRAGMA EXCEPTION_INIT 。PRAGMA由编译器控制，或者是对于编译器的注释。PRAGMA在编译时处理，而不是在运行时处理。EXCEPTION_INIT告诉编译器将异常名与ORACLE错误码结合起来，这样可以通过名字引用任意的内部异常，并且可以通过名字为异常编写一适当的异常处理器。

　　
　　在子程序中使用EXCEPTION_INIT的语法如下：
　　PRAGMA EXCEPTION_INIT(exception_name, -Oracle_error_number);
　　( 其中exception_name是已经声明过的异常名称，Oracle_error_number是Oracle错误编号。)

　　在该语法中，异常名是声明的异常，下例是其用法：
　　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;

下面看一个例子

create or replace procedure SP_Del_Test
(P_ItemAdmin in mfitem.itemadmin%type, -- ItemAdmin
P_ItemCd    in mfitem.itemcd%type, -- ItemCode
P_Return    out number --输出参数
) is
  exp exception;
PRAGMA Exception_Init(exp, -2292);
begin
delete from mfitem t
   where t.itemcd = P_ItemCd
     and t.itemadmin = P_ItemAdmin;   -- 这一句会引发-2292异常，有级连删除异常
EXCEPTION
WHEN EXP THEN
    P_Return := 9;
    ROLLBACK;
WHEN OTHERS THEN
    ROLLBACK;
end SP_Del_Test;　　

使用自定义的异常，自定义我们自己的错误消息：过程RAISE_APPLICATION_ERROR

调用RAISE_APPLICATION_ERROR的语法如下：

raise_application_error(error_number, message[, {TRUE | FALSE}]);

error_number是一个范围在-20000至-20999之间的负整数，message是最大长度为2048字节的字符串。如果第三个可选参数为TRUE的话，错误就会被放到前面错误的栈顶。如果为FALSE(默认值)，错误就会替代前面所有的错误。

CREATE PROCEDURE raise_salary (emp_id NUMBER, amount NUMBER) AS
   curr_sal   NUMBER;
BEGIN
SELECT sal
    INTO curr_sal
    FROM emp
   WHERE empno = emp_id;
IF curr_sal IS NULL THEN
     /* Issue user-defined error message. */
     raise_application_error (-20101, 'Salary is missing');
ELSE
    UPDATE emp
       SET sal = curr_sal + amount
     WHERE empno = emp_id;
END IF;
END raise_salary;

如何抛出PL/SQL异常：

DECLARE
   out_of_stock     EXCEPTION;
   number_on_hand   NUMBER (4);
BEGIN
   ...
IF number_on_hand < 1 THEN
    RAISE out_of_stock;
END IF;
EXCEPTION
WHEN out_of_stock THEN
    -- handle the error
END;