Oracle中Cursor介绍和使用

版权声明：本文为博主原创文章，未经博主允许不得转载。 https://blog.csdn.net/MyDreamNeverstop/article/details/78604033

一  概念 

游标是SQL的一个内存工作区，由系统或用户以变量的形式定义。游标的作用就是用于临时存储从数据库中提取的数据块。在某些情况下，需要把数据从存放在磁盘的表中调到计算机内存中进行处理，最后将处理结果显示出来或最终写回数据库。这样数据处理的速度才会提高，否则频繁的磁盘数据交换会降低效率。 

二  类型 

  Cursor类型包含三种: 隐式Cursor，显式Cursor和Ref Cursor（动态Cursor）。 

1． 隐式Cursor: 

1).对于Select …INTO…语句，一次只能从数据库中获取到一条数据，对于这种类型的DML Sql语句，就是隐式Cursor。例如：Select /Update / Insert/Delete操作。 

2)作用：可以通过隐式Cusor的属性来了解操作的状态和结果，从而达到流程的控制。Cursor的属性包含： 

SQL%ROWCOUNT 整型 代表DML语句成功执行的数据行数 

SQL%FOUND  布尔型  值为TRUE代表插入、删除、更新或单行查询操作成功 

SQL%NOTFOUND 布尔型 与SQL%FOUND属性返回值相反 

SQL%ISOPEN 布尔型 DML执行过程中为真，结束后为假 

3) 隐式Cursor是系统自动打开和关闭Cursor. 

下面是一个Sample：

[c-sharp] view
plain copy

1. Set Serveroutput on;
2. begin
3. update t_contract_master set liability_state = 1 where policy_code = '123456789';
4. if SQL%Found then
5. dbms_output.put_line('the Policy is updated successfully.');
6. commit;
7. else
8. dbms_output.put_line('the policy is updated failed.');
9. end if;
10. end;
11. /

2． 显式Cursor： 

（1） 对于从数据库中提取多行数据，就需要使用显式Cursor。显式Cursor的属性包含： 

游标的属性   返回值类型   意    义  

%ROWCOUNT   整型  获得FETCH语句返回的数据行数  

%FOUND  布尔型 最近的FETCH语句返回一行数据则为真，否则为假  

%NOTFOUND   布尔型 与%FOUND属性返回值相反  

%ISOPEN 布尔型 游标已经打开时值为真，否则为假  



（2） 对于显式游标的运用分为四个步骤： 

 定义游标---Cursor  [Cursor Name]  IS; 

 打开游标---Open  [Cursor Name]; 

 操作数据---Fetch  [Cursor name] 

 关闭游标---Close [Cursor Name],这个Step绝对不可以遗漏。 

（3）以下是三种常见显式Cursor用法。

[c-sharp] view
plain copy

1. Set serveroutput on;
2. declare
3. ---define Cursor
4. Cursor cur_policy is
5. select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
6. from t_contract_master cm
7. where cm.liability_state = 2
8. and cm.policy_type = 1
9. and cm.policy_cate in ('2','3','4')
10. and rownum < 5
11. order by cm.policy_code desc;
12. curPolicyInfo cur_policy%rowtype;---定义游标变量
13. Begin
14. open cur_policy; ---open cursor
15. Loop
16. --deal with extraction data from DB
17. Fetch cur_policy into curPolicyInfo;
18. Exit when cur_policy%notfound;
19. Dbms_Output.put_line(curPolicyInfo.policy_code);
20. end loop;
21. Exception
22. when others then
23. close cur_policy;
24. Dbms_Output.put_line(Sqlerrm);
25. if cur_policy%isopen then
26. --close cursor
27. close cur_policy;
28. end if;
29. end;
30. /
31. ------------------------
32. Set serveroutput on;
33. declare
34. Cursor cur_policy is
35. select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
36. from t_contract_master cm
37. where cm.liability_state = 2
38. and cm.policy_type = 1
39. and cm.policy_cate in ('2','3','4')
40. and rownum < 5
41. order by cm.policy_code desc;
42. v_policyCode t_contract_master.policy_code%type;
43. v_applicantId t_contract_master.applicant_id%type;
44. v_periodPrem t_contract_master.period_prem%type;
45. v_bankCode t_contract_master.bank_code%type;
46. v_bankAccount t_contract_master.bank_account%type;
47. Begin
48. open cur_policy;
49. Loop
50. Fetch cur_policy into v_policyCode,
51. v_applicantId,
52. v_periodPrem,
53. v_bankCode,
54. v_bankAccount;
55. Exit when cur_policy%notfound;
56. Dbms_Output.put_line(v_policyCode);
57. end loop;
58. Exception
59. when others then
60. close cur_policy;
61. Dbms_Output.put_line(Sqlerrm);
62. if cur_policy%isopen then
63. close cur_policy;
64. end if;
65. end;
66. /
67. --------------------------------
68. Set serveroutput on;
69. declare
70. Cursor cur_policy is
71. select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
72. from t_contract_master cm
73. where cm.liability_state = 2
74. and cm.policy_type = 1
75. and cm.policy_cate in ('2','3','4')
76. and rownum < 5
77. order by cm.policy_code desc;
78. Begin
79. For rec_Policy in cur_policy loop
80. Dbms_Output.put_line(rec_policy.policy_code);
81. end loop;
82. Exception
83. when others then
84. Dbms_Output.put_line(Sqlerrm);
85. end;
86. /

3． Ref Cursor（动态游标）： 

1） 与隐式Cursor,显式Cursor的区别：Ref Cursor是可以通过在运行期间传递参数来获取数据结果集。而另外两种Cursor，是静态的，在编译期间就决定数据结果集。 

2） Ref cursor的使用: 

 Type [Cursor type name] is ref cursor 

 Define 动态的Sql语句 

 Open cursor 

 操作数据---Fetch  [Cursor name] 

 Close Cursor 

下面是一个Sample：

[c-sharp] view
plain copy

1. Set serveroutput on;
2. Declare
3. ---define cursor type name
4. type cur_type is ref cursor;
5. cur_policy cur_type;
6. sqlStr varchar2(500);
7. rec_policy t_contract_master%rowtype;
8. begin
9. ---define 动态Sql
10. sqlStr := 'select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account from t_contract_master cm
11. where cm.liability_state = 2
12. and cm.policy_type = 1
13. and cm.policy_cate in (2,3,4)
14. and rownum < 5
15. order by cm.policy_code desc ';
16. ---Open Cursor
17. open cur_policy for sqlStr;
18. loop
19. fetch cur_policy into rec_policy.policy_code, rec_policy.applicant_id, rec_policy.period_prem,rec_policy.bank_code,rec_policy.bank_account;
20. exit when cur_policy%notfound;
21. Dbms_Output.put_line('Policy_code:'||rec_policy.policy_code);
22. end loop;
23. close cur_policy;
24. end;
25. /

4.常见Exception

[c-sharp] view
plain copy

1. 1.  错 误 名 称 错误代码    错 误 含 义
2. 2.  CURSOR_ALREADY_OPEN ORA_06511   试图打开已经打开的游标
3. 3.  INVALID_CURSOR  ORA_01001   试图使用没有打开的游标
4. 4.  DUP_VAL_ON_INDEX    ORA_00001   保存重复值到惟一索引约束的列中
5. 5.  ZERO_DIVIDE ORA_01476   发生除数为零的除法错误
6. 6.  INVALID_NUMBER  ORA_01722   试图对无效字符进行数值转换
7. 7.  ROWTYPE_MISMATCH    ORA_06504   主变量和游标的类型不兼容
8. 8.  VALUE_ERROR ORA_06502   转换、截断或算术运算发生错误
9. 9.  TOO_MANY_ROWS   ORA_01422   SELECT…INTO…语句返回多于一行的数据
10. 10. NO_DATA_FOUND   ORA_01403   SELECT…INTO…语句没有数据返回
11. 11. TIMEOUT_ON_RESOURCE ORA_00051   等待资源时发生超时错误
12. 12. TRANSACTION_BACKED_OUT  ORA_00060   由于死锁，提交失败
13. 13. STORAGE_ERROR   ORA_06500   发生内存错误
14. 14. PROGRAM_ERROR   ORA_06501   发生PL/SQL内部错误
15. 15. NOT_LOGGED_ON   ORA_01012   试图操作未连接的数据库
16. 16. LOGIN_DENIED    ORA_01017   在连接时提供了无效用户名或口令

附：使用游标

[c-sharp] view
plain copy

1. 15-1:使用标量变量接收游标数据
2. DECLARE
3. CURSOR emp_cursor IS
4. SELECT ename,job,sal FROM emp WHERE deptno=&dno;
5. v_ename emp.ename%TYPE;
6. v_sal emp.sal%TYPE;
7. v_job emp.job%TYPE;
8. BEGIN
9. OPEN emp_cursor;
10. LOOP
11. FETCH emp_cursor INTO v_ename,v_job,v_sal;
12. EXIT WHEN emp_cursor%NOTFOUND;
13. dbms_output.put_line('姓名：'||v_ename||'，岗位：'||v_job||'，工资：'||v_sal);
14. END LOOP;
15. CLOSE emp_cursor;
16. END;
17. /
18. 15-2:使用pl/sql纪录变量接收游标数据
19. DECLARE
20. CURSOR emp_cursor IS
21. SELECT ename,sal FROM emp ORDER BY sal DESC;
22. emp_record emp_cursor%ROWTYPE;
23. BEGIN
24. OPEN emp_cursor;
25. LOOP
26. FETCH emp_cursor INTO emp_record;
27. EXIT WHEN emp_cursor%NOTFOUND OR emp_cursor%ROWCOUNT>&n;
28. dbms_output.put_line('姓名：'||emp_record.ename||
29. '，工资：'||emp_record.sal);
30. END LOOP;
31. CLOSE emp_cursor;
32. END;
33. /
34. 15-3:使用pl/sql集合变量接收游标数据
35. DECLARE
36. CURSOR emp_cursor IS SELECT ename,sal FROM emp
37. WHERE lower(job)=lower('&job');
38. TYPE emp_table_type IS TABLE OF emp_cursor%ROWTYPE
39. INDEX BY BINARY_INTEGER;
40. emp_table emp_table_type;
41. i INT;
42. BEGIN
43. OPEN emp_cursor;
44. LOOP
45. i:=emp_cursor%ROWCOUNT+1;
46. FETCH emp_cursor INTO emp_table(i);
47. EXIT WHEN emp_cursor%NOTFOUND;
48. dbms_output.put_line('姓名：'||emp_table(i).ename||
49. '，工资：'||emp_table(i).sal);
50. END LOOP;
51. CLOSE emp_cursor;
52. END;
53. /
54. 15-4:在游标for循环中引用已定义游标
55. DECLARE
56. CURSOR emp_cursor IS SELECT ename,hiredate FROM emp
57. ORDER BY hiredate DESC;
58. BEGIN
59. FOR emp_record IN emp_cursor LOOP
60. dbms_output.put_line('姓名：'||emp_record.ename
61. ||',工作日期：'||emp_record.hiredate);
62. EXIT WHEN emp_cursor%ROWCOUNT=&n;
63. END LOOP;
64. END;
65. /
66. 15-5:在游标for循环中直接引用子查询
67. BEGIN
68. FOR emp_record IN (SELECT ename,hiredate,rownum FROM emp
69. ORDER BY hiredate) LOOP
70. dbms_output.put_line('姓名：'||emp_record.ename
71. ||',工作日期：'||emp_record.hiredate);
72. EXIT WHEN emp_record.rownum=&n;
73. END LOOP;
74. END;
75. /
76. 15-6:参数游标
77. DECLARE
78. CURSOR emp_cursor(dno NUMBER) IS
79. SELECT ename,job FROM emp WHERE deptno=dno;
80. BEGIN
81. FOR emp_record IN emp_cursor(&dno) LOOP
82. dbms_output.put_line('姓名：'||emp_record.ename
83. ||',岗位：'||emp_record.job);
84. END LOOP;
85. END;
86. /
87. 15-7:更新游标行
88. DECLARE
89. CURSOR emp_cursor IS
90. SELECT ename,sal,deptno FROM emp FOR UPDATE;
91. dno INT:=&no;
92. BEGIN
93. FOR emp_record IN emp_cursor LOOP
94. IF emp_record.deptno=dno THEN
95. dbms_output.put_line('姓名:'||emp_record.ename
96. ||',原工资:'||emp_record.sal);
97. UPDATE emp SET sal=sal*1.1 WHERE CURRENT OF emp_cursor;
98. END IF;
99. END LOOP;
100. END;
101. /
102. 15-8:删除游标行
103. DECLARE
104. CURSOR emp_cursor IS
105. SELECT ename FROM emp FOR UPDATE;
106. name VARCHAR2(10):=lower('&name');
107. BEGIN
108. FOR emp_record IN emp_cursor LOOP
109. IF lower(emp_record.ename)=name THEN
110. DELETE FROM emp WHERE CURRENT OF emp_cursor;
111. ELSE
112. dbms_output.put_line('姓名:'||emp_record.ename);
113. END IF;
114. END LOOP;
115. END;
116. /
117. 15-9:使用of子句在特定表上加行共享锁．
118. DECLARE
119. CURSOR emp_cursor IS
120. SELECT a.dname,b.ename FROM dept a JOIN emp b
121. ON a.deptno=b.deptno
122. FOR UPDATE OF b.deptno;
123. name VARCHAR2(10):=LOWER('&name');
124. BEGIN
125. FOR emp_record IN emp_cursor LOOP
126. IF LOWER(emp_record.dname)=name THEN
127. dbms_output.put_line('姓名:'||emp_record.ename);
128. DELETE FROM emp WHERE CURRENT OF emp_cursor;
129. END IF;
130. END LOOP;
131. END;
132. /
133. 15-10:使用无返回类型的游标变量
134. DECLARE
135. TYPE ref_cursor_type IS REF CURSOR;
136. ref_cursor ref_cursor_type;
137. v1 NUMBER(6);
138. v2 VARCHAR2(10);
139. BEGIN
140. OPEN ref_cursor FOR
141. SELECT &col1 col1,&col2 col2 FROM &table WHERE &cond;
142. LOOP
143. FETCH ref_cursor INTO v1,v2;
144. EXIT WHEN ref_cursor%NOTFOUND;
145. dbms_output.put_line('col1='||v1||',col2='||v2);
146. END LOOP;
147. CLOSE ref_cursor;
148. END;
149. /
150. 15-11:使用有返回类型的游标变量
151. DECLARE
152. TYPE emp_cursor_type IS REF CURSOR RETURN emp%ROWTYPE;
153. emp_cursor emp_cursor_type;
154. emp_record emp%ROWTYPE;
155. BEGIN
156. OPEN emp_cursor FOR SELECT * FROM emp
157. WHERE deptno=&dno;
158. LOOP
159. FETCH emp_cursor INTO emp_record;
160. EXIT WHEN emp_cursor%NOTFOUND;
161. dbms_output.put_line('姓名:'||emp_record.ename||
162. ',工资:'||emp_record.sal);
163. END LOOP;
164. CLOSE emp_cursor;
165. END;
166. /
167. 15-12:使用fetch...bulk collect提取所有数据
168. DECLARE
169. CURSOR emp_cursor IS
170. SELECT * FROM emp WHERE LOWER(job)=LOWER('&job');
171. TYPE emp_table_type IS TABLE OF emp%ROWTYPE;
172. emp_table emp_table_type;
173. BEGIN
174. OPEN emp_cursor;
175. FETCH emp_cursor BULK COLLECT INTO emp_table;
176. CLOSE emp_cursor;
177. FOR i IN 1.. emp_table.COUNT LOOP
178. dbms_output.put_line('姓名:'||emp_table(i).ename
179. ||',工资:'||emp_table(i).sal);
180. END LOOP;
181. END;
182. /
183. 15-13:使用limit子句限制提取行数
184. DECLARE
185. CURSOR emp_cursor IS SELECT * FROM emp;
186. TYPE emp_array_type IS VARRAY(5) OF emp%ROWTYPE;
187. emp_array emp_array_type;
188. BEGIN
189. OPEN emp_cursor;
190. LOOP
191. FETCH emp_cursor BULK COLLECT INTO emp_array LIMIT &rows;
192. FOR i IN 1..emp_array.COUNT LOOP
193. dbms_output.put_line('姓名:'||emp_array(i).ename
194. ||',工资:'||emp_array(i).sal);
195. END LOOP;
196. EXIT WHEN emp_cursor%NOTFOUND;
197. END LOOP;
198. CLOSE emp_cursor;
199. END;
200. /
201. 15-14:使用cursor表达式
202. DECLARE
203. CURSOR dept_cursor(no NUMBER) IS
204. SELECT a.dname,CURSOR(SELECT * FROM emp
205. WHERE deptno=a.deptno)
206. FROM dept a WHERE a.deptno=no;
207. TYPE ref_cursor_type IS REF CURSOR;
208. emp_cursor ref_cursor_type;
209. emp_record emp%ROWTYPE;
210. v_dname dept.dname%TYPE;
211. BEGIN
212. OPEN dept_cursor(&dno);
213. LOOP
214. FETCH dept_cursor INTO v_dname,emp_cursor;
215. EXIT WHEN dept_cursor%NOTFOUND;
216. dbms_output.put_line('部门名:'||v_dname);
217. LOOP
218. FETCH emp_cursor INTO emp_record;
219. EXIT WHEN emp_cursor%NOTFOUND;
220. dbms_output.put_line('----雇员名:'||emp_record.ename
221. ||',岗位:'||emp_record.job);
222. END LOOP;
223. END LOOP;
224. CLOSE dept_cursor;
225. END;
226. /