Oracle PL/SQL中游标和游标变量的使用

游标是什么：

游标字面理解就是游动的光标。

用数据库语言来描述：游标是映射在结果集中一行数据上的位置实体，有了游标用户就可以访问结果集中的任意一行数据了，将游标放置到某行后，即可对该行数据进行操作，例如提取当前行的数据等等。

在Oracle9i之前，使用FETCH语句每次只能提取一行数据；从Oracle9i开始，通过使用FETCH…BULK COLLECT INTO语句，每次可以提取多行数据。语法如下：
(1) FETCH cursor_name INTO variable1,variable2,…；
此方法必须要使用循环语句处理结果集的所有数据。
(2) FETCH cursor_name BULK COLLECT INTO collect1,collect2,…[LIMIT rows]
     [LIMIT rows]可用来限制每次游标每次提取的行数。

游标的分类： 显式游标和隐式游标

(1)显示游标的使用：

    1.声明游标

CURSOR mycur(vartype number) is

select emp_no,emp_zc from cus_emp_basic

where com_no = vartype;

    2.打开游标

　open mycur(000627) 注：000627:参数

    3.读取数据

　　　fetch mycur into varno,varprice;

    4.关闭游标

　　　close mycur;

 

游标的属性

    oracle 游标有4个属性： %ISOPEN ， %FOUND ， %NOTFOUND， %ROWCOUNT

    %ISOPEN 判断游标是否被打开，如果打开%ISOPEN 等于true,否则等于false

    %FOUND %NOTFOUND 判断游标所在的行是否有效，如果有效，则%FOUNDD等于true，否则等于false

    %ROWCOUNT 返回当前位置为止游标读取的记录行数。

    示例：

set serveroutput on;

declare

varno varchar2(20);

varprice varchar2(20);

 

CURSOR mycur(vartype number) is

select emp_no,emp_zc from cus_emp_basic

where com_no = vartype;

begin

 

if mycur%isopen = false then

 

open mycur(000627);

end if;

fetch mycur into varno,varprice;

while mycur%found

loop

dbms_output.put_line(varno||','||varprice);

if mycur%rowcount=2 then

exit;

end if;

fetch mycur into varno,varprice;

end loop;

close mycur;

end;

 

(2)基于游标定义记录变量
使用%ROWTYPE属性不紧可以基于表和视图定义记录变量，也可以基于游标定义记录变量。当基于游标定义记录变量时，记录成员名实际就是SELECT语句的列名和列别名。为了简化显示游标的数据处理，建議开发人员使用记录变量存放游标数据。
For example:
DECLARE
   CURSOR emp_cursor IS SELECT ename,sal FROM emp；
   emp_reocrd emp_cursor%ROWTYPE；
BEGIN
   OPEN emp_cursor；
   LOOP
      FETCH emp_cursor INTO emp_record；
      EXIT WHEN emp_record%NOTFOUND；
      dbms_ouput.put_line(‘雇员名:’||emp_record.ename||’,雇员工资:’||emp_record.sal)；
   END LOOP；
   CLOSE emp_cursor；
END；

 

(3)隐式游标的使用：

如果在pl/sql程序中使用了select语句进行操作，pl/sql会隐含处理游标定义，即称做隐式游标。这种游标不需要声明、打开和关闭。

例：

Create or replace procedure cx_xm

(in_xh in char,out_num out char)

As

Begin

       Select xm into out_xm from xs where xh=in_xh;   /*隐式游标必须使用into*/

    Dbms_output.put_line(out_xm);

End

使用隐式游标时要注意以下几点：

A、每一个隐式游标必须有一个into;

B、和显示游标一样，带有关键字into接收数据的变量时数据类型要与列表一致。

C、隐式游标一次只能返回移行数据。

 

典型游标for 循环

 

游标for循环和显示游标的一种快捷使用方式，它使用for循环依次读取结果集中的行数据，当for循环开始时，游标自动打开（不需要open）,每循环一次系统自动读取游标当前行的数据（不需要fetch)，当退出for循环时，游标被自动关闭（不需要使用close）使用游标for循环的时候不能使用open语句，fetch语句和close语句，否则会产生错误。

 

set serveroutput on;

declare

cursor mycur(vartype number)is

select emp_no,emp_zc from cus_emp_basic

where com_no=vartype;

begin

for person in mycur(000627) loop

dbms_output.put_line('雇员编号:'||person.emp_no||',地址:'||person.emp_zc);

end loop;

end;

 

在游标FOR循环中使用查询

 

　　在游标FOR循环中可以定义查询，由于没有显式声明所以游标没有名字，记录名通过游标查询来定义。

DECALRE

　v_tot_salary EMP.SALARY%TYPE;

BEGIN

　FOR r_dept IN (SELECT deptno,dname FROM dept ORDER BY deptno) LOOP

　　DBMS_OUTPUT.PUT_LINE('Department:'|| r_dept.deptno||'-'||r_dept.dname);

　　v_tot_salary:=0;

　　FOR r_emp IN (SELECT ename,salary

　　　FROM emp

　　　WHERE deptno=p_dept

　　　ORDER BY ename) LOOP

　　DBMS_OUTPUT.PUT_LINE('Name:'|| v_ename||' salary:'||v_salary);

　　v_tot_salary:=v_tot_salary+v_salary;

　　END LOOP;

　　DBMS_OUTPUT.PUT_LINE('Toltal Salary for dept:'|| v_tot_salary);

　END LOOP;

END;

 

游标中的子查询

　　语法如下：

CURSOR C1 IS SELECT * FROM emp

WHERE deptno NOT IN (SELECT deptno

FROM dept

WHERE dname!='ACCOUNTING');

　　可以看出与SQL中的子查询没有什么区别。

 

游标中的更新和删除

　　在PL/SQL中依然可以使用UPDATE和DELETE语句更新或删除数据行。显式游标只有在需要获得多行数据的情况下使用。PL/SQL提供了仅仅使用游标就可以执行删除或更新记录的方法。

　　UPDATE或DELETE语句中的WHERE CURRENT OF子串专门处理要执行UPDATE或DELETE操作的表中取出的最近的数据。要使用这个方法，在声明游标时必须使用FOR UPDATE子串，当对话使用FOR UPDATE子串打开一个游标时，所有返回集中的数据行都将处于行级（ROW-LEVEL)独占式锁定，其他对象只能查询这些数据行，不能进行UPDATE、DELETE或SELECT...FOR UPDATE操作。

　　语法：

FOR UPDATE [OF [schema.]table.column[,[schema.]table.column]..

[nowait]

　　在多表查询中，使用OF子句来锁定特定的表,如果忽略了OF子句，那么所有表中选择的数据行都将被锁定。如果这些数据行已经被其他会话锁定，那么正常情况下ORACLE将等待，直到数据行解锁。

　　在UPDATE和DELETE中使用WHERE CURRENT OF子串的语法如下：

WHERE{CURRENT OF cursor_name|search_condition}

 

　　例：

DELCARE

CURSOR c1 IS SELECT empno,salary

FROM emp

WHERE comm IS NULL

FOR UPDATE OF comm;

v_comm NUMBER(10,2);

BEGIN

FOR r1 IN c1 LOOP

IF r1.salary<500 THEN

v_comm:=r1.salary*0.25;

　　ELSEIF r1.salary<1000 THEN

v_comm:=r1.salary*0.20;

　　ELSEIF r1.salary<3000 THEN

v_comm:=r1.salary*0.15;

ELSE

v_comm:=r1.salary*0.12;

END IF;

UPDATE emp;

SET comm=v_comm

WHERE CURRENT OF c1l;

END LOOP;

END

 

游标变量(REF CURSOR游标)：

l          强类型（限制）（Strong REF CURSOR），规定返回类型

l          弱类型（非限制）（Weak REF CURSOR），不规定返回类型，可以获取任何结果集。

 

与游标类似，游标变量指向多行查询的结果集的当前行。但是，游标与游标变量是不同的，就像常量和变量的关系一样。游标是静态的，游标变量是动态的，因为它不与特定的查询绑定在一起。

(1)、用法１：

declare
 type cur_tab is ref cursor;
 sqlcur cur_tab;
 v_T3100101 char(2);
 v_T3100102 char(10);
begin
 open sqlcur for select T3100101,T3100102 from T31001;
 loop
 fetch sqlcur into v_T3100101,v_T3100102;
 exit when sqlcur%notfound;
 dbms_output.put_line(v_T3100101||v_T3100102);
 end loop;
 close sqlcur;
end;

 

 

(２)、用法２：用于存储过程返回结果集

create or replace package selecttable
is
type cur_T31001 is ref cursor return T31001%rowtype;　　--注意，这里没有begin
end selecttable;

 

create or replace procedure T31001_select
(
cur out selecttable.cur_T31001       --参数类型定义为先前定义好的T31001
)
is
begin
　　open cur for
　　select * from T31001;
end T31001_select;

----------------------------------------------------------------------------------------------------------------------

通过从游标工作区中抽取出来的数据，可以对数据库中的数据进行操纵，包括修改与删除操作。

要想通过游标操纵数据库，在定义游标的时候，必须加上FOR UPDATE OF子句；

 　 　 　

而且在UPDATE或DELETE时，必须加上WHERE CURRENT OF子句，则游标所在行被更新或者删除。

 

一个FOR UPDATE子句将使所在行获得一个行级排他锁。

 

 

cursor 和 ref cursor的区别

从技术底层看，两者是相同的。普通plsql cursor在定义时是“静态”的。而Ref cursors可以动态打开。

 

例如下面例子：

Declare

type rc is ref cursor;

cursor c is select * from dual;

 

l_cursor rc;

begin

if ( to_char(sysdate,'dd') = 30 ) then

       open l_cursor for 'select * from emp';

elsif ( to_char(sysdate,'dd') = 29 ) then

       open l_cursor for select * from dept;

else

       open l_cursor for select * from dual;

end if;

open c;

end;

/
 

 

l          rc根据逻辑动态打开；而游标c定义好了只有就无法修改了。

l          ref cursor可以返回给客户端，cursor则不行。

l          cursor可以是全局的global ，ref cursor则必须定义在过程或函数中。

l          ref cursor可以在子程序间传递，cursor则不行。

l          cursor中定义的静态sql比ref cursor效率高，所以ref cursor通常用在：向客户端返回结果集。

评论

1 楼 鸟气凌人 2012-04-27  

最经正在看基础