rollback_in_loop_1

rollback_in_loop_1

declare 
  i integer; 
begin
  insert into tbl_1
    (id1)
  values
    (1);
  
  for s in (SELECT t.* FROM all_objects t where rownum < 3) loop    
    begin
      insert into tbl_2
        (id2)
      values
        (1);
      
      i := 7 / (2-2);
    exception
      when others then
        rollback;
        dbms_output.put_line(SQLERRM); 
    end;
  end loop;
  
end;