「Oracle」プロシージャにRAISE_APPLICATION_ERRORで例外を作成するサンプル

2014年10月23日2021年8月30日

書式
RAISE_APPLICATION_ERROR(エラーコード,エラーメッセージ)

使用例

DECLARE
     v_user_name user_tbl.user_name%TYPE := 'UserAbc';
  BEGIN
    DELETE FROM user_tbl WHERE user_name = v_user_name;
     IF SQL%NOTFOUND THEN
               RAISE_APPLICATION_ERROR (-20201, v_user_name || '存在しません');
      END IF;
 END;