oracle数据库基础6--游标管理.ppt

第六章 游标管理 1 回顾 v PL/SQL 是一种可移植的高性能事务处理语言 v PL/SQL 引擎驻留在 Oracle 服务器中 v PL/SQL 块由声明部分、可执行部分和异常处理部分组 成 v PL/SQL 支持的数据类型包括标量数据类型、LOB 数据 类型和属性类型 v 控制结构包括条件控制、循环控制和顺序控制 v PL/SQL 支持动态 SQL v 运行时出现的错误叫做异常 v 异常可以分为预定义异常和用户定义的异常 2 目标 v掌握游标管理技巧 3 游标简介 2-1 Oracle 服务器 执行 PL/SQL 程序 内存单元 保存到游标中 一次处理一行 检索行 提取行 4 游标简介 2-2 v逐行处理查询结果，以编程的方式访问数据 v游标的类型： 隐式游标REF 游标显式游标 在 PL/SQL 程序中执行DML SQL 语句时自动创建隐式游标。 显式游标用于处理返回多行的查询。REF 游标用于处理运行时才能确定的动态 SQL 查询的结果 游标类型 5 隐式游标 4-1 v在PL/SQL中使用DML语句时自动创建隐式游标 v隐式游标自动声明、打开和关闭，其名为 SQL v通过检查隐式游标的属性可以获得最近执行的 DML 语句的信息 v隐式游标的属性有： %FOUND SQL 语句影响了一行或多行时 为 TRUE %NOTFOUND SQL 语句没有影响任何 行时为TRUE %ROWCOUNT SQL 语句影响的行数 %ISOPEN - 游标是否打开，始终为 FALSE 6 隐式游标 4-2 SQL SET SERVEROUTPUT ON SQL BEGIN UPDATE toys SET toyprice=270 WHERE toyid= P005; IF SQL%FOUND THEN DBMS_OUTPUT.PUT_LINE(表已更新); END IF; END; / 只有在 DML 语句影响一行 或多行时，才返回 True 7 隐式游标 4-3 SQL SET SERVEROUTPUT ON SQL DECLARE v_TOYID TOYS.ID%type := v_TOYNAME TOYS.NAME%Type := 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; / 如果 DML 语句不影响任何行，则返回 True 8 隐式游标 4-4 SQL SET SERVEROUTPUT ON SQL BEGIN UPDATE vendor_master SET venname= Rob Mathew WHERE vencode=V004; DBMS_OUTPUT.PUT_LINE (SQL%ROWCOUNT); END; / 返回 DML 语句影响的行数 9 SELECT INTO 语句 2-1 SQL SET SERVEROUTPUT ON SQL DECLARE empid VARCHAR2(10); desig VARCHAR2(10); BEGIN empid:= SELECT designation INTO desig FROM employee WHERE empno=empid; EXCEPTION WHEN NO_DATA_FOUND THEN DBMS_OUTPUT.PUT_LINE(职员未找到); END; / 如果没有与SELECT INTO语句中的条件匹配 的行，将引发NO_DATA_FOUND异常 10 SELECT INTO 语句 2-2 SQL SET SERVEROUTPUT ON SQL DECLARE empid VARCHAR2(10); BEGIN SELECT empno INTO empid FROM employee; EXCEPTION WHEN TOO_MANY_ROWS THEN DBMS_OUTPUT.PUT_LINE(该查询提取多行); END; / 如果 SELECT INTO 语句返回多个值， 将引发TOO_MANY_ROWS异常 11 显式游标 2-1 v 显式游标在 PL/SQL 块的声明部分定义查询，该查询 可以返回多行 v 显式游标的操作过程： 数据库 打开游标 30George3 44Roger2 45James1 Stud_mrksStud_namestud_no 提取行 变量 关闭游标 12 显式游标 2-2 SQLSET SERVER OUTPUT ON SQLDECLARE my_toy_price toys.toyprice%TYPE; CURSOR toy_cur IS SELECT toyprice FROM toys WHERE toyprice( ) IS select_statement; SQL SET SERVEROUTPUT ON SQL DECLARE desig VARCHAR2(20); emp_code VARCHAR2(5); empnm VARCHAR2(20); CURSOR emp_cur(desigparam VARCHAR2) IS SELECT empno, ename FROM employee WHERE designation=desig; BEGIN desig:= OPEN emp_cur(desig); LOOP FETCH emp_cur INTO emp_code,empnm; EXIT WHEN emp_cur%NOTFOUND; DBMS_OUTPUT.PUT_LINE(emp_code| |empnm); END LOOP; CLOSE emp_cur; END; 14 使用显式游标更新行 2-1 v允许使用游标删除或更新活动集中的行 v声明游标时必须使用 SELECT FOR UPDATE语句 CURSOR IS SELECT statement FOR UPDATE; UPDATE SET WHERE CURRENT OF 更新的语法DELETE FROM WHERE CURRENT OF 删除的语法 15 使用显式游标更新行 2-2 SQL SET SERVEROUTPUT ON SQL DECLARE new_price NUMBER; CURSOR cur_toy IS SELECT toyprice FROM toys WHERE toyprice IN LOOP END LOOP; 17 循环游标 2-2 SQL SET SERVER OUTPUT ON SQL DECLARE CURSOR mytoy_cur IS SELECT toyid, toyname, toyprice FROM toys; BEGIN FOR toy_rec IN mytoy_cur LOOP DBMS_OUTPUT.PUT_LINE( 玩具编号：| |toy_rec.toyid| |玩具名称：| |toy_rec.toyname| |玩具单价：| |toy_rec.toyprice); END LOOP; END; 18 REF 游标和游标变量 3-1 vREF 游标和游标变量用于处理运行时动态执行的 SQL 查询 v创建游标变量需要两个步骤： 声明 REF 游标类型 声明 REF 游标类型的变量 v用于声明 REF 游标类型的语法为： TYPE IS REF CURSOR RETURN ; 19 REF 游标和游标变量 3-2 TYPE my_curtype IS REF CURSOR RETURN stud_det%ROWTYPE; order_cur my_curtype; 声明强类型的 REF 游标 v打开游标变量的语法如下： OPEN cursor_name FOR select_statement; TYPE my_ctype IS REF CURSOR; stud_cur my_ctype; 声明弱类型的 REF 游标 20 REF 游标和游标变量 3-3 SQL DECLARE TYPE toys_curtype IS REF CURSOR RETURN toys%ROWTYPE; toys_curvar toys_curtype; toys_rec toys%ROWTYPE; BEGIN OPEN toys_curvar FOR SELECT * FROM toys; FETCH toys_curvar INTO toys_rec; . CLOSE toys_curvar; END; 声明REF游标类型 声明游标变量 21 游标变量的优点和限制 v游标变量的功能强大，可以简化数据处理。 v游标变量的优点有： 可从不同的 SELECT 语句中提取结果集 可以作为过程的参数进行传递 可以引用游标的所有属性 可以进行赋值运算 v使用游标变量的限制： 不能在程序包中声明游标变量 FOR UPDATE子句不能与游标变量一起使 用 不能使用比较运算符22 使用游标变量执行动态 SQL v可以使用游标变量执行动态构造的 SQL 语句 v打开执行动态 SQL 的游标变量的语如下： OPEN cursor_name FOR dynamic_sqlstring USING bind_argument_list; DECLARE r_emp emp%ROWTYPE; TYPE c_type IS REF CURSOR; cur c_type; p_salary NUMBER; BEGIN p_salary := 2500; OPEN cur FOR select * from emp where sal:1 order by sal desc USING p_salary; DBMS_OUTPUT.PUT_LINE(薪水大于| p_salary |的员工有：); LOOP FETCH cur INTO r_emp; EXIT WHEN cur%NOTFOUND; DBMS_OUTPUT.PUT_LINE(编号：| r_emp.empno | 姓名：