PL/SQL匿名块中避免部分DML因其他DML报错回滚的替代方案咨询

嘿，这个需求很典型，我给你分享两个不需要用到DBMS_ERRLOG和自治事务的可行方案：

方案一：为每个DML添加独立的异常处理块 #

核心思路是把每个DML语句单独包裹在局部的BEGIN-EXCEPTION块中，这样单个DML的错误只会触发自身的异常处理，不会中断整个匿名块的执行，最后统一提交所有成功执行的修改。

示例代码：

BEGIN
  -- 处理DML1，捕获自身异常
  BEGIN
    -- 替换成你的实际DML语句，比如 INSERT/UPDATE/DELETE
    dml1;
  EXCEPTION
    WHEN OTHERS THEN
      -- 可选：记录错误信息，比如输出到控制台或自定义日志表
      DBMS_OUTPUT.PUT_LINE('DML1执行失败: ' || SQLERRM);
  END;

  -- 处理DML2，捕获自身异常
  BEGIN
    dml2;
  EXCEPTION
    WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE('DML2执行失败: ' || SQLERRM);
  END;

  -- 处理DML3，捕获自身异常
  BEGIN
    dml3;
  EXCEPTION
    WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE('DML3执行失败: ' || SQLERRM);
  END;

  -- 提交所有成功执行的DML修改，确保它们不会被回滚
  COMMIT;
EXCEPTION
  WHEN OTHERS THEN
    DBMS_OUTPUT.PUT_LINE('全局未捕获异常: ' || SQLERRM);
    -- 这里的回滚是针对全局异常的，根据你的需求可以调整
    ROLLBACK;
END;
/

这个方案的优势是每个DML完全独立，哪怕其中一个失败，其他的依然会正常执行并最终被提交，完美满足你“DML2报错时，DML1和DML3不被回滚”的需求。

方案二：使用保存点（SAVEPOINT）实现局部回滚 #

如果你希望在DML2失败时，明确回滚DML2的修改，但保留DML1的结果，再继续执行DML3，那么保存点是更精准的选择。

示例代码：

BEGIN
  -- 先执行DML1
  dml1;
  -- 在DML1执行完成后设置保存点
  SAVEPOINT after_dml1;

  -- 尝试执行DML2，捕获异常
  BEGIN
    dml2;
  EXCEPTION
    WHEN OTHERS THEN
      DBMS_OUTPUT.PUT_LINE('DML2执行失败，仅回滚DML2的修改');
      -- 回滚到DML1之后的保存点，保留DML1的结果
      ROLLBACK TO SAVEPOINT after_dml1;
  END;

  -- 继续执行DML3
  dml3;
  -- 提交DML1和DML3的修改
  COMMIT;
END;
/

这个方案的特点是精准控制回滚范围，只撤销失败的DML2，不会影响已经成功的DML1，同时后续的DML3依然可以正常执行并提交。

备注：内容来源于stack exchange，提问作者adrija