存储过程中定位错误行 DBMS_UTILITY.FORMAT_ERROR_BACKTRACE

EXCEPTION
WHEN OTHERS THEN
p_errno := -1;
p_errmsg :=SQLCODE || ':' || SQLERRM || substr(dbms_utility.format_error_backtrace, 1, 100);
ROLLBACK;
INSERT INTO log_operation
(log_id, log_time, operator_id, success_flag, description, operation_type_code)
VALUES
(seq_log.NEXTVAL, SYSDATE, p_operator_id, 0, p_errmsg, 1);
COMMIT;
END;

DBMS_UTILITY.FORMAT_ERROR_BACKTRACE

返回当前异常相应的描述，没有字符长度限制。与 SQLCODE 相同的是，必须在异常处理模块中使用。虽然名称中有一个 stack 在，但通过它并不能知道异常的最初生成处，需要的话就必须使用 DBMS_UTILITY.FORMAT_ERROR_BACKTRACE 。

DBMS_UTILITY.FORMAT_ERROR_BACKTRACE

系统为最近一次生成的异常设置了一个栈，并跟踪它的传递过程，而这个函数使用这个栈，然后返回该异常的整个传递过程。这个函数对错误的定位和实施下一步处理起着至关重要的作用。

Create or replace procedure procl is

Begin

Dbms_output.put_line(‘running proc1’);

Raise no_data_found;

End;

/

create or replace procedure proc2 is

begin

dbms_output.put_line(‘calling proc1’);

proc1;

end;

/

create or replace procedure proc3 is

begin

dbms_output.put_line(‘calling proc2’);

proc2;

exception

when no_data_found

then

dbms_output.put_line(‘error stack at top level’);

dbms_output.put_line(dbms_utility.format_error_backtrace);

end;

/

现在可以运行 proc3 来看看结果。

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

事实上，每次异常的产生都将重置这个异常栈，只是最后一次从系统栈出栈的是最外层的程序块，所以可以清楚地看到异常生成的整个过程。上面这个程序的执行过程是这样的：首先用 put_line 打印 Proc3 -> Proc2 -> Proc1 backtrace ， 调用 proc3 ，当前程序入栈 => 打印 calling proc2 ，调用 proc2 ， proc3 入栈 => 打印 calling proc1 ，调用 proc1 ， proc2 入栈 => 打印 running proc1 ，生成 no_data_found 异常，该异常被压入异常栈中 => proc2 出栈，并检测到来自第 5 行调用传递过来的异常，将它在此压入异常栈 => proc3 出栈，并检测到来自第 4 行调用传递过来的异常，将它在此压入异常栈， dbms_utility.format_error_backtrace 将异常栈中信息反相打印出来 => 最外层程序出栈， end 。

以下是正确使用这个函数的一些注意事项：

ü 在当前程序的异常处理模块中调用这个函数。

ü 避免在中间程序中使用异常处理模块。

这样异常就能被正确地传输到最外层程序中，并打印出这个过程了。

注：此方法在oracle10g上起作用，对于9i目前还未找到类似的方法.