PL/SQL for loop

一、数值型循环

--数值型For循环
procedure loop_num_for
(
   lowest  in number,
   highest in number
)
is
begin
   FOR even_number in lowest .. highest --升序
   loop
      --处理非平滑增长的索引
      if mod(even_number,2)=0
      then
         dbms_output.put_line('now number:' || even_number);
      end if;
   end loop;    
end loop_num_for;

这种循环在开始的时候就已经知道循环的次数了，注意这里不需要声明循环索引，因为PL/SQL会自动隐式的用一个integer类型的局部变量作为它的循环索引；

如果要降序循环，必须加上reverse关键字，并且循环上边界和下边界的顺利无需改变：

FOR even_number in reverse lowest .. highest
 loop
    dbms_output.put_line('now number:' || even_number);
 end loop;  

另外需要说明的是，数值型FOR循环中，索引总是以1为单位递增或递减。

例如：

SQL> --if exit
SQL> declare
  2    v_rlt number(8):=-3;
  3  begin
  4     <<fst_loop>>
  5     loop
  6       dbms_output.put_line('v_rlt = '||v_rlt);
  7       v_rlt:=v_rlt+1;
  8       if v_rlt > 3 then
  9        dbms_output.put_line('变量的值已经大于3，当前值为'||v_rlt);
 10        exit fst_loop;
 11       end if;
 12     end loop fst_loop;
 13       dbms_output.put_line('LOOP循环已经结束！');
 14  end;
 15  /

v_rlt = -3
v_rlt = -2
v_rlt = -1
v_rlt = 0
v_rlt = 1
v_rlt = 2
v_rlt = 3
变量的值已经大于3，当前值为4
LOOP循环已经结束！

PL/SQL procedure successfully completed

二、游标型循环

--游标型For循环
procedure loop_cursor_for
is
begin
     declare cursor userinfo_cur is select * from userinfo_table;
     begin
       FOR userinfo_rec in userinfo_cur
       loop
          dbms_output.put_line('username is:' || userinfo_rec.user_name);              
       end loop;
     end;
end loop_cursor_for;

当游标中的所有记录都取出来后，FOR循环就会自动终止，这里不用显示OPEN、CLOSE游标，PL/SQL引擎会自动处理。

参考：
1.http://www.cnblogs.com/maoniu602/archive/2013/03/01/2938758.html
2.http://www.cnblogs.com/Richardzhu/archive/2013/12/03/3455806.html