用.NET调用oracle存储过程返回记录集

   来源：赛迪网技术社区    作者：shanyuan

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; 
　　/

　　

最后，在.NET中程序调用。

　　public DataSet Bill_Point_No(string CUSTOMER_ID)//ok 
　　　{ 
　　　 DataSet dataset = new DataSet(); 
　　　 Hashtable HT=new Hashtable(); 
　　　 HT.Add("P_CUSTOMER_ID",CUSTOMER_ID); 
　　　 if(RunProcedure("Re_CURSOR",OracleType.Cursor,ref dataset,
HT,bmsOracleUser+".YY_PKG_BILL_POINT_NO.BILL_POINT_NO",
bmsOracleConnectionString)) 
　　　 { 
　　　　; 
　　　 } 
　　　 else 
　　　 { 
　　　　dataset=null; 
　　　 } 
　　　 return dataset; 
　　　} 
　　
　　public bool RunProcedure(string ReturnParameter,
OracleType ParamType,ref DataSet Dataset,Hashtable HT ,
string ProcedureName,string OracleConnection) 
　　　{ 
　　　 System.Data.OracleClient.OracleConnection dsconnection = 
new System.Data.OracleClient.OracleConnection(OracleConnection); 
　　　 System.Data.OracleClient.OracleCommand dacommand = 
new System.Data.OracleClient.OracleCommand(ProcedureName,dsconnection); 
　　　 dsconnection.Open(); 
　　　 dacommand.CommandType=CommandType.StoredProcedure; 
　　　 IDictionaryEnumerator Enumerator; 
　　　 Enumerator = HT.GetEnumerator(); 
　　　 object Value=null; 
　　　 OracleParameter OracleParam; 
　　　 OracleParam = dacommand.Parameters.
Add(new OracleParameter(ReturnParameter,ParamType)); 
　　　 OracleParam.Direction = ParameterDirection.Output; 
　　　 while(Enumerator.MoveNext()) 
　　　 { 
　　　　Value = Enumerator.Value; 
　　　　OracleParam=dacommand.Parameters.
Add(new OracleParameter
(Enumerator.Key.ToString(), Value)); 
　　　 } 
　　　 OracleDataAdapter ODAdapter=new OracleDataAdapter(dacommand); 
　　　　　　　　try 
　　　 { 
　　　　ODAdapter.Fill(Dataset); 
　　　　 return true; 
　　　 } 
　　　 catch(System.Exception e) 
　　　 { 
　　　　e.ToString(); 
　　　　return false; 
　　　 } 
　　　 finally 
　　　 { 
　　　　HT.Clear(); 
　　　　dacommand.Parameters.Clear(); 
　　　　dsconnection.Close(); 
　　　 } 
　　}