oracle存储过程返回记录集

oracle的存储过程返回记录集，关键之处是要用游标。

　　关于数据库的游标(cursor)大家肯定都接触不少，我们可以通过OPEN,FETCH,CLOSE操作控制游标进行各种方便的操作，这方面的例子我就不在重复了。我们现在要介绍的是游标变量(cursor variable)。类似游标，游标变量也是指向一个查询结果集的当前行。不同的是，游标变量能为任何类型相似(type-compatible)的查询打开，而并不是绑定到某一个特定的查询。通过游标变量，你可以在数据库的数据提取中获得更多的方便。

　　首先是建立表。

  
 
 

CREATE TABLE LIHUAN.BILL_POINTS  
   
  
  
 
   
  
  
　　(  
   
  
  
 
   
  
  
　　 POINTS_ID NUMBER(10,0) NOT NULL,   
   
  
  
 
   
  
  
CUSTOMER_ID NUMBER(10,0) NOT NULL,  
   
  
  
 
   
  
  
　　 BILL_POINT_NO NUMBER(2,0) DEFAULT 1 NOT NULL,  
   
  
  
 
   
  
  
　　 CONSTRAINT PK_BILL_POINTS PRIMARY KEY (POINTS_ID)  
   
  
  
 
   
  
  
　　)  
   
  
  
 
   
  
  
　　/  
   
  
  
 
   
  
  
　　其次，建PACKAGE   
   
  
  
 
   
  
  
　　CREATE OR REPLACE PACKAGE LIHUAN.YY_PKG_BILL_POINT_NO/*取得用户的所有计费电序号*/  
   
  
  
 
   
  
  
　　IS  
   
  
  
 
   
  
  
　　TYPE T_CURSOR IS REF CURSOR;  
   
  
  
 
   
  
  
　　PROCEDURE BILL_POINT_NO(P_CUSTOMER_ID BILL_POINTS.CUSTOMER_ID%TYPE,  
   
  
  
 
   
  
  
　　 Re_CURSOR OUT T_CURSOR);  
   
  
  
 
   
  
  
　　END; 
  
 
 

　　再次，建PACKAGE BODY

  
 
 

CREATE OR REPLACE PACKAGE BODY LIHUAN.YY_PKG_BILL_POINT_NO/*取得用户的所有计费电序号*/  
   
  
  
 
   
  
  

　　IS 

   
  
  
 
   
  
  

　　 PROCEDURE BILL_POINT_NO(P_CUSTOMER_ID BILL_POINTS.CUSTOMER_ID%TYPE,  

   
  
  
 
   
  
  

　　 Re_CURSOR OUT T_CURSOR)  

   
  
  
 
   
  
  

　　 IS 

   
  
  
 
   
  
  
　　 V_CURSOR T_CURSOR;   
   
  
  
 
   
  
  

　　 BEGIN 

   
  
  
 
   
  
  

　　 OPEN V_CURSOR FOR   

   
  
  
 
   
  
  

　　 select Bill_Point_No from BILL_POINTS where CUSTOMER_ID =P_CUSTOMER_ID;  

   
  
  
 
   
  
  
　　 Re_CURSOR := V_CURSOR;  
   
  
  
 
   
  
  

　　 END;  

   
  
  
 
   
  
  

　　END; 

  
 
 

　　from：http://publish.it168.com/2006/0623/20060623033901.shtml