PL/SQL loop

Example:
Declare

    i number := 0;

begin

    for r in (select * from abone where hesap_id=127406200)

    loop

        insert into eyavas.log2(ID) values (r.abone_id);

        i := i + 1;

        if (i mod 100 = 0) then

            Update eyavas.log set value=i where id=1;

            Commit;

        end if;

    end loop;

  

    Update eyavas.log set value=i where id=1;

    commit;

end;