Сохранение исключения PL/SQL и повышение его позже?

Question

У меня есть процедура PL/SQL (в базе данных Oracle 12c), которая пытается вставить некоторые данные. Если это не удается, он должен проверить таблицу, чтобы узнать, может ли она найти какую-либо информацию там, чтобы помочь решить проблему. Если он найдет информацию, все будет в порядке, если не регрессирует ошибка.

Это мой код:

BEGIN 
    -- Try to insert some data. 
    INSERT INTO table VALUES x; 
EXCEPTION 
    WHEN OTHERS THEN 
    BEGIN 
     -- Check a table to fins some info to help solve the problem. 
     -- If we find a row here, we can fix it. 
     -- If not, we should reraise the error. 
     SELECT * INTO y FROM table WHERE a = b; 
     -- Do some more stuff here to fix the problem. 
    EXCEPTION 
     WHEN NO_DATA_FOUND THEN 
     -- We could not find anything in the table, 
     -- so we could not handle the situation. 
     -- Reraise the error. 
     RAISE; 
    END; 
END; 

Проблема здесь состоит в том, что RAISE; оператор поднимает последнее исключение, которое является NO_DATA_FOUND, что SELECT заявления бросило. Исходное исключение из INSERT находится далее в стеке, но не вверху.

Могу ли я как-то «сохранить» ошибку с INSERT и сделать ререйз? Или я могу запустить SELECT INTO, который не выдает ошибку, если ничего не находит? Моя цель здесь - сделать ререйз оригинального исключения INSERT без каких-либо следов исключения NO_DATA_FOUND.

EDIT: Просмотреть комментарии, почему это не дубликат.

Answer 1

Вытяните инструкцию raise из блока, пытаясь решить эту проблему. Если вам необходимо выполнить ререйз, зависящий от отказа исправления, установите флаг во внутреннем обработчике исключений и выполните только raise, если этот флаг является истинным.

Как код:

DECLARE 
    b_reraise BOOLEAN := FALSE; 
BEGIN 
    -- Try to insert some data. 
    INSERT INTO table VALUES x; 
EXCEPTION 
    WHEN OTHERS THEN 
    BEGIN 
     -- Check a table to fins some info to help solve the problem. 
     -- If we find a row here, we can fix it. 
     -- If not, we should reraise the error. 
     SELECT * INTO y FROM table WHERE a = b; 
     -- Do some more stuff here to fix the problem. 
    EXCEPTION 
     WHEN NO_DATA_FOUND THEN 
     -- We could not find anything in the table, 
     -- so we could not handle the situation. 
     -- Reraise the error. 
     b_reraise := TRUE; 
    END; 

    IF b_reraise THEN 
     RAISE; 
    END IF; 
END; 

Answer 2

Может быть что-то вроде этого:

DECLARE 
    l_sqlerrm VARCHAR2(4000); 
    l_sqlerrc NUMBER; 
    l_exc  EXCEPTION; 
BEGIN 
    -- some code with errors 
EXCEPTION 
    WHEN OTHERS THEN 
    l_sqlerrm := SQLERRM; 
    l_sqlerrc := SQLCODE; 
    -- loggin 
    INSERT INTO my_log (code, text) VALUES (l_sqlerrc, l_sqlerrm); 
    COMMIT; 
    -- some your code "Check a table to fins some info to help solve the problem" 
    -- some code to SELECT code INTO l_sqlerrc FROM my_log 
    PRAGMA exception_init(l_exc, l_sqlerrc); 
    RAISE l_exc; 
END;