Oracle存储过程返回游标 [转载]

有俩种方法:
一种是声明系统游标,一种是声明自定义游标,然后后面操作一样,参数类型为
in out 或out

SYS_REFCURSOR 型游标，该游标是Oracle 以预先定义的游标，可作出参数进行传递 
(1)声明个人系统游标.(推荐)
create or replace p_temp_procedure
(
    cur_arg out sys_refcursor;     --方法1
)
begin
    open cur_arg for select * from tablename;
end
调用
declare
    cur_calling sys_refcursor;
begin
    p_temp_procedure(cur_calling);  --这样这个游标就有值了
    for rec_next in cur_calling loop
     ....
    end loop;
end;

(2)在包头中申明一个游表类型,然后调用者申明一个这个类型的游标变量,传给返回游标的存储过程 ,存储过程out这个结果集,这种方法很麻烦.游标类型不能像索引表一样使用create or replace type方法来创建,所以只能在包中申明,并且需要使用/来执行,后面的存储过程才认这个游标类型.(不推荐,但是建议要知道并且要会这种方式,毕竟它有它存在的道理)
--定义全局变量
create or replace package pkg_package
as
    type type_cursor is ref cursor;
    type type_record is record
    (
        test01 varchar2(32),
        test02 varchar2(32),
        test03 varchar2(32)
    );
end;
/
--创建返回游标的存储过程
create or replace procedure p_temp_procedure
(
    cur_out_arg out pkg_package.type_cursor
)
is
begin
    open cur_out_arg for select * from test;
end;
/
--调用
declare
    cur_out_arg pkg_package.type_cursor;
    rec_arg pkg_package.type_record;
begin
    p_temp_procedure(cur_out_arg);
    fetch cur_out_arg into rec_arg;
    dbms_output.put_line(rec_arg.test01);
    dbms_output.put_line(rec_arg.test02);
    dbms_output.put_line(rec_arg.test03);
end;

PLSQL中显示Cursor、隐示Cursor、动态Ref Cursor区别
今天简单的总结一下PL/SQL中cursor(光标/游标)的用法。

相信不少做开发或维护的DBA在找工作的时候，遇到过类似的面视问题：请简单的描述一下光标的类型，说一下普通光标和REF光标之间的区别，以及什么时候该正确应用哪一个?　

这个题目，我着实难住了不少人，其实他们在具体开发的时候，也还是比较能够把握正确的光标的使用的，但就是说不出来，当然了，这与大家自身的沟流交通能力是有关系的。有的人不善于说，但做的却很好。扯的扯就走远了，最后唠叨一下：做技术这条路，能干不能说，或者说会干不会包装，路是走不"远"的。




一、显式cursor

显式是相对与隐式cursor而言的，就是有一个明确的声明的cursor。显式游标的声明类似如下（详细的语法参加plsql ref doc ）：

cursor cursor_name (parameter list) is select ...

游标从declare、open、fetch、close是一个完整的生命旅程。当然了一个这样的游标是可以被多次open进行使用的，显式cursor是静态cursor，她的作用域是全局的，但也必须明白，静态cursor也只有pl/sql代码才可以使用她。下面看一个简单的静态显式cursor的示例：

declare
          cursor get_gsmno_cur (p_nettype in varchar2) is
             select gsmno
                from gsm_resource
                where nettype=p_nettype and status='0';
           v_gsmno gsm_resource.gsmno%type;
        begin
           open get_gsmno_cur('139');
           loop
                fetch get_gsmno_cur into v_gsmno;
                exit when get_gsmno_cur%notfound;       
                dbms_output.put_line(v_gsmno);
           end loop;
           close emp_cur;
          
           open get_gsmno_cur('138');
           loop
                fetch get_gsmno_cur into v_gsmno;
                exit when get_gsmno_cur%notfound;       
   &nbs