Pl/sql代碼

CREATE OR REPLACE PACKAGE PAK_rstest

  IS

    TYPE   retcursor    IS   REF   CURSOR;

   PROCEDURE pro_read

     (

       outcurse  IN OUT retcursor

     );

   END; -- Package spec

     上面是建立了一個名稱為PAK_rstest的包頭，里面定義了一個CURSOR 類型，類型名為retcursor ，有了這個定義我們就可以用他來返回結(jié)果集了，比如該包里面的 pro_read 過程就是 一個返回結(jié)果集的過程，下面是他的包體，

Pl/sql代碼

CREATE OR REPLACE PACKAGE BODY PAK_rstest IS

   PROCEDURE pro_read

   (

       outcurse  IN OUT retcursor

   )

   IS

   begin

        OPEN outcurse FOR

         select * from tbl_test

                where rownum<6;

        return;

   end;

END;

    這樣就定義好了一個包，這個包里面有個返回結(jié)果集的過程 pro_read  

 2 在程序里面調(diào)用，     下面就是如果在程序里面調(diào)用了，這里用java為例子簡單介紹一下，     假設(shè)你現(xiàn)在已經(jīng)有一個Connection  conn 對象連接上了數(shù)據(jù)庫(如何連接數(shù)據(jù)庫我這里就不詳細說了),      則用下面的代碼調(diào)用過程，

Pl/sql代碼

if(conn !=null){

    String sqlstr = "{call  PAK_SMS2_ROUTE.MO_ISSUE(?)}";

     CallableStatement cstmt = conn.prepareCall(sqlstr);

     cstmt.registerOutParameter(1, oracle.jdbc.OracleTypes.CURSOR); //outcurse

     cstmt.executeUpdate();

     ResultSet rs = (ResultSet) cstmt.getObject(1); // 這里吧信息已經(jīng)讀入rs結(jié)果集里面，剩下的大家都熟悉了吧

   while (rs.next()) {

        System.out.println(rs.getString("s_date1")); //tbl_test 表里的字段名稱或是結(jié)果集的列名稱

     System.out.println(rs.getString("s_date2"));

      }   

         conn.close();

         conn = null;       

}

  好了到這里就可以看到返回的結(jié)果集內(nèi)容了，是不是比較簡單啊，：）   Oracle 存儲過程返回結(jié)果集:

過程返回記錄集代碼

CREATE OR REPLACE PACKAGE pkg_test

AS

    TYPE myrctype IS REF CURSOR;

    PROCEDURE get (p_id NUMBER, p_rc OUT myrctype);

END pkg_test;

CREATE OR REPLACE PACKAGE BODY pkg_test

AS

    PROCEDURE get (p_id NUMBER, p_rc OUT myrctype)

    IS

       sqlstr   VARCHAR2 (500);

    BEGIN

       IF p_id = 0 THEN

          OPEN p_rc FOR

             SELECT ID, NAME, sex, address, postcode, birthday

               FROM student;

       ELSE

          sqlstr :=

             'select id,name,sex,address,postcode,birthday

            from student where id=:w_id';

          OPEN p_rc FOR sqlstr USING p_id;

       END IF;

    END get;

END pkg_test;  

函數(shù)返回記錄集:建立帶ref cursor定義的包和包體及函數(shù)：

函數(shù)返回記錄集代碼

CREATE OR REPLACE

package pkg_test as

/* 定義ref cursor類型

    不加return類型，為弱類型，允許動態(tài)sql查詢，

    否則為強類型，無法使用動態(tài)sql查詢;

*/

   type myrctype is ref cursor; 

--函數(shù)申明

   function get(intID number) return myrctype;

end pkg_test; 

包體代碼

CREATE OR REPLACE

package body pkg_test as

--函數(shù)體

    function get(intID number) return myrctype is

      rc myrctype;  --定義ref cursor變量

      sqlstr varchar2(500);

    begin

      if intID=0 then

         --靜態(tài)測試，直接用select語句直接返回結(jié)果

         open rc for select id,name,sex,address,postcode,birthday from

student;

      else

         --動態(tài)sql賦值，用:w_id來申明該變量從外部獲得

         sqlstr := 'select id,name,sex,address,postcode,birthday from

student where id=:w_id';

         --動態(tài)測試，用sqlstr字符串返回結(jié)果，用using關(guān)鍵詞傳遞參數(shù)

         open rc for sqlstr using intid;

      end if;

      return rc;

    end get;

end pkg_test;

Java調(diào)用oracle函數(shù)返回游標(biāo)處理代碼

CallableStatement cstmt = null;

ResultSet rs = null;

try {

String callSql = "{? = call AAAAA(?)}";

cstmt = conn.prepareCall(callSql);

cstmt.setString(2, "userName");

cstmt.registerOutParameter(1, oracle.jdbc.OracleTypes.CURSOR);

cstmt.execute();

rs = (ResultSet) cstmt.getObject(1);

if (rs != null) {

       System.out.print("usercd");

       System.out.print("userName");               

       System.out.println("EMAIL");

       while (rs.next()) {       

    System.out.print(rs.getString(1)+"   ");

    System.out.print(rs.getString(2)+"   ");               

    System.out.println(rs.getString(3));

       }   

}