存储过程游标遍历

 

 源自 http://375940084.blog.51cto.com/2581965/1060822/ 棉花糖的博客

 1 CREATE OR REPLACE PROCEDURE PRC_LJ IS 
 2   CURSOR C_EMP IS --声明显式游标  
 3     SELECT EMPNO,ENAME FROM EMP;  
 4   C_ROW C_EMP%ROWTYPE; --定义游标变量，该变量的类型为基于游标C_EMP的记录  
 5 BEGIN 
 6   --For 循环  
 7   FOR C_ROW IN C_EMP LOOP  
 8     DBMS_OUTPUT.PUT_LINE(C_ROW.EMPNO || '--' || C_ROW.ENAME);  
 9   END LOOP;  
10  
11   --Fetch 循环  
12   OPEN C_EMP;--必须要明确的打开和关闭游标  
13   LOOP  
14     FETCH C_EMP  
15       INTO C_ROW;  
16     EXIT WHEN C_EMP%NOTFOUND;  
17     DBMS_OUTPUT.PUT_LINE(C_ROW.EMPNO || '++' || C_ROW.ENAME);  
18   END LOOP;  
19   CLOSE C_EMP;  
20  
21   --While 循环  
22   OPEN C_EMP;--必须要明确的打开和关闭游标  
23     FETCH C_EMP INTO C_ROW;  
24     WHILE C_EMP%FOUND LOOP  
25       DBMS_OUTPUT.PUT_LINE(C_ROW.EMPNO || '**' || C_ROW.ENAME);  
26       FETCH C_EMP INTO C_ROW;  
27     END LOOP;  
28   CLOSE C_EMP;  
29 END PRC_LJ;

View Code