oracle存储过程循环

--流程控制

declare

str varchar(18);

begin

str:='b';

if(str='a')
then dbms_output.put_line('a');

elsif(str='b')
then dbms_output.put_line('b');

else
dbms_output.put_line('other');

end if;

end;

--循环控制

--loop循环控制

declare

i number;

begin

i:=1;

loop

dbms_output.put_line(i);

i:=i+1;

exit when i=100;

end loop;

end;

--嵌套循环

declare

i number;

j number;

begin

i:=0;

j:=0;

loop

i:=i+1;

dbms_output.put_line('i='||i);

exit when i=5;

loop

j:=j+1;

dbms_output.put_line('j='||j);

exit when j=5;

end loop;

j:=0;

end loop;

end;

--退出整个循环

declare

i number;

j number;

begin

i:=0;

j:=0;

<<outloop>>loop

i:=i+1;

dbms_output.put_line('i='||i);

<<inloop>>loop

j:=j+1;

dbms_output.put_line('j='||j);

exit outloop when j=10;

end loop;

j:=0;

exit when i=10;

end loop;

end;

--for 循环

begin

for i in 1..10 loop
dbms_output.put_line(i);

end loop;

end;

--while循环

declare

i number;

begin

i:=0;

while(i<10) loop
dbms_output.put_line(i);
i:=i+1;

end loop;

end;

--异常处理

declare

v_sqlcode varchar(50);

v_sqlerrm varchar(200);

tb_ekp_change ekp_change%rowtype; 

begin

select *

into tb_ekp_change

from ekp_change

where fd_id=1;

exception
when others then
v_sqlcode:=SQLCODE;
v_sqlerrm:=SQLERRM;
dbms_output.put_line(v_sqlcode);
dbms_output.put_line(v_sqlerrm);

end;