关闭

《oracle pl/sql programming》 第六章 异常处理

1991人阅读 评论(0) 收藏 举报
简单的说,异常处理,就是以一种一致的方法会机制去处理程序中的异常。
与其他程序语言一样,pl/sql的异常处理也是基于以下基本思想:
·    发现一个问题但不能处理它的函数时,引发一个异常,希望它的(直接或间接)调用者能够处理这个问题.
·    而想处理该问题的函数通过捕获这个异常来处理这个异常.
·    未捕获的异常自动往像上一层传递(按函数调用的逆序)
·    如果程序始终没有处理这个异常,最终它会被传到运行系统那里,运行系统捕获异常后通常只是简单的终止这个程序.
 
 
1.定义异常
语法如下:
DECLARE
 exception_name EXCEPTION;
 ...
BEGIN
 ...
 EXCEPTION
    WHEN excption_name THEN
      ...
    WHEN OTHERS THEN
END;
 
将异常与一个代码关联
DECLARE
 exception_name EXCEPTION;
 PRAGMA EXECEPTION_INIT(exception_name,integer)
...
BEGIN
 ...
 EXCEPTION
    WHEN OTHERS THEN
      IF SQLCODE = integer THEN
        ...
END;
 
2.抛出异常
    BEGIN
       IF total_sales = 0
       THEN
          RAISE ZERO_DIVIDE; -- Defined in STANDARD package
       ELSE
          RETURN (sales_percentage_calculation (my_sales, total_sales));
       END IF;
    END;
 
RAISE_APPLICATION_ERROR函数抛出异常
RAISE_APPLICATION_ERROR定义在DBMS_STANDARD包中声明如下
    PROCEDURE RAISE_APPLICATION_ERROR (
       num binary_integer,
       msg varchar2,
       keeperrorstack boolean default FALSE);
举例
    CREATE OR REPLACE PROCEDURE raise_by_language (code_in IN PLS_INTEGER)
    IS
       l_message error_table.error_string%TYPE;
    BEGIN
       SELECT error_string
         INTO l_message
         FROM error_table, v$nls_parameters v
        WHERE error_number = code_in
          AND string_language = v.VALUE
          AND v.parameter = 'NLS_LANGUAGE';
 
       RAISE_APPLICATION_ERROR (code_in, l_message);
    END;
 
3.处理异常
...
BEGIN
 ...
 EXCEPTION
    WHEN exception1 THEN
      ...
    WHEN exception2 OR exception3 THEN --同时处理两个异常
      ...
    WHEN OTHERS THEN
      RAISE;
END;
 
 
SQLCODE
SQLCODE相当于一个全局变量函数保存着最近一次发生异常的异常代码。
 
SQLERRM
SQLERRM函数根据传入的异常代码返回对应的异常消息。SQLERRM的长度限制为512字节。
 
DBMS_UTILITY.FORMAT_ERROR_STACK
DBMS_UTILITY.FORMAT_ERROR_STACK
 RETURN VARCHAR2;
DBMS_UTILITY.FORMAT_ERROR_STACK函数返回完整的错误消息。
 
DBMS_UTILITY.FORMAT_ERROR_BACKTRACE
DBMS_UTILITY.FORMAT_ERROR_BACKTRACE
 RETURN VARCHAR2;
DBMS_UTILITY.FORMAT_ERROR_BACKTRACE用于返回发生异常时异常点的堆栈信息
 
DBMS_UTILITY.FORMAT_CALL_STACK
DBMS_UTILITY.FORMAT_CALL_STACK
 RETURN VARCHAR2;
该函数返回程序当前执行点的堆栈信息
 
举例:
    CREATE OR REPLACE PROCEDURE proc1 IS
    BEGIN
       DBMS_OUTPUT.put_line ('running proc1');
       RAISE NO_DATA_FOUND;
    END;
    /
 
    CREATE OR REPLACE PROCEDURE proc2 IS
       l_str VARCHAR2 (30) := 'calling proc1';
    BEGIN
       DBMS_OUTPUT.put_line (l_str);
       proc1;
    END;
    /
    CREATE OR REPLACE PROCEDURE proc3 IS
    BEGIN
       DBMS_OUTPUT.put_line ('calling proc2');
       proc2;
    EXCEPTION
       WHEN OTHERS
       THEN
          DBMS_OUTPUT.put_line ('Error stack at top level:');
          DBMS_OUTPUT.put_line (DBMS_UTILITY.format_error_backtrace);
    END;
    /
然后:
    SQL> SET SERVEROUTPUT ON
    SQL> BEGIN
      2     DBMS_OUTPUT.put_line ('Proc3 -> Proc2 -> Proc1 backtrace');
      3     proc3;
      4 END;
      5 /
    Proc3 -> Proc2 -> Proc1 backtrace
    calling proc2
    calling proc1
    running proc1
    Error stack at top level:
    ORA-06512: at "SCOTT.PROC1", line 4
    ORA-06512: at "SCOTT.PROC2", line 5
    ORA-06512: at "SCOTT.PROC3", line 4
 
屏蔽异常(异常的一种特殊处理方式)
如下例子:
1    PROCEDURE change_data IS
2    BEGIN
3       BEGIN
4          DELETE FROM employee WHERE ... ; --这里发送异常,跳得第5行
5       EXCEPTION
6          WHEN OTHERS THEN NULL; --并未处理异常,只是屏蔽掉了,程序的执行跳到第9行
7       END;
8
9       BEGIN
10          UPDATE company SET ... ;
11      EXCEPTION
12          WHEN OTHERS THEN NULL;
13      END;
14
15       BEGIN
16          INSERT INTO company_history SELECT * FROM company WHERE ... ;
17       EXCEPTION
18          WHEN OTHERS THEN NULL;
19       END;
20    END;
 
以上代码在delphi中相当于
1    PROCEDURE change_data
2    BEGIN
3       TRY
4          DELETE FROM employee WHERE ... ; //这里发送异常跳得第5
5       EXCEPT
6          ; //并未处理异常只是屏蔽掉了程序的执行跳到第9
7       END;
8
9       TRY
10          UPDATE company SET ... ;
11      EXCEPT
12          ;
13      END;
14
15       TRY
16          INSERT INTO company_history SELECT * FROM company WHERE ... ;
17       EXCEPT
18          ;
19       END;
20    END;
 
4.构建有效的错误处理架构
尽管程序语言在语法上提供了异常处理的这种机制,但是一个完整的应用程序框架应该有一个合适的错误处理架构,在pl/sql应用程序的开发中,也应建立起这种架构,而不是随意的处理异常。
 
 
 
 
0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:257279次
    • 积分:3626
    • 等级:
    • 排名:第8995名
    • 原创:101篇
    • 转载:4篇
    • 译文:0篇
    • 评论:36条
    最新评论