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

2/9/2008来源:Oracle教程人气:5344


  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();
    }
  }