PL/SQL遍历指定所有者非空表取2行的报错及输出问题求助

错误根源是BULK COLLECT用于批量获取多行数据，必须搭配集合类型变量，但你使用的是单个标量变量myvar，类型不匹配导致报错。以下两种修复方案：

方案1：使用批量收集（BULK COLLECT） #

适合批量处理表名场景，通过集合存储批量获取的表名：

DECLARE
  CURSOR details IS 
    SELECT table_name 
    FROM all_tables 
    WHERE owner = 'emp' AND num_rows > 0;
  -- 定义集合类型存储表名
  TYPE table_name_list IS TABLE OF all_tables.table_name%TYPE;
  myvars table_name_list;
  rows_num NATURAL := 2;
  sql_stmt VARCHAR2(1000);
BEGIN
    OPEN details;
    LOOP
        FETCH details BULK COLLECT INTO myvars LIMIT rows_num;
        -- 遍历批量获取的表名
        FOR i IN myvars.FIRST .. myvars.LAST LOOP
            DBMS_OUTPUT.PUT_LINE('待处理表：' || myvars(i));
            -- 后续可添加执行查询的逻辑
        END LOOP;
        EXIT WHEN details%NOTFOUND;
    END LOOP;
    CLOSE details;
END;
/

方案2：单行FETCH（更适配逐表查询场景） #

如果需求是逐表处理，用普通单行FETCH更直观，无需集合遍历：

DECLARE
  CURSOR details IS 
    SELECT table_name 
    FROM all_tables 
    WHERE owner = 'emp' AND num_rows > 0;
  myvar all_tables.table_name%TYPE;
  rows_num NATURAL := 2;
  sql_stmt VARCHAR2(1000);
BEGIN
    OPEN details;
    LOOP
        FETCH details INTO myvar;
        EXIT WHEN details%NOTFOUND; -- 注意是游标%NOTFOUND，不是变量
        DBMS_OUTPUT.PUT_LINE('待处理表：' || myvar);
        -- 后续可添加执行查询的逻辑
    END LOOP;
    CLOSE details;
END;
/

你的补充代码存在三个核心问题，导致输出异常：变量名笔误、动态SELECT未处理结果、DBMS_OUTPUT未启用。修复后的完整代码及说明如下：

修复后完整代码 #

SET SERVEROUTPUT ON; -- SQL*Plus/PL/SQL Developer中必须先执行此语句开启输出

DECLARE
  CURSOR details IS 
    SELECT table_name 
    FROM all_tables 
    WHERE owner = 'emp' AND num_rows > 0;
  myvar all_tables.table_name%TYPE;
  rows_num NATURAL := 2;
  sql_stmt VARCHAR2(1000);
  -- 定义游标变量接收动态查询结果
  TYPE ref_cur IS REF CURSOR;
  rc ref_cur;
  rec DBMS_SQL.DESC_TAB;
  col_cnt NUMBER;
  col_val VARCHAR2(4000);
BEGIN
    OPEN details;
    LOOP
        FETCH details INTO myvar;
        EXIT WHEN details%NOTFOUND;
        
        DBMS_OUTPUT.PUT_LINE('====================================');
        DBMS_OUTPUT.PUT_LINE('表名：' || myvar);
        DBMS_OUTPUT.PUT_LINE('前' || rows_num || '行数据：');
        
        -- 动态执行查询并打开游标
        sql_stmt := 'SELECT * FROM ' || myvar || ' WHERE ROWNUM <= :rn';
        OPEN rc FOR sql_stmt USING rows_num;
        
        -- 获取表的列信息（适配不同表的结构）
        DBMS_SQL.DESCRIBE_COLUMNS(DBMS_SQL.TO_CURSOR_NUMBER(rc), col_cnt, rec);
        
        -- 遍历输出每行数据（多列场景需循环读取每列值）
        LOOP
            FETCH rc INTO col_val;
            EXIT WHEN rc%NOTFOUND;
            -- 多列场景替换为下方注释的循环逻辑
            /*
            FOR i IN 1..col_cnt LOOP
                DBMS_SQL.COLUMN_VALUE(DBMS_SQL.TO_CURSOR_NUMBER(rc), i, col_val);
                DBMS_OUTPUT.PUT(col_val || ' ');
            END LOOP;
            DBMS_OUTPUT.NEW_LINE;
            */
            DBMS_OUTPUT.PUT_LINE(col_val);
        END LOOP;
        
        CLOSE rc;
    END LOOP;
    CLOSE details;
END;
/

关键修复点说明 #

1. 修正变量名笔误：统一变量名myvar，关闭游标时使用正确的游标名details
2. 处理动态SELECT结果：通过REF CURSOR接收动态查询的结果，再借助DBMS_SQL包适配不同表的列结构
3. 启用DBMS_OUTPUT：在SQL*Plus或PL/SQL Developer中执行SET SERVEROUTPUT ON，GUI工具需手动打开DBMS_OUTPUT窗口

额外注意：all_tables.num_rows依赖统计信息，可能存在滞后性。若需严格判断表非空，可改用SELECT COUNT(*) FROM emp.xxx查询，但会影响性能，需根据实际场景选择。

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