如何用PL/SQL块执行TABLE_A中存储的查询并插入结果到TABLE_B

假设你的TABLE_B结构为：

CREATE TABLE TABLE_B (
    DESCRIPTION VARCHAR2(100),
    SQL_RESULT NUMBER
);

以下是实现需求的PL/SQL块：

DECLARE
    v_description TABLE_A.DESCRITION%TYPE; -- 注意原表字段拼写为DESCRITION
    v_sql TABLE_A.SQL%TYPE;
    v_result NUMBER; -- 适配count(*)返回的数字类型，若SQL结果类型不同需调整
    CURSOR c_sql_records IS
        SELECT DESCRITION, SQL FROM TABLE_A;
BEGIN
    -- 遍历TABLE_A中所有存储的SQL记录
    FOR rec IN c_sql_records LOOP
        v_description := rec.DESCRITION;
        v_sql := rec.SQL;
        
        BEGIN
            -- 动态执行SQL并获取单行结果
            EXECUTE IMMEDIATE v_sql INTO v_result;
            
            -- 将描述和执行结果插入TABLE_B
            INSERT INTO TABLE_B (DESCRIPTION, SQL_RESULT)
            VALUES (v_description, v_result);
            
            DBMS_OUTPUT.PUT_LINE('完成执行: ' || v_description);
        EXCEPTION
            WHEN OTHERS THEN
                -- 捕获单条SQL执行异常，不中断整体流程
                DBMS_OUTPUT.PUT_LINE('执行失败，描述: ' || v_description || '，错误: ' || SQLERRM);
        END;
    END LOOP;
    
    -- 提交事务（根据业务需求调整是否需要）
    COMMIT;
EXCEPTION
    WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('全局执行错误: ' || SQLERRM);
        ROLLBACK;
END;
/

关键说明 #

• 动态SQL处理：使用EXECUTE IMMEDIATE ... INTO ...处理返回单行单列的SQL，若你的SQL可能返回多行，需改用游标接收动态执行结果。
• 异常隔离：内层异常捕获确保单条SQL执行失败时，整个遍历流程不会终止，方便排查问题。
• 字段匹配：代码中字段名与原表TABLE_A的DESCRITION拼写保持一致，避免因拼写错误导致报错。
• 类型适配：v_result的类型需与SQL执行结果的类型匹配，如果SQL返回字符串等其他类型，需调整变量类型。

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