您的位置:首页 > 数据库

PL/SQL游标使用详解

2013-12-23 00:01 204 查看
每当在PL/SQL中执行一个SQL语时,Oracle数据库都会为这个语句分一个上下文区域(Context Area)来处理所必需的信息,其中包括语句处理的行数,一个指向语句被分析以后的表示形式的指针以及查询的结果集。游标是指向上下文区域的句柄或指针,PL/SQL通过游标可以控制或处理上下文区域。如果按照游标是否绑定到一个专门的查询语句来划分,可以分为静态游标和动态游标。其中静态游标又分为:隐式游标和显示游标;动态游标分为:强类型和弱类型。

1.隐式游标

每当我们执行一个DML语句(包括INSERT,UPDATE,MERGE或者DELETE)或者SELECT INTO语句时,PL/SQL都会声明一个隐式游标并管理这个游标。这种游标之所以叫做隐式游标,是因为数据库自动执行游标相关操作,比如,打开,提取,关闭等。隐式游标又叫做SQL游标。

1.1隐式游标属性

隐式游标属性返回有关DDL语句和DML语句执行的信息,该游标属性值总是返回最近执行的SQL语句。执行打开的隐式游标的属性值是空的。隐式游标可用的属性如下:

隐式游标属性

名 字

说 明

SQL%FOUND

如果取到记录就返回TRUE,否者返回FLASE

SQL%NOTFOUND

如果没有取得记录就返回TRUE,否者返回FALSE

SQL%ROWCOUNT

返回从游标中取出的记录数

SQL%ISOPEN

由于隐式游标总是自动打开和关闭,因此这个属性中是FALSE

隐式游标属性总是返回最后一次执行的SQL语句的属性值,而不管这个SQL语句时在哪个代码块或者程序中执行的。

declare

v_empno emp.empno%type := 3792;

begin

update emp e set e.sal = 5000 where e.empno = v_empno;

if sql%notfound then

insert into emp

(empno, ename, hiredate, sal, deptno)

values

(v_empno, 'CHICLEWU', date '2011-07-08', 4000, 50);

end if;

end;



1.2使用隐式游标属性准则

当使用隐式游标属性是,需要考虑以下准则:

游标属性值总是返回最近执行的SQL语句,它可能是在不同的作用域(例如,在一个子块)。

在SELECT INTO语句中,%NOTFOUND属性是不生效的:

如果在SELECT INTO语句没有返回行,PL/SQL立即抛出一个预订的NO_DATA_FOUND异常,在检查%NOTFOUND之前中断控制流。

SELECT INTO语句调用聚合函数总是返回个值或者空值。%NOTFOUNT属性总是返回FALSE,因此检查它是没有必要的。

2.显示游标

当你需要精确地控制查询处理时,可以在任何PL/SQL块、子程序或者包的声明部分显示地声明一个游标。显示游标就是在代码的声明部分明确定义的SELECT语句,并同时指定一个名字。然后你可以通过三个语句来控制游标:OPEN、FETCH和CLOSE。首先,你需要使用OPEN语句初始化游标,标识结果集。然后,可以反复地执行FETCH语句直到所有行都被取出,或者使用BULK COLLECT语句一次性取出所有行。最后,只用CLOSE语句释放游标。

2.1声明显示游标

要使用显示游标,必须先在PL/SQL块或包的规范部分声明它。

CURSOR cursor_name

[ ( cursor_parameter_declaration [, cursor_parameter_declaration ]... )]

[ RETURN rowtype] IS select_statement ;

其中,cusor_name是显示游标的名字;cursor_parameter_declartion是显示游标的参数,是可选项;select_statement是显示游标指定的SELECT语句。



2.2打开显示游标

OPEN cursor_name

[ ( cursor_parameter_name [ [,] cursor_parameter_name ]... ) ] ;

其中,cusor_name是显示游标的名字;cursor_parameter_name是显示游标的参数,是可选项。如果游标声明时,指定了游标参数,则打开时一定要指定该参数。



2.3提取数据

每次只提取一行数据:

FETCH cursor_name

INTO [(variable_name [, variable_name ]... | record_name )];



一次提取多行数据:

FETCH cursor_name

BULK COLLECT INTO [(collection_name [,collection_name...])];



2.4关闭显示游标

CLOSE cursor_name;



2.5显示游标属性

每个显示游标和游标变量都有四个属性:%FOUND、%NOTFOUND、%ROWCOUNT和%ISOPEN。可以下面的语法使用这些属性:

cusor%attribute

其中,cursor就是我们声明的游标名字或者游标变量。

显示游标属性

名 字

说 明

cusor%FOUND

如果取到记录就返回TRUE,否者返回FLASE

cusor%NOTFOUND

如果没有取得记录就返回TRUE,否者返回FALSE

cusor%ROWCOUNT

返回当值从指定游标取得的记录数量

cusor%ISOPEN

如果游标时打开的则返回TRUE,否则返回FALE

2.6显示游标例子

2.6.1不带参数的显示游标

declare

cursor cur_emp is

select e.ename, e.sal from emp e where e.deptno = 10; --声明游标

v_ename emp.ename%type;

v_sal emp.sal%type;

begin

open cur_emp; --打开游标

--循环取出

loop

fetch cur_emp

into v_ename, v_sal; --提取记录

exit when cur_emp%notfound;

dbms_output.put_line(v_ename || '的工资是' || v_sal);

end loop;

close cur_emp; --关闭游标

end;



2.6.2带参数参数的显示游标

declare

cursor cur_emp(p_empno number) is

select e.ename, e.sal from emp e where e.empno = p_empno; --声明游标

v_empno emp.empno%type := 7788;

v_ename emp.ename%type;

v_sal emp.sal%type;

begin

open cur_emp(v_empno); --打开游标

--循环取出

loop

fetch cur_emp

into v_ename, v_sal; --提取记录

exit when cur_emp%notfound;

dbms_output.put_line(v_ename || '的工资是' || v_sal);

end loop;

close cur_emp; --关闭游标



end;



2.6.3一次取出所有记录

declare

cursor cur_emp is

select e.ename, e.sal from emp e where e.deptno = 10; --声明游标

type it_ename is table of emp.ename%type index by binary_integer;

type it_sal is table of emp.sal%type index by binary_integer;

vit_ename it_ename;

vit_sal it_sal;

begin

open cur_emp; --打开游标

fetch cur_emp bulk collect

into vit_ename, vit_sal; --一次性取出所有记录

close cur_emp; --关闭游标

for i in vit_ename.first .. vit_ename.last loop

dbms_output.put_line(vit_ename(i) || '的工资是' || vit_sal(i));

end loop;

end;



3.游标变量

游标变量是指向或者引用底层游标的变量。显示游标已经为结果集的工作区指定了名字,而游标变量只是指向这个工作区的引用。显示游标和隐式游标都绑定到一个专门的查询语句,而游标变量可以是任何一个查询语句,也可以是查询语句的字符串变量或者字面量。因为游标变量的查询语句可以是多个不相同的查询,因此这种游标称为动态游标。显示游标和隐式游标称为静态游标。

3.1声明REF CURSOR类型

TYPE cursor_type_name IS REF CURSOR [RETURN return_type];

其中,cursor_type_name是游标类型的名字;return_type是该游标类型返回的数据类型。

REF CURSOR类型可是强类型(带有return)或者是弱类型(不带return)。以下两种声明都是有效的声明:

TYPE rc_emp is REF CURSOR RETURN emp%rowtype; --强类型

TYPE rc_emp is REF CURSOR;--弱类型



3.2声明游标变量

cursor_variable_name cursor_type_name;

其中,cursor_variable_name是游标变量的名字;cursor_type_name是之前的REF CURSOR声明的游标类型的名字。



3.3打开游标变量

OPEN cursor_variable_name FOR select_statement;

其中,cursor_variable_name是游标变量的名字; select_statement可以是一个直接的SQL语句,也可以一个SELECT语句的字符串或者字面。如果select_statement是字符串或者字面量,可以包含绑定变量的占位符,并可以使用USING子句标识相应的占位符值。



3.4提取数据

每次只提取一行数据:

FETCH cursor_name

INTO [(variable_name [, variable_name ]... | record_name )];

一次提取多行数据:

FETCH cursor_name

BULK COLLECT INTO [(collection_name [,collection_name...])];

3.5关闭显示游标

CLOSE cursor_name;



3.6游标变量属性

游标变量属性与显示游标属性一样,参见2.5



3.7游标变量例子

3.7.1一次只取一行记录

declare

type rc_emp is ref cursor; --声明ref游标类型

vrc_emp rc_emp; --声明游标变量

v_ename emp.ename%type;

v_sal emp.sal%type;

begin

open vrc_emp for

select e.ename, e.sal from emp e where e.deptno = 10; --打开游标变量,并赋值。

loop

fetch vrc_emp

into v_ename, v_sal; --提取记录

exit when vrc_emp%notfound;

dbms_output.put_line(v_ename || '的工资是' || v_sal);

end loop;

close vrc_emp; ---关闭游标变量

end;



3.7.2一次取出所有行记录

declare

type it_ename is table of emp.ename%type index by binary_integer;

type it_sal is table of emp.sal%type index by binary_integer;

type rc_emp is ref cursor; --声明ref游标类型\

vrc_emp rc_emp; --声明游标变量

vit_ename it_ename;

vit_sal it_sal;

v_ename emp.ename%type;

v_sal emp.sal%type;

begin

open vrc_emp for

select e.ename, e.sal from emp e where e.deptno = 10; --打开游标变量,并赋值。

fetch vrc_emp bulk collect

into vit_ename, vit_sal; --一次性取出所有记录

close vrc_emp; --关闭游标

for i in vit_ename.first .. vit_ename.last loop

dbms_output.put_line(vit_ename(i) || '的工资是' || vit_sal(i));

end loop;

end;



3.7.3查询语句是字符串变量

declare

type rc_emp is ref cursor; --声明ref游标类型

vrc_emp rc_emp; --声明游标变量

v_ename emp.ename%type;

v_sal emp.sal%type;

v_deptno emp.deptno%type := 10;

v_sql clob;

begin

v_sql := 'select e.ename, e.sal from emp e where e.deptno = :deptno';

open vrc_emp for v_sql

using v_deptno; --打开游标变量,并赋值。

loop

fetch vrc_emp

into v_ename, v_sal; --提取记录

exit when vrc_emp%notfound;

dbms_output.put_line(v_ename || '的工资是' || v_sal);

end loop;

close vrc_emp; ---关闭游标变量

end;

4.游标表达式

游标表达式返回一个嵌套游标,使用CUSOR操作符表示。可以使用游标表达式从一个或者多个表中提取庞大的复杂的记录集。

可以在下面的场合使用游标表达式:

显示游标声明
REF CURSOR声明和REF CURSOR变量
动态SQL查询



游标表达式语法:

CURSOR (subquery)

当父游标提取数据时,嵌套游标就会隐式地打开。嵌套游标在以下这些时刻关闭:

用户显示地关闭嵌套游标
父游标再次执行
父游标关闭
父游标取消
从父游标提取数据时抛出了异常。嵌套游标会和父游标一起关闭

使用游标表达式,查询各个部门的名称、地址以及该部门下的员工:

declare

cursor cur_dept_emp is

select d.dname,

d.loc,

cursor (select * from emp e where e.deptno = d.deptno) nc_emp --嵌套游标

from dept d;

type rc_emp is ref cursor return emp%rowtype;

vrc_emp rc_emp;

vrt_emp emp%rowtype;

v_dname dept.dname%type;

v_loc dept.loc%type;

begin

open cur_dept_emp;

loop

fetch cur_dept_emp

into v_dname, v_loc, vrc_emp; --提取父游标数据,并自动打开嵌套游标

exit when cur_dept_emp%notfound;

dbms_output.put_line(v_loc || '的' || v_dname || '部门的员工信息:');

loop

fetch vrc_emp

into vrt_emp; --从嵌套游标提取数据

exit when vrc_emp%notfound;

dbms_output.put_line(vrt_emp.ename || '的工资' || vrt_emp.sal);

end loop;

dbms_output.put_line('');

end loop;

close cur_dept_emp; --关闭父游标,同时也关闭了嵌套游标

end;



5.游标FOR循环

游标FOR循环的迭代变量不需要事先声明。这是一个%ROWTYPE记录,其字段名称匹配查询的列名,而且只能存在于循环中。数据库自动打开、提取、关闭游标FOR循环。即使在循环中使用EXIT语句、GO语句或者抛出异常,数据库都会自动关闭该游标。游标FOR循环可以分为:隐式游标FOR循环和显示游标FOR循环。

5.1隐式游标FOR循环

begin

--隐式游标FOR循环

for vrc_emp in (select * from emp e where e.deptno = 10) loop

dbms_output.put_line(vrc_emp.ename || '的工资' || vrc_emp.sal);

end loop;

end;



5.2显示游标FOR循环

declare

cursor cur_emp is

select * from emp e where e.deptno = 10;

begin

--隐式游标FOR循环

for vrc_emp in cur_emp loop

dbms_output.put_line(vrc_emp.ename || '的工资' || vrc_emp.sal);

end loop;

end;



6.WHERE CURRENT OF语句

PL/SQL为游标的UPDATE和DELETE语句提供了WHERE CURRENT OF语句。当你声明一个在UPDATE或者DELETE语句的CURRENT OF子句引用的游标时,必须使用FOR UPDATE语句获取独立的行级锁。



要修改最新取出来的记录的列:

UPDATE table_name

SET set_clause

WHERE CURRENT OF cursor_name;



要删除最新取出的记录:

DELETE FORM table_name WHERE CURRENT OF cursor_name;



declare

cursor cur_emp is

select * from emp for update nowait;

vrt_emp emp%rowtype;

begin

open cur_emp;

loop

fetch cur_emp

into vrt_emp;

exit when cur_emp%notfound;

if vrt_emp.ename = 'SCOTT' then

update emp e set e.sal = 6000 where current of cur_emp; --注意current of 后面子游标,而不是记录

end if;

if vrt_emp.ename = 'CHICLEWU' then

delete from emp where current of cur_emp;

end if;

end loop;

end;
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: