View source for Loop over records

<syntaxhighlight lang=sql>
create table table1(id number, omschr varchar(100));
insert into table1(id,omschr) values(1,'test 1');
insert into table1(id,omschr) values(2,'test 2');
insert into table1(id,omschr) values(3,'test 3');
insert into table1(id,omschr) values(4,'test 4');
Commit;

set serveroutput on
declare
  cursor c1 is select * from table1 FOR UPDATE;
  cnt number default 0;
begin 
  for x in c1 loop
    update table1 set omschr=omschr||'.' where current of c1;
    cnt := cnt + sql%rowcount;
    dbms_output.put_line( 'processing ' || cnt || ' records...' );
  end loop;
end;
/
commit;
select * from table1;
</syntaxhighlight>
[[Category:Oracle]]
[[Category:Oracle PL/SQL]]
[[Category:2009]]