Oracle 之 REF Cursor

最新推荐文章于 2022-04-08 15:38:42 发布

citao9160

最新推荐文章于 2022-04-08 15:38:42 发布

阅读量176

点赞数

文章标签：数据库

本文详细介绍了Oracle中的REF游标概念，包括REF游标的定义、作用、类型及其使用方法，并通过实例展示了如何创建和使用REF游标，以及如何将REF游标作为参数进行传递。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1，什么是 REF游标？
动态关联结果集的临时对象。即在运行的时候动态决定执行查询。

2，REF 游标有什么作用？
实现在程序间传递结果集的功能，利用REF CURSOR也可以实现BULK SQL，从而提高SQL性能。

3，静态游标和REF 游标的区别是什么？
①静态游标是静态定义，REF 游标是动态关联；
②使用REF 游标需REF 游标变量。
③REF 游标能做为参数进行传递，而静态游标是不可能的。

4，什么是REF 游标变量？
REF游标变量是一种引用 REF游标类型的变量，指向动态关联的结果集。

5，怎么使用 REF游标？
①声明REF 游标类型，确定REF 游标类型；
      ⑴强类型REF游标：指定retrun type，REF 游标变量的类型必须和return type一致。
         语法：Type   REF游标名   IS   Ref Cursor Return 结果集返回记录类型；
      ⑵弱类型REF游标：不指定return type，能和任何类型的CURSOR变量匹配，用于获取任何结果集。
         语法：Type   REF游标名   IS   Ref Cursor；

②声明Ref 游标类型变量；
语法：变量名已声明Ref 游标类型；

③打开REF游标，关联结果集；
语法：Open   Ref 游标类型变量   For   查询语句返回结果集；

④获取记录，操作记录；
语法：Fatch    REF游标名 InTo   临时记录类型变量或属性类型变量列表；

⑤关闭游标，完全释放资源；
语法：Close   REF游标名；

DECLARE
   TYPE empcurtyp IS REF CURSOR RETURN employees%ROWTYPE;   -- 强类型
   TYPE genericcurtyp IS REF CURSOR;                                          -- 弱类型
   cursor1 empcurtyp;
   cursor2 genericcurtyp;
   my_cursor SYS_REFCURSOR;                                                       -- 使用预定义游标变量sys_refcursor
   TYPE deptcurtyp IS REF CURSOR RETURN departments%ROWTYPE;
   dept_cv deptcurtyp;                                                                    -- 声明游标变量

返回record类型：

   DECLARE
   TYPE EmpRecTyp IS RECORD (
   employee_id NUMBER,
   last_name VARCHAR2(25),
   salary NUMBER(8,2));
   TYPE EmpCurTyp IS REF CURSOR RETURN EmpRecTyp;
   emp_cv EmpCurTyp;

例子：强类型REF游标

Declare
Type MyRefCurA IS REF CURSOR RETURN emp%RowType;
Type MyRefCurB IS REF CURSOR RETURN emp.ename%Type;
vRefCurA MyRefCurA;
vRefCurB MyRefCurB;
vTempA vRefCurA%RowType;
vTempB vRefCurB.ename%Type;

Begin
Open vRefCurA For Select * from emp Where SAL > 2000;
Loop
Fatch vRefCurA InTo vTempA;
Exit When vRefCurA%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurA%RowCount||' '|| vTempA.eno||' '||vTempA.ename ||' '||vTempA.sal)
End Loop;
Close vRefCurA;

DBMS_OUTPUT.PUT_LINE('----------------------------------------------------------');

Open vRefCurB For Select ename from emp Where SAL > 2000;
Loop
Fatch vRefCurB InTo vTempB;
Exit When vRefCurB%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurB%RowCount||' '||vTempB)
End Loop;
Close vRefCurB;

DBMS_OUTPUT.PUT_LINE('----------------------------------------------------------');

Open vRefCurA For Select * from emp Where JOB = 'CLERK';
Loop
Fatch vRefCurA InTo vTempA;
Exit When vRefCurA%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurA%RowCount||' '|| vTempA.eno||' '||vTempA.ename ||' '||vTempA.sal)
End Loop;
Close vRefCurA;
End;

例子：弱类型REF游标

Declare
Type MyRefCur IS Ref Cursor;
vRefCur MyRefCur;
vtemp vRefCur%RowType;
Begin
Case(&n)
When 1 Then Open vRefCur For Select * from emp;
When 2 Then Open vRefCur For Select * from dept;
Else
Open vRefCur For Select eno, ename from emp Where JOB = 'CLERK';
End Case;
Close vRefCur;
End;

6，怎样让REF游标作为参数传递？

Declare
Type MyRefCurA IS REF CURSOR ;
vRefCurA MyRefCurA;
vRefCurB MyRefCurA;
vTempA emp%RowType;
vTempB emp.ename%Type;

Begin
Open vRefCurA For Select * from emp Where SAL > 2000;
Loop
Fetch vRefCurA InTo vTempA;
Exit When vRefCurA%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurA%RowCount||' '|| vTempA.empno||' '||vTempA.ename ||' '||vTempA.sal);
End Loop;
Close vRefCurA;

DBMS_OUTPUT.PUT_LINE('--------------------------------------');

Open vRefCurB For Select ename from emp Where SAL > 2000;
Loop
Fetch vRefCurB InTo vTempB;
Exit When vRefCurB%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurB%RowCount||' '||vTempB);
End Loop;
Close vRefCurB;

DBMS_OUTPUT.PUT_LINE('---------------------------------------');

Open vRefCurA For Select * from emp Where JOB = 'CLERK';
Loop
Fetch vRefCurA InTo vTempA;
Exit When vRefCurA%NotFound;
DBMS_OUTPUT.PUT_LINE(vRefCurA%RowCount||' '|| vTempA.empno||' '||vTempA.ename ||' '||vTempA.sal);
End Loop;
Close vRefCurA;
End;