create or replace procedure insert_dbz_two 

is

i number := 1;

cursor cur_dbz is select nvl(id,0) id,name,nvl(powerlevel,0) power,planet from dragonballz;

begin

for cur_rec in cur_dbz loop

if cur_rec.id = 0 then

i := i+1;

update dragonballz set id = i , powerlevel = i*22000 ;

end if;

end loop;

end;
/