pl/sql之cursor

游标的类型：

1，隐式游标：在 PL/SQL 程序中执行DML SQL 语句时自动创建隐式游标，名字固定叫sql。
2，显式游标：显式游标用于处理返回多行的查询。
3，REF 游标：REF 游标用于处理运行时才能确定的动态 SQL 查询的结果

---

在PL/SQL中使用DML语句时自动创建隐式游标;
隐式游标自动声明、打开和关闭，其名为 SQL;
通过检查隐式游标的属性可以获得最近执行的DML 语句的信息;
隐式游标的属性有：
%FOUND ：SQL 语句影响了一行或多行时为 TRUE;
%NOTFOUND ：SQL 语句没有影响任何行时为TRUE;
%ROWCOUNT ：SQL 语句影响的行数;
%ISOPEN ：游标是否打开，始终为FALSE;

SET SERVEROUTPUT ON
BEGIN
	UPDATE emp SET score = 270 WHERE emp_no = '207' ;

	IF SQL%FOUND THEN
		DBMS_OUTPUT.PUT_LINE('表已更新');
	END IF;
END;
/

–note:只有在 DML 语句影响一行或多行时,SQL%FOUND返回 true ;

SET SERVEROUTPUT ON
DECLARE
	v_TOYID TOYS.ID%type := '&TOYID';
	v_TOYNAME TOYS.NAME%Type := '&TOYNAME';
BEGIN
	UPDATE TOYS SET NAME = v_TOYNAME WHERE toyid=v_TOYID;

	IF SQL%NOTFOUND THEN
		DBMS_OUTPUT.PUT_LINE('编号未找到。');
	ELSE
		DBMS_OUTPUT.PUT_LINE('表已更新');
	END IF;
END;
/

–note:如果 DML 语句不影响任何行,SQL%NOTFOUND返回 true ;

SET SERVEROUTPUT ON
DECLARE 
	empid VARCHAR2(10);
	desig VARCHAR2(10);
BEGIN
	empid:= '&Employeeid';

	SELECT designation INTO desig FROM employee WHERE empno = empid;

	EXCEPTION WHEN NO_DATA_FOUND THEN DBMS_OUTPUT.PUT_LINE('职员未找到');
END;
/

–note: 如果没有匹配行,将引发 NO_DATA_FOUND 异常 ;

SET SERVEROUTPUT ON
DECLARE 
	empid VARCHAR2(10);
BEGIN
	SELECT empno INTO empid FROM employee;

	EXCEPTION
		WHEN TOO_MANY_ROWS 
		THEN DBMS_OUTPUT.PUT_LINE('该查询提取多行');
END;
/

–note: 若select into返回多个值,将引发TOO_MANY_ROWS异常

---

**显式游标在 PL/SQL 块的声明部分定义查询，该查询可以返回多行**

SET SERVEROUTPUT ON
DECLARE
	my_toy_price toys.toyprice%TYPE;
	--声明游标
	CURSOR toy_cur IS SELECT toyprice FROM toys WHERE toyprice < 250;
BEGIN
	--打开游标
	OPEN toy_cur;

	LOOP
		--提取行
		FETCH toy_cur INTO my_toy_price;
		EXIT WHEN toy_cur%NOTFOUND;
		DBMS_OUTPUT.PUT_LINE('玩具单价TOYPRICE = '||my_toy_price);
	END LOOP;
	--关闭游标
	CLOSE toy_cur;
END;

声明带参数的显式游标的语法：

CURSOR <cursor_name>(<param_name> <param_type>) IS select_statement;

-允许使用游标删除或更新活动集中的行,声明游标时必须使用 SELECT … FOR UPDATE语句;

--声明游标
CURSOR <cursor_name> IS SELECT statements FOR UPDATE;
--更新的语法
UPDATE <table_name> SET <set_clause> WHERE CURRENT OF <cursor_name>
--删除的语法
DELETE FROM <table_name> WHERE CURRENT OF <cursor_name>

-循环游标的语法:

FOR <record_index> IN <cursor_name>  LOOP
	<executable statements>
END LOOP;

例:

declare
	cursor my_cursor is select ename from emp where deptno=10;
	type ename_table_type is table of varchar2(10);
	ename_table ename_table_type;
begin
	open my_cursor; --打开游标

	fetch my_cursor bulk collect into ename_table;

	for i in 1 .. ename_table.count loop --
		dbms_output.put_line(ename_table(i));
	end loop;

	close my_cursor; --关闭游标
end;

例: 已建立表，如下：
create table student (xh number, xm varchar2(10));
insert into student values(1,‘A’);
insert into student values(2,‘B’);
insert into student values(3,‘C’);
insert into student values(4,‘D’);

create table address (xh number, zz varchar2(10));
insert into address values(2,‘郑州’);
insert into address values(1,‘开封’);
insert into address values(3,‘洛阳’);
insert into address values(4,‘新乡’);

完成的任务:给表student添加一列zz,是varchar2(10)类型；
再从address中，将zz字段的数值取出来，对应的插入到
student新增的zz列中。
即：得到的结果：student表中，是：
XH XM ZZ
– ---------- ------
1 A 开封
2 B 郑州
3 C 洛阳
4 D 新乡

---

REF 游标和游标变量用于处理运行时动态执行的 SQL 查询
创建游标变量需要两个步骤：
    1, 声明 REF 游标类型
    2, 声明 REF 游标类型的变量
用于声明 REF 游标类型的语法为：

TYPE <ref_cursor_name> IS REF CURSOR [RETURN <return_type>];

打开游标变量的语法如下：

 OPEN cursor_name FOR select_statement;

例: 已建立表，如下：

create table student (xh number, kc varchar2(10));
insert into student values(1,'语文');
insert into student values(1,'数学');
insert into student values(1,'英语');
insert into student values(1,'历史');
insert into student values(2,'语文');
insert into student values(2,'数学');
insert into student values(2,'英语');
insert into student values(3,'语文');
insert into student values(3,'英语');

完成的任务:
生成student2表(xh number, kc varchar2(50))；
对应于每一个学生，求出他的总的选课记录，把每个学生的选课记录插入到student2表中。
即，student2中的结果如下：
XH KC
— -------------------------------------------
1 语文数学英语历史
2 语文数学英语
3 语文英语