使用 oracle pipelined 返回一个结果集；

1.使用

 create or replace package refcursor_pkg is

   -- Author  : mr.yang
   -- Created : 5/14/2017 5:13:42 PM
   -- Purpose :
   type refcur_t is ref cursor return sys_product%rowtype;
   type refcur_t1 is ref cursor /*return sys_product%rowtype*/
   ;
   type refcur_t2 is ref cursor return base_member%rowtype;

   type outrec_typ is record(
     v_pid   integer,
     v_pcode varchar(4000),
     v_pname varchar(4000));

   type outrecset is table of outrec_typ;
   function f_trans(p refcur_t) return outrecset
     pipelined;
   function f_trans1(p refcur_t1) return outrecset
     pipelined;
   function f_trans1(sp refcur_t1, bm refcur_t2) return outrecset
     pipelined;

 end refcursor_pkg;

2.body

 create or replace package body refcursor_pkg is
   function f_trans(p refcur_t) return outrecset
     pipelined as
     out_rec outrec_typ;
     in_rec  p%rowtype;

   begin

     loop
       fetch p
         into in_rec;
       exit when p%notfound;
       out_rec.v_pid   := in_rec.productid;
       out_rec.v_pcode := in_rec.productcode;
       out_rec.v_pname := in_rec.productname;

       pipe row(out_rec);
     end loop;
     close p;
     return;
   Exception
     when others then
       dbms_output.put_line(sqlcode || sqlerrm);
   end f_trans;

   function f_trans1(p refcur_t1) return outrecset
     pipelined as
     out_rec outrec_typ;
     in_rec  sys_product%rowtype;
   begin
     loop
       fetch p
         into in_rec;
       exit when p%notfound;
       out_rec.v_pid   := in_rec.productid;
       out_rec.v_pcode := in_rec.productcode;
       out_rec.v_pname := in_rec.productname;

       pipe row(out_rec);
     end loop;
     close p;
     return;
   Exception
     when others then
       dbms_output.put_line(sqlcode || sqlerrm);

   end f_trans1;
   ---------------------------------------------------------
   function f_trans1(sp refcur_t1, bm refcur_t2) return outrecset
     pipelined as

     out_rec   outrec_typ;
     in_rec    sys_product%rowtype;
     in_rec_bm bm%rowtype;
   begin

     loop
       fetch sp
         into in_rec;
       exit when sp%notfound;
       /*   out_rec.v_pid   := in_rec.productid;
          out_rec.v_pcode := in_rec.productcode;
          out_rec.v_pname := in_rec.productname;
          pipe row(out_rec);
       out_rec.v_pid   := in_rec_bm.id;
          out_rec.v_pcode := in_rec_bm.cnfullname;
          out_rec.v_pname := in_rec_bm.pinyin;
           pipe row(out_rec);*/

     end loop;
     close sp;

     loop
       fetch bm
         into in_rec_bm;
       exit when bm%notfound;
       out_rec.v_pid   := in_rec_bm.id;
       out_rec.v_pcode := in_rec_bm.cnfullname;
       out_rec.v_pname := in_rec_bm.pinyin;
       pipe row(out_rec);

       out_rec.v_pid   := in_rec.productid;
       out_rec.v_pcode := in_rec.productcode;
       out_rec.v_pname := in_rec.productname;
       pipe row(out_rec);
     end loop;
     close bm;

     return;
   Exception
     when others then
       dbms_output.put_line(sqlcode || sqlerrm);

   end f_trans1;

 end refcursor_pkg;

3.结果：