oracle利用中游標取資料庫的結果集應用例項(轉)

在oracle利用遊標取資料庫的結果集應用例項[@more@]

SQL> create table test2(s1 varchar(10),s2 varchar2(10));
表已建立。
SQL> insert into test2 values('11','111');
已建立 1 行。
SQL> insert into test2 values('22','222');
已建立 1 行。
SQL> CREATE OR REPLACE PACKAGE test222 AS
2 TYPE t_cursor IS REF CURSOR;
3 procedure p_test1( p_dd in out t_cursor);
4 end;
5 /

程式包已建立。
SQL> CREATE OR REPLACE package body test222 AS
2 procedure p_test1(
3 p_dd in out t_cursor)
4 is
5 begin
6 open p_dd for select * from test2;
7 end;
8 end;
9 /
程式包主體已建立。
SQL> var ss refcursor
SQL> exec test222.p_test1(:ss);
PL/SQL 過程已成功完成。
SQL> print ss
S1 S2
--------- ----------
11 111
22 222