PL/SQL 呼び出したファンクション処理でのエラーを、呼び出し元の指定した例外ブロックに飛ばしたい。

Question

実現したいこと

プロシージャー「test_pro」から呼び出したファンクション「test_fun」を呼び出しており、
ファンクション「test_fun」内でパラメーターエラーを発生させることができております。
現在上記エラーが発生した際、呼び出し元プロシージャー「test_pro」内の例外処理「WHEN OTHERS THEN(14行目)」の方に飛びます。
これをプロシージャー「test_pro」にある「WHEN parameter_err THEN(12行目)」内に処理が飛ぶようにしたいのです。
以下「試したこと」欄②にORACLE例外コード-20001を使用した際の成功例は記載しておりますが、
例外コード-20001などを使わない方法を求めております。

発生している問題・エラーメッセージ

ファンクション「test_fun」内でパラメーターエラーを発生させ、
呼び出し元プロシージャー「test_pro」内の例外処理「WHEN OTHERS THEN(14行目)」の方に飛んでしまう。

該当のソースコード

PROCEDURE test_pro(
    o_return_cd           OUT VARCHAR2      -- リターンコード
)
IS
  err_arg1                VARCHAR2(1024);   -- エラーメッセージ1
  err_arg2                VARCHAR2(1024);   -- エラーメッセージ2
  parameter_err           EXCEPTION;        -- 例外：パラメータエラー
  result                  VARCHAR2(14);     -- 結果を格納する変数
BEGIN
  result := test_fun('T', NULL);
EXCEPTION
  WHEN parameter_err THEN
    DBMS_OUTPUT.PUT_LINE('引数エラー: ');
  WHEN OTHERS THEN
    DBMS_OUTPUT.PUT_LINE('その他エラー');
END;

FUNCTION test_fun(
    i_no                   testTable.test_NO%TYPE,   -- 番号
    i_hiduke             DATE                                -- 日付
) RETURN testTable.test_NO%TYPE                 - 番号
IS
    err_arg1                VARCHAR2(1024);                       --エラーメッセージ1
    err_arg2                VARCHAR2(1024);                       --エラーメッセージ2
    parameter_err           EXCEPTION;                            --例外：パラメータエラー
BEGIN
    --引数チェック
    IF i_kijunnbi IS NULL THEN
        err_arg1 := '日付';
        err_arg2 := i_hiduke;
        RAISE parameter_err;
    END IF;
    return i_no;
EXCEPTION
    WHEN parameter_err THEN
        RAISE;
    WHEN OTHERS THEN
        -- 異常終了
        RAISE;
END; 

試したこと

①ファンクション「test_fun」の19行目を「RAISE parameter_err;」に変更して実行
→結果変わらず。

②プロシージャー「test_pro」の7行目の下に「PRAGMA EXCEPTION_INIT(parameter_err, -20001);」を追加
ファンクション「test_fun」の8行目の下に「PRAGMA EXCEPTION_INIT(parameter_err, -20001);」を追加
ファンクション「test_fun」の19行目を「RAISE_APPLICATION_ERROR(-20001, ‘入力パラメータが不正です’);」に変更
→プロシージャー「test_pro」にある「WHEN parameter_err THEN(12行目)」内に処理が飛ぶ(成功)

補足情報

oracle version 21.0.0.0.0

Comments

[ikedas]

新たにエラー番号との紐付けをしたくないということなら、事前定義例外 (VALUE_ERRORなんか) を使えばよいのでは。

Answer 1

RAISE_APPLICATION_ERROR ユーザー指定のエラーコードとエラーメッセージの生成 を熟読してください。

FUNCTIONを呼ぶ方でのEXCEPTIONで例外の判断も必要です。