[Oracle]匿名迴圈過程語句實驗

--loop/相當於do whiledeclare
s number:=0;
i number:=1;
begin
loop
exit when i<=10;
s:=s+i;
i:=i+1;
end loop;
dbms_output.put_line(s);
end;

-whiledeclare
s number:=0;
i number:=1;
begin
while i<=10 loop
s:=s+i;
i:=i+1;
end loop;
dbms_output.put_line(s);
end;

--fordeclare
s number:=0;
begin
for i in 1..10 loop
s:=s+i;
end loop;
dbms_output.put_line(s);
end;

--gotodeclare
s number:=0;
begin
for i in 1..10 loop
declare
i number:=9;
begin

dbms_output.put_line(i);
end;
end loop;
end;

轉自：http://hi.baidu.com/boaby_tdk/blog/item/17049a5884e8a2de9d82044f.html