使用回滚/提交关闭所有游标，如何克服

Question

我有 PL/SQL 代码，其中我正在执行插入到表 1 并根据某些条件从表 2 中删除，如果删除成功，则提交所有上述语句并插入表 3，状态为“cond_true”else 回滚所有上述事务并插入 table3 'cond_false' 。如果在此代码中使用了提交和回滚，它将关闭打开的游标，并且必须再次为每个游标重新迭代，否则失败且没有游标打开状态。

OPEN cursor1;       
    Loop            
        fetch cursor1 into tbls;
        exit when cursor1%notfound;                     

            execute immediate  INSERT INTO  table1  SELECT  * FROM table2; 
            -- commit only if below condition is true else rollback;

        BEGIN
            IF  some_condition THEN  
               -- this condition will become true only after the above insert is executed successfully for all rows
                execute immediate   DELETE FROM table2 where some_condition2;

                INSERT INTO table3 values('contition_true');
                -- commit;
            ELSE
                INSERT INTO table3 values('contition_false'); 
                --- first rollback the first insert and then commit only this statement;
            END IF;
        END;
    END LOOP;
close cursor1;   

Answer 1

我不确定提交/回滚关闭光标是什么意思。你说的是哪个光标？您正在循环的光标，还是循环内的删除/插入语句？

提交/回滚将关闭事务，但不会关闭游标。如果是这种情况，以下代码在第二次循环光标时会出错，但您会注意到它不会：

begin
  for rec in (select level lvl from dual connect by level <= 5)
  loop
    dbms_output.put_line('lvl = '||rec.lvl);
    commit;
  end loop;
end;
/

lvl = 1
lvl = 2
lvl = 3
lvl = 4
lvl = 5

也许您在谈论通过提交获取？如果是这样，请查看this AskTom question。

或者你的光标是FOR UPDATE？如果是这样，那么执行提交将释放锁并关闭游标。

就目前情况而言，我在您的示例中看不到任何证据表明您根本需要一个游标循环（或者为什么您需要执行立即语句）。循环内部发生的事情与生成它的光标之间似乎没有联系。如果我是你，我会尝试使用一系列基于静态集的删除/插入来重写整个内容，而不是逐行执行所有操作。