如何使用PL/SQL块实现单表单列数据插入另一表及报错排查

• 直接原因：INSERT语句的VALUES子句语法错误，必须用括号包裹插入值，两段错误代码均漏掉了括号，将values (v_array(i))写成了values v_array(i)，触发ORA-03001报错。
• 潜在问题：原第一段代码中循环范围固定写为1..10，如果all_sector表中circle_name的记录数不足10条，会触发数组下标越界报错。
• 约束风险：site_sector表存在REF_MONTH、REF_YEAR两个字段，若这两个字段未设置默认值且不允许为空，仅插入circle_name会触发非空约束报错。

方案1：PL/SQL块循环插入（适配原代码的实现逻辑） #

修正后的完整代码如下：

DECLARE
  TYPE t_list IS TABLE OF VARCHAR2(50);
  v_array t_list := t_list();
BEGIN
  -- 从源表批量查询指定列数据存入数组
  SELECT circle_name BULK COLLECT INTO v_array FROM all_sector;
  
  -- 循环遍历数组插入目标表，用count方法适配数组实际长度避免下标越界
  FOR i IN 1..v_array.COUNT LOOP
    DBMS_OUTPUT.PUT_LINE(v_array(i));
    -- VALUES后补充括号，可根据需求给另外两个字段赋值
    INSERT INTO site_sector(circle_name, REF_MONTH, REF_YEAR)
    VALUES (v_array(i), '202409', '2024');
    -- 若另外两个字段允许为空/有默认值，可简化为：
    -- INSERT INTO site_sector(circle_name) VALUES (v_array(i));
  END LOOP;
  
  -- 提交事务
  COMMIT;
EXCEPTION
  -- 异常回滚避免脏数据
  WHEN OTHERS THEN
    ROLLBACK;
    RAISE;
END;
/

方案2：高效单句插入（无逐行处理需求时优先使用） #

如果不需要逐行打印、校验等特殊逻辑，直接使用INSERT SELECT语法即可，性能远高于循环逐行插入：

-- 可根据业务需求调整另外两个字段的赋值逻辑
INSERT INTO site_sector(circle_name, REF_MONTH, REF_YEAR)
SELECT circle_name, '202409', '2024' FROM all_sector;
COMMIT;

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