怎么样实现循环删除操作

Question

可以用游标，然后循环，再循环体内部delete\commit

Answer 1

set serveroutput on
declare
  i number:=0;
  rows number:=10000;
begin
  loop
    delete TABLENAME where rownum<=rows and ...;
    i := SQL%ROWCOUNT+i;
    dbms_output.put_line('delete '||i||' rows');
    commit;
    exit when i<>rows;
  end loop;
end;
/

Answer 2

对大数据量用bulk collect实现批量删除，效率会高很多，下面在9i下测试通过CREATE OR REPLACE PROCEDURE bulkdelete AS  TYPE T_DATE_t IS TABLE OF TAB1.T_DATE%TYPE;  T_DATE_array T_DATE_t;  CURSOR c1 IS
    SELECT T_DATE FROM tab1 WHERE extract(MONTH FROM T_DATE) = 10;BEGIN
  OPEN c1;
  LOOP
    FETCH c1 BULK COLLECT INTO T_DATE_array LIMIT 1000; --一次删除1000条
    FORALL i IN T_DATE_array.FIRST .. T_DATE_array.LAST
      DELETE FROM tab1 WHERE T_DATE = T_DATE_array(i);
      
    EXIT WHEN c1%NOTFOUND;
  END LOOP;  CLOSE c1;  COMMIT;EXCEPTION
  WHEN OTHERS THEN
    ROLLBACK;
END bulkdelete;

Answer 3

还有注意上面用的是forall，对于大数据量进行插入删除更新的时候 ，有时候用forall要比一般游标和for循环要快很多的，你可以自己用两 种方法比较下再 做取舍。