Есть несколько способов сделать это:
ВАРИАНТ 1
Другой вариант - создать несколько начальных / конечных блоков
CREATE OR REPLACE PROCEDURE TEST_EXCEPTION (
book_id_in IN book.book_id%TYPE,
emp_id_in IN emp.emp_id%TYPE )
IS
v_book_desc book.description%TYPE; v_emp_name emp.emp_name%TYPE;
statementIndex number(1, 0);
BEGIN
BEGIN
SELECT description into v_book_desc FROM book WHERE book_id = book_id_in;
EXCEPTION WHEN NO_DATA_FOUND THEN
-- do your handling or raise a custom exception to be handled at end
END;
BEGIN
SELECT emp_name into v_emp_name FROM emp WHERE emp_id = emp_id_in;
EXCEPTION WHEN NO_DATA_FOUND THEN
-- do your handling or raise a custom exception to be handled at end
END;
EXCEPTION WHEN_OTHERS THEN
END TEST_EXCEPTION;
ВАРИАНТ 2
Другой вариант - использовать курсоры;
Использование курсора% NOTFOUND
См. (http://www.unix.com.ua/orelly/oracle/langpkt/ch01_09.htm), чтобы понять о курсорах
ВАРИАНТ 3: Скопировано из Yapiskan
CREATE OR REPLACE PROCEDURE TEST_EXCEPTION ( book_id_in IN book.book_id%TYPE, emp_id_in IN emp.emp_id%TYPE ) IS
v_book_desc book.description%TYPE; v_emp_name emp.emp_name%TYPE;
statementIndex number(1, 0);
BEGIN
statementIndex := 1;
SELECT description into v_book_desc FROM book WHERE book_id = book_id_in;
...
statementIndex := 2;
SELECT emp_name into v_emp_name FROM emp WHERE emp_id = emp_id_in;
...
EXCEPTION WHEN NO_DATA_FOUND THEN
if statementIndex = 1
then
/* Do something */
else
/* Do something */
endif;
END TEST_EXCEPTION;