PL/SQL -->隐式游标(SQL%FOUND)

超、凢脫俗 2022-05-15 03:25 241阅读 0赞

\--===============================

\-- PL/SQL -->隐式游标(SQL%FOUND)

\--===============================

在PL/SQL中，游标的使用分为两种，一种是显示游标，一种是隐式游标，显示游标的使用需要事先使用declare来进行声明，其过程包括

声明游标，打开游标，从游标提取数据，关闭游标。该方式多用于处理select语句返回的多行数据的情形。而隐式游标则由则由系统自动定义

，当DML被使用时，Oracle为每一个不属于显示游标的DML语句都创建一个隐式游标，其声明、打开、关闭都是系统自动进行。多用于配合DML

返回单行数据的处理。

有关显示游标的使用，请参考：[PL/SQL --> 游标][PL_SQL --_]

一、隐式游标的定义及其属性

定义

隐式游标则由则由系统自动定义，非显示定义游标的DML语句即被赋予隐式游标属性。其过程由oracle控制，完全自动化。隐式游标

的名称是SQL，不能对SQL游标显式地执行OPEN,FETCH,CLOSE语句。

属性

类似于显示游标，隐式游标同样具有四种属性，只不过隐式游标以SQL%开头，而显示游标以Cursor\_name%开头

通过SQL%总是只能访问前一个DML操作或单行SELECT操作的游标属性，用于判断DML执行的状态和结果，进而控制程序的流程

SQL%ISOPEN

游标是否打开。当执行selectinto ,insert update,delete时，Oracle会隐含地打开游标，且在该语句执行完毕或隐含地关闭

游标，因为是隐式游标，故SQL%ISOPEN总是false

SQL%FOUND

判断SQL语句是否成功执行。当有作用行时则成功执行为true，否则为false。

SQL%NOTFOUND

判断SQL语句是否成功执行。当有作用行时否其值为false，否则其值为true。

SQL%ROWCOUNT

在执行任何DML语句之前，SQL%ROWCOUNT的值都是NULL,对于SELECTINTO语句，如果执行成功，SQL%ROWCOUNT的值为,如果没有

成功，SQL%ROWCOUNT的值为，同时产生一个异常NO\_DATA\_FOUND。

二、演示

1.SQL%FOUND的使用

DECLARE

v\_empno emp.empno%TYPE:=&no;

BEGIN

UPDATE emp SET sal=sal\+200 \--根据给定的empno，更新一条记录

WHERE empno=v\_empno;

IF SQL%FOUND THEN \--使用SQL游标属性SQL%FOUND作为判断条件

COMMIT;

DBMS\_OUTPUT.PUT\_LINE('SQL code is executed successful');

ELSE

DBMS\_OUTPUT.PUT\_LINE('The Employee is not exist');

ROLLBACK;

END IF;

END;

Enter value for no: 7788

old 2: v\_empno emp.empno%TYPE:=&no;

new 2: v\_empno emp.empno%TYPE:=7788;

SQL code is executed successful

PL/SQL procedure successfully completed

2.SQL游标的综合应用(根据SQL游标的不同属性返回不同的结果)

DECLARE

v\_dept emp.deptno%TYPE := &no;

BEGIN

IF SQL%ROWCOUNT >= 0 THEN \--判断更新前SQL%ROWCOUNT的属性

DBMS\_OUTPUT.PUT\_LINE('SQL%ROWCOUNT value is ' || SQL%ROWCOUNT ||

'before updated');

ELSE

DBMS\_OUTPUT.PUT\_LINE('SQL%ROWCOUNT value is NULL before updated');

END IF;

UPDATE emp SET sal = sal \+ 200 WHERE deptno = v\_dept;

IF SQL%FOUND THEN \--判断SQL%FOUND的属性

DBMS\_OUTPUT.PUT\_LINE('SQL code is executed successful');

DBMS\_OUTPUT.PUT\_LINE('SQL%Found is TRUE');

ELSE

DBMS\_OUTPUT.PUT\_LINE('No such department');

DBMS\_OUTPUT.PUT\_LINE('SQL%Found is FALSE');

END IF;

IF SQL%NOTFOUND THEN \--判断SQL%NOTFOUND的属性

DBMS\_OUTPUT.PUT\_LINE('SQL%NotFound is TRUE');

ELSE

DBMS\_OUTPUT.PUT\_LINE('SQL%NotFound is FALSE');

END IF;

IF SQL%ISOPEN THEN \--判断SQL%ISOPEN的属性

DBMS\_OUTPUT.PUT\_LINE('SQL%ISOPEN is TRUE');

ELSE

DBMS\_OUTPUT.PUT\_LINE('SQL%ISOPEN is FALSE');

END IF;

DBMS\_OUTPUT.PUT\_LINE('The rows updated is :' || SQL%ROWCOUNT ||

' rows by SQL Cursor'); \--判断SQL%ROWCOUNT的属性

END;

Enter value for no: 10 \--下面是成功更新后的结果

SQL%ROWCOUNT value is NULL before updated

SQL code is executed successful

SQL%Found is TRUE

SQL%NotFound is FALSE

SQL%ISOPEN is FALSE

The rows updated is :3 rows by SQL Cursor

Enter value for no: 80 \--下面是未成功更新后的结果

SQL%ROWCOUNT value is NULL before updated

No such department

SQL%Found is FALSE

SQL%NotFound is TRUE

SQL%ISOPEN is FALSE

The rows updated is :0 rows by SQL Cursor

3.SELECT INTO时，隐式游标的使用

SELECT INTO用于将单行结果集放置到变量之中。

SELECT INTO处理的结果包括两种种情况

查询结果返回单行，SELECTINTO被成功执行

查询结果没有返回行，PL/SQL将抛出no\_data\_found异常

查询结果返回多行，PL/SQL将抛出too\_many\_rows 异常

对于上述两种异常发生时，类似于普通异常处理，程序控制权转移到异常处理部分(如没有异常处理则程序中断)。对于异常被激后发

，SQL游标的四个属性在此将不可使用，如下面的例子：

DECLARE

v\_ename emp.ename%TYPE;

BEGIN

SELECT ename INTO v\_ename FROM emp WHERE empno=&no;

IF SQL%ROWCOUNT=0 OR SQL%NOTFOUND THEN

DBMS\_OUTPUT.PUT\_LINE('The record '||&no||' is not exist!');

ELSE

DBMS\_OUTPUT.PUT\_LINE('The name for record '||&no||' is '||v\_ename );

END IF;

EXCEPTION

WHEN NO\_DATA\_FOUND THEN

DBMS\_OUTPUT.PUT\_LINE('No data found for '||&no);

END;

Enter value for no:70

No data found for 70

Enter value for no:7788

The name for record 7788 is SCOTT

从上面的演示中可以看到，当selectinto没有返回行时，IF SQL%ROWCOUNT=0 OR SQL%NOTFOUND THEN语句并没有被执行。

使用下面改进过的代码来执行，即可以将SQL游标属性判断放置到EXCEPTION部分

DECLARE

v\_ename emp.ename%TYPE;

BEGIN

SELECT ename INTO v\_ename FROM emp WHERE empno=&no;

IF SQL%NOTFOUND THEN

DBMS\_OUTPUT.PUT\_LINE('The record '||&no||' is not exist!');

ELSE

DBMS\_OUTPUT.PUT\_LINE('The name for record '||&no||' is '||v\_ename );

END IF;

EXCEPTION

WHEN NO\_DATA\_FOUND THEN

IF SQL%NOTFOUND THEN

DBMS\_OUTPUT.PUT\_LINE('The record '||&no||' is not exist!');

DBMS\_OUTPUT.PUT\_LINE('No data found for '||&no);

ELSE

DBMS\_OUTPUT.PUT\_LINE('The name for record '||&no||' is '||v\_ename );

END IF;

END;

Enter value for no:80

The record 80 is not exist!

No data found for 80

更多关于隐式游标的探讨，请参考：[IMPLICIT CURSOR ATTRIBUTE SQL%NOTFOUND NOT WORKING ][IMPLICIT CURSOR ATTRIBUTE SQL_NOTFOUND NOT WORKING]

三、更多参考

有关SQL请参考

[SQL 基础--> 子查询][SQL _--_]

[SQL 基础-->多表查询][SQL _--]

[SQL基础-->分组与分组函数][SQL_--]

[SQL 基础-->常用函数][SQL _-- 1]

[SQL 基础--> ROLLUP与CUBE运算符实现数据汇总][SQL _--_ ROLLUP_CUBE]

[SQL基础-->层次化查询(START BY ... CONNECT BY PRIOR)][SQL_--_START BY ... CONNECT BY PRIOR]

有关PL/SQL请参考

[PL/SQL --> 语言基础][PL_SQL --_ 1]

[PL/SQL --> 流程控制][PL_SQL --_ 2]

[PL/SQL --> 存储过程][PL_SQL --_ 3]

[PL/SQL --> 函数][PL_SQL --_ 4]

[PL/SQL --> 游标][PL_SQL --_]

[PL/SQL -->隐式游标(SQL%FOUND)][PL_SQL --_SQL_FOUND]

[PL/SQL --> 异常处理(Exception)][PL_SQL --_ _Exception]

[PL/SQL --> PL/SQL记录][PL_SQL --_ PL_SQL]

[PL/SQL --> 包的创建与管理][PL_SQL --_ 5]

[PL/SQL --> 包重载、初始化][PL_SQL --_ 6]

[PL/SQL --> DBMS\_DDL包的使用][PL_SQL --_ DBMS_DDL]

[PL/SQL --> DML 触发器][PL_SQL --_ DML]

[PL/SQL --> INSTEAD OF 触发器][PL_SQL --_ INSTEAD OF]

[PL_SQL --_]: http://blog.csdn.net/robinson_0612/archive/2010/12/15/6078622.aspx
[IMPLICIT CURSOR ATTRIBUTE SQL_NOTFOUND NOT WORKING]: http://asktom.oracle.com/pls/asktom/f?p=100:11:2794460932872553::::P11_QUESTION_ID:7986513233505
[SQL _--_]: http://blog.csdn.net/robinson_0612/archive/2010/05/14/5592002.aspx
[SQL _--]: http://blog.csdn.net/robinson_0612/archive/2010/05/06/5563199.aspx
[SQL_--]: http://blog.csdn.net/robinson_0612/archive/2010/05/05/5559110.aspx
[SQL _-- 1]: http://blog.csdn.net/robinson_0612/archive/2010/04/16/5495170.aspx
[SQL _--_ ROLLUP_CUBE]: http://blog.csdn.net/robinson_0612/archive/2010/06/01/5640031.aspx
[SQL_--_START BY ... CONNECT BY PRIOR]: http://blog.csdn.net/robinson_0612/archive/2010/05/22/5616877.aspx
[PL_SQL --_ 1]: http://blog.csdn.net/robinson_0612/archive/2010/12/08/6063399.aspx
[PL_SQL --_ 2]: http://blog.csdn.net/robinson_0612/archive/2010/12/08/6063422.aspx
[PL_SQL --_ 3]: http://blog.csdn.net/robinson_0612/archive/2010/12/08/6063434.aspx
[PL_SQL --_ 4]: http://blog.csdn.net/robinson_0612/archive/2010/12/11/6069531.aspx
[PL_SQL --_SQL_FOUND]: http://blog.csdn.net/robinson_0612/archive/2010/12/22/6092066.aspx
[PL_SQL --_ _Exception]: http://blog.csdn.net/robinson_0612/archive/2010/12/16/6080119.aspx
[PL_SQL --_ PL_SQL]: http://blog.csdn.net/robinson_0612/archive/2010/12/18/6084390.aspx
[PL_SQL --_ 5]: http://blog.csdn.net/robinson_0612/archive/2010/12/18/6084475.aspx
[PL_SQL --_ 6]: http://blog.csdn.net/robinson_0612/archive/2010/12/22/6092097.aspx
[PL_SQL --_ DBMS_DDL]: http://blog.csdn.net/robinson_0612/archive/2010/12/25/6098248.aspx
[PL_SQL --_ DML]: http://blog.csdn.net/robinson_0612/archive/2010/12/25/6098258.aspx
[PL_SQL --_ INSTEAD OF]: http://blog.csdn.net/robinson_0612/archive/2010/12/25/6098263.aspx