谁指点下！oracle初学者关于存储过程中编写循环的有关问题!+急+++++++++急

哪位高手指点下！oracle菜鸟关于存储过程中编写循环的问题!!!!急！+急+++++++++急！！！！！
create or replace procedure kj_yf is
kjyf int;
begin
kjyf:=2;
while kjyf<13 loop
insert into a(a1,a2,a3,a4)
select a1,a2,KJYF,a4
from a 
where a3=1;
kjyf:=kjyf+1;
end loop; 
[解决办法]
最后加个end;
[解决办法]
#1正解，end loop 后加个COMMIT;