Oracle 19c循环调用带循环变量的存储过程报错问题

问题分析 #

你遇到的两个错误核心都是存储过程调用方式不符合PL/SQL规范：

• 使用SELECT func.drop_if_exists(i) FROM dual调用存储过程：SELECT仅用于调用有返回值的函数，存储过程无返回值，不能通过SELECT调用，因此触发ORA-00904错误。
• 使用call(func.drop_if_exists(i))：CALL是SQL环境下的命令，在PL/SQL块（BEGIN...END）中无法直接使用，因此触发"Unknown database function 'call'"错误。

另外原代码还有两处细节问题：

• 包级变量v_object_name放在包体全局无必要，移到存储过程内部可避免多会话并发调用时的变量污染。
• 循环传参时直接用i错误，游标变量i是整行记录，需指定具体列名i.tbl_name。

修正后的完整代码 #

1. 修正后的包与存储过程 #

CREATE OR REPLACE PACKAGE func IS
    PROCEDURE drop_if_exists(tbl_name IN VARCHAR2);
END func;
/

CREATE OR REPLACE PACKAGE BODY func AS
    PROCEDURE drop_if_exists(tbl_name IN VARCHAR2) IS
        v_object_name VARCHAR2(100); -- 将变量移至过程内部
    BEGIN
        v_object_name := dbms_assert.sql_object_name(tbl_name);
        EXECUTE IMMEDIATE 'DROP TABLE ' || v_object_name || ' PURGE'; -- 使用验证后的变量，提升安全性
    EXCEPTION
        WHEN OTHERS THEN 
            -- 可选：添加日志便于排查问题
            -- DBMS_OUTPUT.PUT_LINE('删除表' || tbl_name || '失败: ' || SQLERRM);
            NULL;
    END;
END func;
/

2. 正确的循环调用代码 #

BEGIN
    FOR i IN (SELECT tbl_name FROM names_of_tables) LOOP
        func.drop_if_exists(i.tbl_name); -- PL/SQL块中直接调用存储过程，传入具体列值
    END LOOP;
END;
/

关键说明 #

• PL/SQL块中调用存储过程直接写过程名(参数)即可，无需SELECT或CALL。
• dbms_assert.sql_object_name用于验证表名合法性、防范SQL注入，验证后的变量必须用于动态SQL中，原代码验证后仍使用原参数的逻辑需修正。
• WHEN OTHERS THEN NULL会吞掉所有异常，若需要排查问题，可临时添加日志输出语句。

内容的提问来源于stack exchange，提问作者J. Sizzler