首页 / ORACLE / 小菜鸟之oracle游标
小菜鸟之oracle游标
内容导读
互联网集市收集整理的这篇技术教程文章主要介绍了小菜鸟之oracle游标，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含22132字，纯文字阅读大概需要32分钟。
内容图文
1 游标的使用
2
3 在 PL/SQL 程序中，对于处理多行记录的事务经常使用游标来实现。
4 4.1 游标概念
5
6 在PL/SQL块中执行SELECT、INSERT、DELETE和UPDATE语句时，ORACLE会在内存中为其分配上下文区（Context Area），即缓冲区。游标是指向该区的一个指针，或是命名一个工作区（Work Area），或是一种结构化数据类型。它为应用等量齐观提供了一种对具有多行数据查询结果集中的每一行数据分别进行单独处理的方法，是设计嵌入式SQL语句的应用程序的常用编程方式。
7 在每个用户会话中，可以同时打开多个游标，其数量由数据库初始化参数文件中的OPEN_CURSORS参数定义。
8 对于不同的SQL语句，游标的使用情况不同：
9 SQL语句
10 游标
11
12
13 4.1.1 处理显式游标
14
15
16 1. 显式游标处理
17 显式游标处理需四个 PL/SQL步骤:
18 l 定义/声明游标：就是定义一个游标名，以及与其相对应的SELECT 语句。
19 格式：
20
21 CURSOR cursor_name[(parameter[, parameter]…)]
22 [RETURN datatype]
23 IS
24 select_statement;
25
26 游标参数只能为输入参数，其格式为：
27
28 parameter_name [IN] datatype [{:= | DEFAULT} expression]
29
30 在指定数据类型时，不能使用长度约束。如NUMBER(4),CHAR(10) 等都是错误的。
31 [RETURN datatype]是可选的，表示游标返回数据的数据。如果选择，则应该严格与select_statement中的选择列表在次序和数据类型上匹配。一般是记录数据类型或带“%ROWTYPE”的数据。
32
33 l 打开游标：就是执行游标所对应的SELECT 语句，将其查询结果放入工作区，并且指针指向工作区的首部，标识游标结果集合。如果游标查询语句中带有FOR UPDATE选项，OPEN 语句还将锁定数据库表中游标结果集合对应的数据行。
34 格式：
35
36 OPEN cursor_name[([parameter =>] value[, [parameter =>] value]…)];
37
38 在向游标传递参数时，可以使用与函数参数相同的传值方法，即位置表示法和名称表示法。PL/SQL 程序不能用OPEN 语句重复打开一个游标。
39
40 l 提取游标数据：就是检索结果集合中的数据行，放入指定的输出变量中。
41 格式：
42
43 FETCH cursor_name INTO {variable_list | record_variable };
44
45
46 执行FETCH语句时，每次返回一个数据行，然后自动将游标移动指向下一个数据行。当检索到最后一行数据时，如果再次执行FETCH语句，将操作失败，并将游标属性%NOTFOUND置为TRUE。所以每次执行完FETCH语句后，检查游标属性%NOTFOUND就可以判断FETCH语句是否执行成功并返回一个数据行，以便确定是否给对应的变量赋了值。
47 l 对该记录进行处理；
48 l 继续处理，直到活动集合中没有记录；
49 l 关闭游标：当提取和处理完游标结果集合数据后，应及时关闭游标，以释放该游标所占用的系统资源，并使该游标的工作区变成无效，不能再使用FETCH 语句取其中数据。关闭后的游标可以使用OPEN 语句重新打开。
50 格式：
51
52 CLOSE cursor_name;
53
54 注：定义的游标不能有INTO 子句。
55
56 例1. 查询前10名员工的信息。
57
58 DECLARE
59 CURSOR c_cursor
60 IS SELECT first_name || last_name, Salary
61 FROM EMPLOYEES
62 WHERE rownum<11;
63 v_ename EMPLOYEES.first_name%TYPE;
64 v_sal EMPLOYEES.Salary%TYPE;
65 BEGIN
66 OPEN c_cursor;
67 FETCH c_cursor INTO v_ename, v_sal;
68 WHILE c_cursor%FOUND LOOP
69 DBMS_OUTPUT.PUT_LINE(v_ename||'---'||to_char(v_sal) );
70 FETCH c_cursor INTO v_ename, v_sal;
71 END LOOP;
72 CLOSE c_cursor;
73 END;
74 复制代码
75
76 例2. 游标参数的传递方法。
77
78 复制代码
79 DECLARE
80 DeptRec DEPARTMENTS%ROWTYPE;
81 Dept_name DEPARTMENTS.DEPARTMENT_NAME%TYPE;
82 Dept_loc DEPARTMENTS.LOCATION_ID%TYPE;
83 CURSOR c1 IS
84 SELECT DEPARTMENT_NAME, LOCATION_ID FROM DEPARTMENTS
85 WHERE DEPARTMENT_ID <= 30;
86
87 CURSOR c2(dept_no NUMBER DEFAULT 10) IS
88 SELECT DEPARTMENT_NAME, LOCATION_ID FROM DEPARTMENTS
89 WHERE DEPARTMENT_ID <= dept_no;
90 CURSOR c3(dept_no NUMBER DEFAULT 10) IS
91 SELECT * FROM DEPARTMENTS
92 WHERE DEPARTMENTS.DEPARTMENT_ID <=dept_no;
93 BEGIN
94 OPEN c1;
95 LOOP
96 FETCH c1 INTO dept_name, dept_loc;
97 EXIT WHEN c1%NOTFOUND;
98 DBMS_OUTPUT.PUT_LINE(dept_name||'---'||dept_loc);
99 END LOOP;
100 CLOSE c1;
101
102 OPEN c2;
103 LOOP
104 FETCH c2 INTO dept_name, dept_loc;
105 EXIT WHEN c2%NOTFOUND;
106 DBMS_OUTPUT.PUT_LINE(dept_name||'---'||dept_loc);
107 END LOOP;
108 CLOSE c2;
109
110 OPEN c3(dept_no =>20);
111 LOOP
112 FETCH c3 INTO deptrec;
113 EXIT WHEN c3%NOTFOUND;
114 DBMS_OUTPUT.PUT_LINE(deptrec.DEPARTMENT_ID||'---'||deptrec.DEPARTMENT_NAME||'---'||deptrec.LOCATION_ID);
115 END LOOP;
116 CLOSE c3;
117 END;
118 复制代码
119
120 2.游标属性
121 Cursor_name%FOUND 布尔型属性，当最近一次提取游标操作FETCH成功则为 TRUE,否则为FALSE；
122 Cursor_name%NOTFOUND 布尔型属性，与%FOUND相反；
123 Cursor_name%ISOPEN 布尔型属性，当游标已打开时返回 TRUE；
124 Cursor_name%ROWCOUNT 数字型属性，返回已从游标中读取的记录数。
125
126 例3：给工资低于1200 的员工增加工资50。
127
128 复制代码
129 DECLARE
130 v_empno EMPLOYEES.EMPLOYEE_ID%TYPE;
131 v_sal EMPLOYEES.Salary%TYPE;
132 CURSOR c_cursor IS SELECT EMPLOYEE_ID, Salary FROM EMPLOYEES;
133 BEGIN
134 OPEN c_cursor;
135 LOOP
136 FETCH c_cursor INTO v_empno, v_sal;
137 EXIT WHEN c_cursor%NOTFOUND;
138 IF v_sal<=1200 THEN
139 UPDATE EMPLOYEES SET Salary=Salary+50 WHERE EMPLOYEE_ID=v_empno;
140 DBMS_OUTPUT.PUT_LINE('编码为'||v_empno||'工资已更新!');
141 END IF;
142 DBMS_OUTPUT.PUT_LINE('记录数:'|| c_cursor %ROWCOUNT);
143 END LOOP;
144 CLOSE c_cursor;
145 END;
146 复制代码
147
148 例4：没有参数且没有返回值的游标。
149
150 复制代码
151 DECLARE
152 v_f_name employees.first_name%TYPE;
153 v_j_id employees.job_id%TYPE;
154 CURSOR c1 --声明游标,没有参数没有返回值
155 IS
156 SELECT first_name, job_id FROM employees
157 WHERE department_id = 20;
158 BEGIN
159 OPEN c1; --打开游标
160 LOOP
161 FETCH c1 INTO v_f_name, v_j_id; --提取游标
162 IF c1%FOUND THEN
163 DBMS_OUTPUT.PUT_LINE(v_f_name||'的岗位是'||v_j_id);
164 ELSE
165 DBMS_OUTPUT.PUT_LINE('已经处理完结果集了');
166 EXIT;
167 END IF;
168 END LOOP;
169 CLOSE c1; --关闭游标
170 END;
171 复制代码
172
173 例5：有参数且没有返回值的游标。
174
175 复制代码
176 DECLARE
177 v_f_name employees.first_name%TYPE;
178 v_h_date employees.hire_date%TYPE;
179 CURSOR c2(dept_id NUMBER, j_id VARCHAR2) --声明游标,有参数没有返回值
180 IS
181 SELECT first_name, hire_date FROM employees
182 WHERE department_id = dept_id AND job_id = j_id;
183 BEGIN
184 OPEN c2(90, 'AD_VP'); --打开游标,传递参数值
185 LOOP
186 FETCH c2 INTO v_f_name, v_h_date; --提取游标
187 IF c2%FOUND THEN
188 DBMS_OUTPUT.PUT_LINE(v_f_name||'的雇佣日期是'||v_h_date);
189 ELSE
190 DBMS_OUTPUT.PUT_LINE('已经处理完结果集了');
191 EXIT;
192 END IF;
193 END LOOP;
194 CLOSE c2; --关闭游标
195 END;
196 复制代码
197
198 例6：有参数且有返回值的游标。
199
200 复制代码
201 DECLARE
202 TYPE emp_record_type IS RECORD(
203 f_name employees.first_name%TYPE,
204 h_date employees.hire_date%TYPE);
205 v_emp_record EMP_RECORD_TYPE;
206
207 CURSOR c3(dept_id NUMBER, j_id VARCHAR2) --声明游标,有参数有返回值
208 RETURN EMP_RECORD_TYPE
209 IS
210 SELECT first_name, hire_date FROM employees
211 WHERE department_id = dept_id AND job_id = j_id;
212 BEGIN
213 OPEN c3(j_id => 'AD_VP', dept_id => 90); --打开游标,传递参数值
214 LOOP
215 FETCH c3 INTO v_emp_record; --提取游标
216 IF c3%FOUND THEN
217 DBMS_OUTPUT.PUT_LINE(v_emp_record.f_name||'的雇佣日期是'
218 ||v_emp_record.h_date);
219 ELSE
220 DBMS_OUTPUT.PUT_LINE('已经处理完结果集了');
221 EXIT;
222 END IF;
223 END LOOP;
224 CLOSE c3; --关闭游标
225 END;
226 复制代码
227
228 例7：基于游标定义记录变量。
229
230 复制代码
231 DECLARE
232 CURSOR c4(dept_id NUMBER, j_id VARCHAR2) --声明游标,有参数没有返回值
233 IS
234 SELECT first_name f_name, hire_date FROM employees
235 WHERE department_id = dept_id AND job_id = j_id;
236 --基于游标定义记录变量，比声明记录类型变量要方便，不容易出错
237 v_emp_record c4%ROWTYPE;
238 BEGIN
239 OPEN c4(90, 'AD_VP'); --打开游标,传递参数值
240 LOOP
241 FETCH c4 INTO v_emp_record; --提取游标
242 IF c4%FOUND THEN
243 DBMS_OUTPUT.PUT_LINE(v_emp_record.f_name||'的雇佣日期是'
244 ||v_emp_record.hire_date);
245 ELSE
246 DBMS_OUTPUT.PUT_LINE('已经处理完结果集了');
247 EXIT;
248 END IF;
249 END LOOP;
250 CLOSE c4; --关闭游标
251 END;
252 复制代码
253
254 3. 游标的FOR循环
255 PL/SQL语言提供了游标FOR循环语句，自动执行游标的OPEN、FETCH、CLOSE语句和循环语句的功能；当进入循环时，游标FOR循环语句自动打开游标，并提取第一行游标数据，当程序处理完当前所提取的数据而进入下一次循环时，游标FOR循环语句自动提取下一行数据供程序处理，当提取完结果集合中的所有数据行后结束循环，并自动关闭游标。
256 格式：
257
258 FOR index_variable IN cursor_name[(value[, value]…)] LOOP
259 -- 游标数据处理代码
260 END LOOP;
261
262 其中：
263 index_variable为游标FOR 循环语句隐含声明的索引变量，该变量为记录变量，其结构与游标查询语句返回的结构集合的结构相同。在程序中可以通过引用该索引记录变量元素来读取所提取的游标数据，index_variable中各元素的名称与游标查询语句选择列表中所制定的列名相同。如果在游标查询语句的选择列表中存在计算列，则必须为这些计算列指定别名后才能通过游标FOR 循环语句中的索引变量来访问这些列数据。
264 注：不要在程序中对游标进行人工操作；不要在程序中定义用于控制FOR循环的记录。
265
266 例8：
267 复制代码
268 DECLARE
269 CURSOR c_sal IS SELECT employee_id, first_name || last_name ename, salary
270 FROM employees ;
271 BEGIN
272 --隐含打开游标
273 FOR v_sal IN c_sal LOOP
274 --隐含执行一个FETCH语句
275 DBMS_OUTPUT.PUT_LINE(to_char(v_sal.employee_id)||'---'|| v_sal.ename||'---'||to_char(v_sal.salary)) ;
276 --隐含监测c_sal%NOTFOUND
277 END LOOP;
278 --隐含关闭游标
279 END;
280 复制代码
281
282
283
284 例9：当所声明的游标带有参数时，通过游标FOR 循环语句为游标传递参数。
285
286 复制代码
287 DECLARE
288 CURSOR c_cursor(dept_no NUMBER DEFAULT 10)
289 IS
290 SELECT department_name, location_id FROM departments WHERE department_id <= dept_no;
291 BEGIN
292 DBMS_OUTPUT.PUT_LINE('当dept_no参数值为30：');
293 FOR c1_rec IN c_cursor(30) LOOP DBMS_OUTPUT.PUT_LINE(c1_rec.department_name||'---'||c1_rec.location_id);
294 END LOOP;
295 DBMS_OUTPUT.PUT_LINE(CHR(10)||'使用默认的dept_no参数值10：');
296 FOR c1_rec IN c_cursor LOOP DBMS_OUTPUT.PUT_LINE(c1_rec.department_name||'---'||c1_rec.location_id);
297 END LOOP;
298 END;
299 复制代码
300
301 例10：PL/SQL还允许在游标FOR循环语句中使用子查询来实现游标的功能。
302
303
304
305 BEGIN
306 FOR c1_rec IN(SELECT department_name, location_id FROM departments) LOOP DBMS_OUTPUT.PUT_LINE(c1_rec.department_name||'---'||c1_rec.location_id);
307 END LOOP;
308 END;
309
310 4.1.2 处理隐式游标
311 显式游标主要是用于对查询语句的处理，尤其是在查询结果为多条记录的情况下；而对于非查询语句，如修改、删除操作，则由ORACLE 系统自动地为这些操作设置游标并创建其工作区，这些由系统隐含创建的游标称为隐式游标，隐式游标的名字为SQL，这是由ORACLE 系统定义的。对于隐式游标的操作，如定义、打开、取值及关闭操作，都由ORACLE 系统自动地完成，无需用户进行处理。用户只能通过隐式游标的相关属性，来完成相应的操作。在隐式游标的工作区中，所存放的数据是与用户自定义的显示游标无关的、最新处理的一条SQL 语句所包含的数据。
312 格式调用为： SQL%
313
314 注：INSERT, UPDATE, DELETE, SELECT 语句中不必明确定义游标。
315
316 隐式游标属性
317 属性
318 值
319 SELECT
320 INSERT
321 UPDATE
322 DELETE
323 SQL%ISOPEN
324
325 FALSE
326 FALSE
327 FALSE
328 FALSE
329 SQL%FOUND
330 TRUE
331 有结果
332
333 成功
334 成功
335 SQL%FOUND
336 FALSE
337 没结果
338
339 失败
340 失败
341 SQL%NOTFUOND
342 TRUE
343 没结果
344
345 失败
346 失败
347 SQL%NOTFOUND
348 FALSE
349 有结果
350
351 成功
352 失败
353 SQL%ROWCOUNT
354
355 返回行数，只为1
356 插入的行数
357 修改的行数
358 删除的行数
359
360 例11: 删除EMPLOYEES表中某部门的所有员工，如果该部门中已没有员工，则在DEPARTMENT表中删除该部门。
361
362
363 复制代码
364 DECLARE
365 V_deptno department_id%TYPE :=&p_deptno;
366 BEGIN
367 DELETE FROM employees WHERE department_id=v_deptno;
368 IF SQL%NOTFOUND THEN
369 DELETE FROM departments WHERE department_id=v_deptno;
370 END IF;
371 END;
372 复制代码
373
374 例12: 通过隐式游标SQL的%ROWCOUNT属性来了解修改了多少行。
375 复制代码
376 DECLARE
377 v_rows NUMBER;
378 BEGIN
379 --更新数据
380 UPDATE employees SET salary = 30000
381 WHERE department_id = 90 AND job_id = 'AD_VP';
382 --获取默认游标的属性值
383 v_rows := SQL%ROWCOUNT;
384 DBMS_OUTPUT.PUT_LINE('更新了'||v_rows||'个雇员的工资');
385 --回退更新，以便使数据库的数据保持原样
386 ROLLBACK;
387 END;
388 复制代码
389
390
391
392
393 4.1.3 关于 NO_DATA_FOUND 和 %NOTFOUND的区别
394
395
396 SELECT … INTO 语句触发 NO_DATA_FOUND；
397 当一个显式游标的WHERE子句未找到时触发%NOTFOUND；
398 当UPDATE或DELETE 语句的WHERE 子句未找到时触发 SQL%NOTFOUND；在提取循环中要用 %NOTFOUND 或%FOUND 来确定循环的退出条件，不要用 NO_DATA_FOUND.4.1.4 使用游标更新和删除数据
399 游标修改和删除操作是指在游标定位下，修改或删除表中指定的数据行。这时，要求游标查询语句中必须使用FOR UPDATE选项，以便在打开游标时锁定游标结果集合在表中对应数据行的所有列和部分列。
400 为了对正在处理(查询)的行不被另外的用户改动，ORACLE 提供一个 FOR UPDATE 子句来对所选择的行进行锁住。该需求迫使ORACLE锁定游标结果集合的行，可以防止其他事务处理更新或删除相同的行，直到您的事务处理提交或回退为止。
401 语法：
402
403 SELECT column_list FROM table_list FOR UPDATE [OF column[, column]…] [NOWAIT]
404
405 如果另一个会话已对活动集中的行加了锁，那么SELECT FOR UPDATE操作一直等待到其它的会话释放这些锁后才继续自己的操作，对于这种情况，当加上NOWAIT子句时，如果这些行真的被另一个会话锁定，则OPEN立即返回并给出：
406 ORA-0054 ：resource busy and acquire with nowait specified.
407
408 如果使用 FOR UPDATE 声明游标，则可在DELETE和UPDATE 语句中使用
409 WHERE CURRENT OF cursor_name子句，修改或删除游标结果集合当前行对应的数据库表中的数据行。
410
411 例13：从EMPLOYEES表中查询某部门的员工情况，将其工资最低定为 1500；
412
413 复制代码
414 DECLARE
415 V_deptno employees.department_id%TYPE :=&p_deptno;
416 CURSOR emp_cursor
417 IS
418 SELECT employees.employee_id, employees.salary
419 FROM employees WHERE employees.department_id=v_deptno
420 FOR UPDATE NOWAIT;
421 BEGIN
422 FOR emp_record IN emp_cursor LOOP
423 IF emp_record.salary < 1500 THEN
424 UPDATE employees SET salary=1500
425 WHERE CURRENT OF emp_cursor;
426 END IF;
427 END LOOP;
428 -- COMMIT;
429 END;
430 复制代码
431
432 例14：将EMPLOYEES表中部门编码为90、岗位为AD_VP的雇员的工资都更新为2000元；
433
434 复制代码
435 DECLARE
436 v_emp_record employees%ROWTYPE;
437 CURSOR c1
438 IS
439 SELECT * FROM employees FOR UPDATE;
440 BEGIN
441 OPEN c1;
442 LOOP
443 FETCH c1 INTO v_emp_record;
444 EXIT WHEN c1%NOTFOUND;
445 IF v_emp_record.department_id = 90 AND
446 v_emp_record.job_id = 'AD_VP'
447 THEN
448 UPDATE employees SET salary = 20000
449 WHERE CURRENT OF c1; --更新当前游标行对应的数据行
450 END IF;
451 END LOOP;
452 COMMIT; --提交已经修改的数据
453 CLOSE c1;
454 END;
455 复制代码
456 4.2 游标变量
457
458 与游标一样，游标变量也是一个指向多行查询结果集合中当前数据行的指针。但与游标不同的是，游标变量是动态的，而游标是静态的。游标只能与指定的查询相连，即固定指向一个查询的内存处理区域，而游标变量则可与不同的查询语句相连，它可以指向不同查询语句的内存处理区域（但不能同时指向多个内存处理区域，在某一时刻只能与一个查询语句相连），只要这些查询语句的返回类型兼容即可。
459
460 4.2.1 声明游标变量
461
462
463 游标变量为一个指针，它属于参照类型，所以在声明游标变量类型之前必须先定义游标变量类型。在PL/SQL中，可以在块、子程序和包的声明区域内定义游标变量类型。
464 语法格式为：
465
466 TYPE ref_type_name IS REF CURSOR
467 [ RETURN return_type];
468
469 其中：ref_type_name为新定义的游标变量类型名称；
470 return_type 为游标变量的返回值类型，它必须为记录变量。
471
472 在定义游标变量类型时，可以采用强类型定义和弱类型定义两种。强类型定义必须指定游标变量的返回值类型，而弱类型定义则不说明返回值类型。
473 声明一个游标变量的两个步骤：
474 步骤一：定义一个REF CURSOU数据类型，如：
475 TYPE ref_cursor_type IS REF CURSOR;
476 步骤二：声明一个该数据类型的游标变量，如：
477 cv_ref REF_CURSOR_TYPE;
478
479 例：创建两个强类型定义游标变量和一个弱类型游标变量：
480
481 复制代码
482 DECLARE
483 TYPE deptrecord IS RECORD(
484 Deptno departments.department_id%TYPE,
485 Dname departments.department_name%TYPE,
486 Loc departments.location_id%TYPE
487 );
488 TYPE deptcurtype IS REF CURSOR RETURN departments%ROWTYPE;
489 TYPE deptcurtyp1 IS REF CURSOR RETURN deptrecord;
490 TYPE curtype IS REF CURSOR;
491 Dept_c1 deptcurtype;
492 Dept_c2 deptcurtyp1;
493 Cv curtype;
494 复制代码
495
496 4.2.2 游标变量操作
497 与游标一样，游标变量操作也包括打开、提取和关闭三个步骤。
498 1． 打开游标变量
499 打开游标变量时使用的是OPEN…FOR 语句。格式为：
500
501 OPEN {cursor_variable_name | :host_cursor_variable_name}
502 FOR select_statement;
503
504 其中：cursor_variable_name为游标变量，host_cursor_variable_name为PL/SQL主机环境（如OCI: ORACLE Call Interface，Pro*c 程序等）中声明的游标变量。
505 OPEN…FOR 语句可以在关闭当前的游标变量之前重新打开游标变量，而不会导致CURSOR_ALREAD_OPEN异常错误。新打开游标变量时，前一个查询的内存处理区将被释放。
506
507 2． 提取游标变量数据
508 使用FETCH语句提取游标变量结果集合中的数据。格式为：
509
510
511 FETCH {cursor_variable_name | :host_cursor_variable_name}
512 INTO {variable [, variable]…| record_variable};
513
514 其中：cursor_variable_name和host_cursor_variable_name分别为游标变量和宿主游标变量名称；variable和record_variable分别为普通变量和记录变量名称。
515
516 3． 关闭游标变量
517 CLOSE语句关闭游标变量，格式为：
518
519
520 CLOSE {cursor_variable_name | :host_cursor_variable_name}
521
522 其中：cursor_variable_name和host_cursor_variable_name分别为游标变量和宿主游标变量名称，如果应用程序试图关闭一个未打开的游标变量，则将导致INVALID_CURSOR异常错误。
523
524 例15：强类型参照游标变量类型
525
526 复制代码
527 DECLARE
528 TYPE emp_job_rec IS RECORD(
529 Employee_id employees.employee_id%TYPE,
530 Employee_name employees.first_name%TYPE,
531 Job_title employees.job_id%TYPE
532 );
533 TYPE emp_job_refcur_type IS REF CURSOR RETURN emp_job_rec;
534 Emp_refcur emp_job_refcur_type ;
535 Emp_job emp_job_rec;
536 BEGIN
537 OPEN emp_refcur FOR
538 SELECT employees.employee_id, employees.first_name||employees.last_name, employees.job_id
539 FROM employees
540 ORDER BY employees.department_id;
541
542 FETCH emp_refcur INTO emp_job;
543 WHILE emp_refcur%FOUND LOOP
544 DBMS_OUTPUT.PUT_LINE(emp_job.employee_id||': '||emp_job.employee_name||' is a '||emp_job.job_title);
545 FETCH emp_refcur INTO emp_job;
546 END LOOP;
547 END;
548 复制代码
549
550 例16：弱类型参照游标变量类型
551
552
553 复制代码
554 PROMPT
555 PROMPT 'What table would you like to see?'
556 ACCEPT tab PROMPT '(D)epartment, or (E)mployees:'
557
558 DECLARE
559 Type refcur_t IS REF CURSOR;
560 Refcur refcur_t;
561 TYPE sample_rec_type IS RECORD (
562 Id number,
563 Description VARCHAR2 (30)
564 );
565 sample sample_rec_type;
566 selection varchar2(1) := UPPER (SUBSTR ('&tab', 1, 1));
567 BEGIN
568 IF selection='D' THEN
569 OPEN refcur FOR
570 SELECT departments.department_id, departments.department_name FROM departments;
571 DBMS_OUTPUT.PUT_LINE('Department data');
572 ELSIF selection='E' THEN
573 OPEN refcur FOR
574 SELECT employees.employee_id, employees.first_name||' is a '||employees.job_id FROM employees;
575 DBMS_OUTPUT.PUT_LINE('Employee data');
576 ELSE
577 DBMS_OUTPUT.PUT_LINE('Please enter ''D'' or ''E''');
578 RETURN;
579 END IF;
580 DBMS_OUTPUT.PUT_LINE('----------------------');
581 FETCH refcur INTO sample;
582 WHILE refcur%FOUND LOOP
583 DBMS_OUTPUT.PUT_LINE(sample.id||': '||sample.description);
584 FETCH refcur INTO sample;
585 END LOOP;
586 CLOSE refcur;
587 END;
588 复制代码
589
590 例17：使用游标变量（没有RETURN子句）
591
592 复制代码
593 DECLARE
594 --定义一个游标数据类型
595 TYPE emp_cursor_type IS REF CURSOR;
596 --声明一个游标变量
597 c1 EMP_CURSOR_TYPE;
598 --声明两个记录变量
599 v_emp_record employees%ROWTYPE;
600 v_reg_record regions%ROWTYPE;
601
602 BEGIN
603 OPEN c1 FOR SELECT * FROM employees WHERE department_id = 20;
604 LOOP
605 FETCH c1 INTO v_emp_record;
606 EXIT WHEN c1%NOTFOUND;
607 DBMS_OUTPUT.PUT_LINE(v_emp_record.first_name||'的雇佣日期是'
608 ||v_emp_record.hire_date);
609 END LOOP;
610 --将同一个游标变量对应到另一个SELECT语句
611 OPEN c1 FOR SELECT * FROM regions WHERE region_id IN（1，2）;
612 LOOP
613 FETCH c1 INTO v_reg_record;
614 EXIT WHEN c1%NOTFOUND;
615 DBMS_OUTPUT.PUT_LINE(v_reg_record.region_id||'表示'
616 ||v_reg_record.region_name);
617 END LOOP;
618 CLOSE c1;
619 END;
620 复制代码
621
622 例18：使用游标变量（有RETURN子句）
623
624
625 复制代码
626 DECLARE
627 --定义一个与employees表中的这几个列相同的记录数据类型
628 TYPE emp_record_type IS RECORD(
629 f_name employees.first_name%TYPE,
630 h_date employees.hire_date%TYPE,
631 j_id employees.job_id%TYPE);
632 --声明一个该记录数据类型的记录变量
633 v_emp_record EMP_RECORD_TYPE;
634 --定义一个游标数据类型
635 TYPE emp_cursor_type IS REF CURSOR
636 RETURN EMP_RECORD_TYPE;
637 --声明一个游标变量
638 c1 EMP_CURSOR_TYPE;
639 BEGIN
640 OPEN c1 FOR SELECT first_name, hire_date, job_id
641 FROM employees WHERE department_id = 20;
642 LOOP
643 FETCH c1 INTO v_emp_record;
644 EXIT WHEN c1%NOTFOUND;
645 DBMS_OUTPUT.PUT_LINE('雇员名称：'||v_emp_record.f_name
646 ||' 雇佣日期：'||v_emp_record.h_date
647 ||' 岗位：'||v_emp_record.j_id);
648 END LOOP;
649 CLOSE c1;
650 END;
651 复制代码
内容总结
以上是互联网集市为您收集整理的小菜鸟之oracle游标全部内容，希望文章能够帮你解决小菜鸟之oracle游标所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。
内容备注
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。
内容手机端
扫描二维码推送至手机访问。
来源：【匿名】