CREATE OR REPLACE PROCEDURE lc_test IS
v NUMBER;
BEGIN
SELECT cnt
INTO v
FROM (SELECT 1 cnt
FROM dual
UNION ALL
SELECT 2 cnt
FROM dual);
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(dbms_utility.format_error_stack);
dbms_output.put_line(dbms_utility.format_call_stack);
dbms_output.put_line(dbms_utility.format_error_backtrace());
END;[@more@]
v NUMBER;
BEGIN
SELECT cnt
INTO v
FROM (SELECT 1 cnt
FROM dual
UNION ALL
SELECT 2 cnt
FROM dual);
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(dbms_utility.format_error_stack);
dbms_output.put_line(dbms_utility.format_call_stack);
dbms_output.put_line(dbms_utility.format_error_backtrace());
END;[@more@]
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/59792/viewspace-1056959/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/59792/viewspace-1056959/