Oracle PL/SQL存储过程编译报错PLS-00702解决方案咨询

安全阿岳

2026-7-1

解决PL/SQL存储过程中PRAGMA EXCEPTION_INIT参数不能为变量的问题

我需要创建一个Oracle PL/SQL存储过程，接收待执行的SQL语句和要忽略的异常代码数值，但编写的代码编译失败，报错PLS-00702: PRAGMA EXCEPTION_INIT的第二个参数必须是数值字面量。尝试的代码如下：

CREATE OR REPLACE PROCEDURE EXECUTE_AND_IGNORE_ERROR(dmlStatement IN VARCHAR2, oraErrorCode IN NUMBER) AS
    possibleException EXCEPTION;
    PRAGMA EXCEPTION_INIT (possibleException, oraErrorCode);
BEGIN
    EXECUTE IMMEDIATE dmlStatement;
EXCEPTION
    WHEN possibleException
    THEN
         DBMS_OUTPUT.PUT_LINE('Warning: Ignoring error [' || oraErrorCode ||'] after executing [' || dmlStatement || ']');
         NULL;
END;
END EXECUTE_AND_IGNORE_ERROR;

问题原因

PRAGMA EXCEPTION_INIT是编译期指令，要求第二个参数必须是数值字面量（如-1），无法使用运行时才确定值的输入变量oraErrorCode，这就是编译报错的根本原因。

解决方案

直接在异常处理块中通过SQLCODE获取当前异常的代码，与传入的oraErrorCode做对比，无需定义自定义异常。修改后的代码如下：

CREATE OR REPLACE PROCEDURE EXECUTE_AND_IGNORE_ERROR(dmlStatement IN VARCHAR2, oraErrorCode IN NUMBER) AS
BEGIN
    EXECUTE IMMEDIATE dmlStatement;
EXCEPTION
    WHEN OTHERS THEN
        IF SQLCODE = oraErrorCode THEN
            DBMS_OUTPUT.PUT_LINE('Warning: Ignoring error [' || oraErrorCode ||'] after executing [' || dmlStatement || ']');
            NULL;
        ELSE
            -- 非目标异常重新抛出，避免吞掉未知错误
            RAISE;
        END IF;
END EXECUTE_AND_IGNORE_ERROR;