Oracle PL/SQL存储过程循环中无法显示游标结果的解决咨询

嗨，作为PL/SQL新手，你遇到的问题其实很典型——你的存储过程只是拿到了游标对象，但从来没有去读取游标里的数据并输出，所以当然看不到结果啦！先别急，我一步步给你拆解问题和解决办法：

首先，修正代码里的笔误 #

你写的get_results函数里，参数是tables_name，但拼接SQL的时候写成了tables_names（多了个s），这会直接导致编译失败，先把这个小错误改掉：

CREATE OR REPLACE FUNCTION get_results(tables_name IN varchar2) RETURN SYS_REFCURSOR 
IS 
    l_rc SYS_REFCURSOR; 
BEGIN 
    OPEN l_rc FOR 'SELECT * FROM ' || tables_name ; -- 这里把tables_names改成tables_name
    RETURN l_rc; 
END; 

核心问题：没有遍历游标读取数据 #

你的存储过程循环里，只是把get_results返回的游标赋值给result变量，但游标只是一个指向结果集的指针，你需要主动去提取里面的每一行数据，才能看到输出。下面是修改后的存储过程，加上了读取游标和输出的逻辑：

CREATE OR REPLACE PROCEDURE select_record(category_name IN VARCHAR2) 
AS 
    TYPE tableaarray IS VARRAY(20) OF VARCHAR2(20); 
    tables_names tableaarray; 
    total integer; 
    result SYS_REFCURSOR;
    -- 这里可以用%ROWTYPE匹配表结构，不用手动定义每个字段
    v_categories_row categories%ROWTYPE;
    v_alert_row alert_demo%ROWTYPE;
BEGIN 
    IF category_name = 'jobs' THEN 
        tables_names := tableaarray('categories'); 
    ELSIF category_name = 'alert' THEN 
        tables_names := tableaarray('alert_demo'); 
    END IF; 

    total := tables_names.count; 
    FOR i in 1 .. total LOOP 
        result := get_results(tables_names(i));
        
        -- 根据不同表遍历游标
        IF tables_names(i) = 'categories' THEN
            LOOP
                FETCH result INTO v_categories_row;
                EXIT WHEN result%NOTFOUND;
                DBMS_OUTPUT.PUT_LINE('categories表数据：ID=' || v_categories_row.id || ', 名称=' || v_categories_row.category_name);
            END LOOP;
        ELSIF tables_names(i) = 'alert_demo' THEN
            LOOP
                FETCH result INTO v_alert_row;
                EXIT WHEN result%NOTFOUND;
                DBMS_OUTPUT.PUT_LINE('alert_demo表数据：ID=' || v_alert_row.id || ', 内容=' || v_alert_row.alert_content);
            END LOOP;
        END IF;
        
        -- 用完游标记得关闭，避免资源泄漏
        CLOSE result;
    END LOOP; 
END; 

关键注意事项 #

• 开启DBMS_OUTPUT：如果是在SQL*Plus里运行，要先执行SET SERVEROUTPUT ON;才能看到输出；如果是PL/SQL Developer，在测试窗口里勾选「启用DBMS_OUTPUT」选项。
• 用%ROWTYPE简化变量定义：上面的例子用categories%ROWTYPE直接匹配表的字段结构，不用手动逐个定义变量，更灵活不易出错。
• 避免SQL注入风险：你的函数用字符串拼接表名，很容易被SQL注入攻击。可以用DBMS_ASSERT来验证表名的合法性，比如：

  OPEN l_rc FOR 'SELECT * FROM ' || DBMS_ASSERT.SQL_OBJECT_NAME(tables_name);
  

• 资源清理：每次用完游标后一定要关闭，避免数据库资源泄漏。

测试方法 #

你可以这样调用存储过程查看输出：

SET SERVEROUTPUT ON;
BEGIN
    select_record('jobs'); -- 传入'jobs'获取categories表的数据
END;
/

这样就能看到预期的表数据输出啦！

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