我来帮你实现这个需求，同时修正常见的语法错误。核心逻辑是先找出包含指定列的所有表，然后逐个验证该列是否存在目标值，一旦找到就立即返回结果并终止循环，避免不必要的查询。

完整的存储过程代码 #

CREATE OR REPLACE PROCEDURE check_column_value_exists(
    p_column_name   IN  VARCHAR2,
    p_target_value  IN  VARCHAR2,
    p_exists        OUT VARCHAR2 -- 用'Y'/'N'替代BOOLEAN，更易调用
) AS
    -- 游标：获取当前用户下包含指定列的所有表
    CURSOR c_tables IS
        SELECT table_name
        FROM user_tab_columns
        WHERE column_name = UPPER(p_column_name); -- 统一大写适配Oracle字典表的存储规则
    
    v_table_name     VARCHAR2(30);
    v_count          NUMBER;
    v_sql            VARCHAR2(1000);
BEGIN
    p_exists := 'N'; -- 默认初始化不存在
    
    OPEN c_tables;
    LOOP
        FETCH c_tables INTO v_table_name;
        EXIT WHEN c_tables%NOTFOUND; -- 游标遍历完毕退出
        
        -- 构造动态SQL，用绑定变量避免SQL注入
        v_sql := 'SELECT COUNT(1) FROM ' || v_table_name || 
                 ' WHERE ' || UPPER(p_column_name) || ' = :target_val';
        
        -- 执行动态SQL并获取计数
        EXECUTE IMMEDIATE v_sql INTO v_count USING p_target_value;
        
        -- 找到匹配值，标记并退出循环
        IF v_count > 0 THEN
            p_exists := 'Y';
            EXIT;
        END IF;
    END LOOP;
    CLOSE c_tables;
    
EXCEPTION
    WHEN OTHERS THEN
        p_exists := 'N';
        -- 可选：添加日志记录，比如DBMS_OUTPUT.PUT_LINE('错误: ' || SQLERRM);
        RAISE; -- 抛出异常让调用者处理，或者根据需求屏蔽
END check_column_value_exists;
/

关键逻辑解释 #

• 游标查询：从user_tab_columns（当前用户的表）获取含指定列的表，如果需要查询所有用户的表，改用all_tab_columns并添加owner过滤条件。
• 动态SQL：因为表名是动态的，必须用EXECUTE IMMEDIATE执行，同时用绑定变量:target_val传递目标值，避免SQL注入风险。
• 循环终止：一旦找到某张表存在目标值，立即设置输出参数为'Y'并退出循环，减少不必要的查询开销。
• 异常处理：捕获未知错误，确保输出参数始终有值，也可以根据需求添加日志或自定义错误处理。

常见语法错误修正（针对原TEST过程） #

• 动态SQL拼接错误：直接拼接目标值会导致语法错误（比如字符串未加引号），必须用绑定变量USING传递参数。
• 游标定义错误：未正确从数据字典表（user_tab_columns/all_tab_columns）查询表名，导致无数据遍历。
• 循环未及时退出：找到匹配值后未终止循环，会继续查询后续表，浪费资源。
• 输出参数类型问题：Oracle存储过程的BOOLEAN类型在外部调用时（比如PL/SQL块外）不太方便，改用VARCHAR2('Y'/'N')兼容性更好。

调用示例 #

DECLARE
    v_result VARCHAR2(1);
BEGIN
    -- 检查含campus_id列的表中是否有值为1的记录
    check_column_value_exists('campus_id', '1', v_result);
    DBMS_OUTPUT.PUT_LINE('是否存在目标值: ' || CASE v_result WHEN 'Y' THEN '是' ELSE '否' END);
END;
/

内容的提问来源于stack exchange，提问作者MK12