dbms_utility

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@]