Oracle系列：Cursor
1，什么是游标？
①从表中检索出结果集，从中每次指向一条记录进行交互的机制。
②关系数据库中的操作是在完整的行集合上执行的。
由 SELECT 语句返回的行集合包括满足该语句的 WHERE 子句所列条件的所有行。由该语句返回完整的行集合叫做结果集。
应用程序，尤其是互动和在线应用程序，把完整的结果集作为一个单元处理并不总是有效的。
这些应用程序需要一种机制来一次处理一行或连续的几行。而游标是对提供这一机制的结果集的扩展。
游标是通过游标库来实现的。游标库是常常作为数据库系统或数据访问 API 的一部分而得以实现的软件，
用来管理从数据源返回的数据的属性（结果集）。这些属性包括并发管理、在结果集中的位置、返回的行数，
以及是否能够在结果集中向前和/或向后移动（可滚动性）。
游标跟踪结果集中的位置，并允许对结果集逐行执行多个操作，在这个过程中可能返回至原始表，也可能不返回至原始表。
换句话说，游标从概念上讲基于数据库的表返回结果集。
由于它指示结果集中的当前位置 ，就像计算机屏幕上的光标指示当前位置一样，“游标”由此得名。
2，游标有什么作用？
①指定结果集中特定行的位置。
②基于当前的结果集位置检索一行或连续的几行。
③在结果集的当前位置修改行中的数据。
④对其他用户所做的数据更改定义不同的敏感性级别。
⑤可以以编程的方式访问数据库。
3，为什么避免使用游标？
①在创建游标时，最需要考虑的事情是，“是否有办法避免使用游标？”
因为游标的效率较差，如果游标操作的数据超过1万行，那么就应该改写；
如果使用了游标，就要尽量避免在游标循环中再进行表连接的操作。
4，Oracle游标的类型？
①静态游标：结果集已经确实（静态定义）的游标。分为隐式和显示游标。
⑴隐式游标：所有DML语句为隐式游标，通过隐式游标属性可以获取SQL语句信息。
⑵显示游标：用户显示声明的游标，即指定结果集。当查询返回结果超过一行时，就需要一个显式游标。
②REF游标：动态关联结果集的临时对象。
5，Oracle游标的状态有哪些，怎么使用游标属性？
①游标的状态是通过属性来表示。
%Found ：Fetch语句（获取记录）执行情况 True or False。
%NotFound : 最后一条记录是否提取出 True or False。
%ISOpen ： 游标是否打开True or False。
%RowCount ：游标当前提取的行数 。
②使用游标的属性。
例子：/* conn scott/tiger */
Begin
Update emp Set SAL = SAL + 0.1 Where JOB = 'CLERK';
If SQL%Found Then
DBMS_OUTPUT.PUT_LINE('已经更新！');
Else
DBMS_OUTPUT.PUT_LINE('更新失败！');
End If；
End；
6，如何使用显示游标,？如何遍历循环游标？
①使用显示游标
⑴声明游标：划分存储区域，注意此时并没有执行Select 语句。
CURSOR 游标名( 参数 列表) [返回值类型] IS Select 语句；
⑵打开游标：执行Select 语句，获得结果集存储到游标中，此时游标指向结果集头， 而不是第一条记录。
Open 游标名( 参数 列表);
⑶获取记录：移动游标取一条记录
Fetch 游标名 InTo 临时记录或属性类型变量；
⑷关闭游标：将游标放入缓冲池中，没有完全释放资源。可重新打开。
Close 游标名；
②遍历循环游标
⑴For 循环游标
循环游标隐式打开游标，自动滚动获取一条记录，并自动创建临时记录类型变量存储记录。处理完后自动关闭游标。
For 变量名 In 游标名
Loop
数据处理语句；
End Loop；
⑵Loop循环游标
。。。
Loop
Fatch 游标名 InTo 临时记录或属性类型变量；
Exit When 游标名%NotFound；
End Loop；
。。。
例子1：
/* conn scott/tiger */
Declare
Cursor myCur is select empno,ename,sal from emp;
vna varchar2(10);
vno number(4);
vsal number(7,2);
Begin
open myCur;
fetch myCur into vno,vna,vsal;
dbms_output.put_line(vno||' '||vna||' '||vsal);
close myCur;
End;
/
例子2：使用loop遍历游标。
/* conn scott/tiger */
Declare
Cursor myCur is select ename,job,sal,empno from emp;
varE myCur%rowType;
Begin
if myCur%isopen = false then
open myCur;
dbms_output.put_line('Opening...');
end if;
loop
fetch myCur into varE;
exit when myCur%notfound;
dbms_output.put_line(myCur%rowCount||' '||vare.empno||' '||vare.ename||' '||vare.sal);
end loop;
if myCur%isopen then
Close myCur;
dbms_output.put_line('Closing...');
end if;
End;
/
例子3：使用For循环遍历游标,
/* conn scott/tiger */
Declare
Cursor myCur is select * from emp;
Begin
for varA in myCur
loop
dbms_output.put_line(myCur%rowCount||' '||varA.empno||' '||varA.ename||' '||varA.sal);
end loop;
End;
/
7，怎样更新和删除显示游标中的记录？
①UPDATE或DELETE语句中的WHERE CURRENT OF子串专门处理要执行UPDATE或DELETE操作的表中取出的最近的数据。
要使用这个方法，在声明游标时必须使用FOR UPDATE子串，当对话使用FOR UPDATE子串打开一个游标时，
所有返回集中的数据行都将处于行级（ROW-LEVEL)独占式锁定，其他对象只能查询这些数据行，
不能进行UPDATE、DELETE或SELECT...FOR UPDATE操作。
在多表查询中，使用OF子句来锁定特定的表,如果忽略了OF子句，那么所有表中选择的数据行都将被锁定。
如果这些数据行已经被其他会话锁定，那么正常情况下ORACLE将等待，直到数据行解锁。
②使用更新或删除：
⑴声明更新或删除显示游标：
Cursor 游标名 IS SELECT 语句 For Update [ Of 更新列列名]；
Cursor 游标名 IS SELECT 语句 For Delete [ Of 更新列列名]；
⑵使用显示游标当前记录来更新或删除：
Update 表名 SET 更新语句 Where Current Of 游标名；
Delete From 表名 Where Current Of 游标名；
例子1:更新显示游标记录
/*conn scott/tiger*/
Declare
Cursor myCur is select job from emp for update;
vjob empa.job%type;
rsal empa.sal%type;
Begin
open myCur;
loop
fetch myCur into vjob;
exit when myCur%notFound;
case (vjob)
when 'ANALYST' then rsal := 0.1;
when 'CLERK' then rsal := 0.2;
when 'MANAGER' then rsal := 0.3;
else
rsal := 0.5;
end case;
update emp set sal = sal + rsal where current of myCur;
end loop;
End;
/
例子2：删除显示游标记录
/*conn scott/tiger
Crate table empa Select * from scott.emp;
*/
Declare
Cursor MyCursor Select JOB From empa For Update;
vSal emp.Sal%TYPE;
Begin
Loop
Fetch MyCursor InTo vSal;
Exit When MyCursor%NotFound;
If vSal < 800 Then
Delete From empa Where Cursor Of MyCursor;
End If;
End Loop;
End;/
8，什么是带参数的显示游标？
①与过程和函数相似，可以将参数传递给游标并在查询中使用。
参数只定义数据类型，没有大小(所有Oracle中的形参只定义数据类型，不指定大小)。
与过程不同的是，游标只能接受传递的值，而不能返回值。
可以给参数设定一个缺省值，当没有参数值传递给游标时，就使用缺省值。
游标中定义的参数只是一个占位符，在别处引用该参数不一定可靠。
②使用带参数的显示游标
⑴声明带参数的显示游标：
CURSOR 游标名 [(parameter[,parameter],...)] IS Select语句；;
参数形式：1，参数名 数据类型
2，参数名 数据类型 DEFAULT 默认值
例子：
/*conn scott/tiger
Crate table empa Select * from scott.emp;
*/
Declare
Cursor MyCursor(pSal Number Default 800) Select JOB From empa Where SAL > pSal ;
varA MyCursor%ROWTYPE;
Begin
Loop
Fetch MyCursor InTo varA;
Exit When MyCursor%NotFound;
DBMS_OUTPUT.PUT_LINE(MyCursor%RowCount||' '||varA.empno||' '||varA.ename||' '||varA.sal);
End Loop;
End;/
思考：
怎样将游标作为参数传递？
CREATE OR REPLACE procedure（
v_id in table.id%TYPE,
v_name in table.name%TYPE）
is
cursor v_cursor is
SELECT ID, NAME FROM TABLE WHERE ID=v_id AND NAME =v_name;
v1 table%rowtype;
r1 varchar2(100);
begin
OPEN v_cursor;
LOOP
fetch v_cursor into v1;
IF v_cursor%found THEN
IF v1.NAME IS NOT NULL THEN
r1 := '+r1';
END IF;
update table set name = name + r1 where current of v_cursor;
END IF;
END LOOP;
close v_cursor;
END;
我改了下，跑跑试试