PL/SQL块嵌入多SQL语句报错处理及指定CSV输出需求

咱们一步步把你的PL/SQL代码改对——你现在遇到的问题主要是查询逻辑（比如没加表连接条件导致笛卡尔积）、变量赋值错误，还有输出格式没匹配上需求。下面是修正后的完整代码，我会把关键的修正点说明白：

首先调整SQL*Plus的配置，确保输出是无表头、空格分隔的格式（符合你给的示例）：

set heading off
set colsep ' '
set feedback off
set trimspool on
set linesize 100
spool output.txt

然后是核心的PL/SQL块，我重构了逻辑，让它逐个处理你指定的ID，分别统计插入前后的计数，再输出结果：

declare
    -- 定义目标ID数组，和你原来的一致
    type sh_id is varray(10) of tab.id%type;
    target_ids sh_id := sh_id(1, 3, 5, 7, 9, 11, 13, 15, 17, 19);
    -- 给lv变量赋个默认值，避免插入空值（你原来的代码没初始化这个变量）
    lv varchar(20) := 'default_value';
    b_cnts number; -- 插入前的计数
    a_cnts number; -- 插入后的计数
    current_id tab.id%type; -- 当前遍历的ID
begin
    -- 逐个遍历目标ID
    for idx in 1..target_ids.count loop
        current_id := target_ids(idx);
        
        -- 统计当前ID插入前的sub_id数量
        -- 这里一定要加表连接条件！你原来的代码没加，会产生笛卡尔积，直接报错
        select count(b.sub_id)
        into b_cnts
        from tab a
        join tab1 b on a.id = b.id -- 替换成你实际的表连接条件，比如b.tab_id = a.id
        where a.id = current_id;
        
        -- 处理当前ID对应的所有sub_id插入
        for sub_rec in (
            select distinct b.sub_id
            from tab a
            join tab1 b on a.id = b.id
            where a.id = current_id
        ) loop
            -- 原来的ln_rec如果没用到可以删掉，我这里注释掉了
            -- select * into ln_rec from tab1 where sub_id = sub_rec.sub_id;
            
            -- 明确指定new_tab的列名，避免表结构变化导致插入错误
            insert into new_tab (id_col, sub_id_col, lv_col)
            values (current_id, sub_rec.sub_id, lv);
        end loop;
        -- 不要在循环里频繁commit，每个ID处理完提交一次更高效
        commit;
        
        -- 统计当前ID插入后的sub_id数量
        select count(b.sub_id)
        into a_cnts
        from tab a
        join tab1 b on a.id = b.id
        where a.id = current_id;
        
        -- 输出当前ID的结果，空格分隔，符合你的示例格式
        dbms_output.put_line(current_id || ' ' || b_cnts || ' ' || a_cnts);
    end loop;
end;
/
spool off

关键修正点说明： #

• 表连接条件：你原来的查询没有加tab和tab1的关联条件，会生成笛卡尔积，导致SELECT INTO返回多行报错，我加上了join tab1 b on a.id = b.id，你需要根据实际的表外键关系调整这个条件。
• ID遍历逻辑：原来的代码没有正确遍历你定义的ID数组，现在改成逐个处理每个ID，确保每个ID的计数和插入操作对应。
• 变量错误：原来的INSERT语句用了数组变量id，现在改成当前遍历的current_id，避免变量混淆。
• 输出格式：调整了SQL*Plus的colsep为空格，配合dbms_output.put_line输出符合要求的无表头格式。
• 提交优化：把commit从循环内移到每个ID处理完后，减少提交次数，提升性能。
• 变量初始化：给lv赋了默认值，避免插入空值（如果你的业务允许空值，可以删掉这个赋值）。

如果需要逗号分隔的标准CSV，只需要把set colsep ' '改成set colsep ','，同时把dbms_output里的空格换成逗号就行。

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