oracle procedure案例二--delete

看点如下：

1.变量设置初始值

2.使用bulk collect一次性取数据到内存，每2500条提交一次，一来避免快照过旧的报错，二来提高效率不像游标一条条取

3.通过rowid做删除操作

 

 

create or replace procedure newsadmin.p_bulkdel_newlog(p_edate in date, 
                                                       p_sdate in date default to_date('2012-06-01','yyyy-mm-dd')) is 
  TYPE ARRROWID IS TABLE OF ROWID INDEX BY BINARY_INTEGER; 
  tbrows ARRROWID; 
  row    PLS_INTEGER; 
  cursor delete_table is 
    select rowid 
      from newsadmin.newlog 
     where EITIME <= p_edate 
       and eitime >= p_sdate; 
BEGIN 
  open delete_table; 
  loop 
    fetch delete_table bulk collect 
      into tbrows limit 2500; 
    FORALL row IN 1 .. tbrows.count() 
      DELETE newsadmin.newlog WHERE rowid = tbrows(row); 
    commit; 
    -- sys.dbms_lock.sleep(1);   
    exit when delete_table%notfound; 
  end loop; 
  close delete_table; 
END;