.NET调用ORACLE存储过程使用数组参数

----------包定义

create or replace package packtest
as
 type string_array is table of varchar2(21) index by binary_integer;
 type int_array is table of number(4) index by binary_integer;
 procedure test(v_string   in   string_array,
                       v_int       out int_array);
end packtest;
--------包体

Create or replace package body packtest
as
 procedure test(v_string in string_array,
                       v_int     out int_array)
 as
    cursor c is select na2 from test;
    v_content  varchar2(21);
 begin
    open c;
    for i in 1.. 3
    loop
      fetch c into v_int(i);
      v_content:=v_string(i);
    end loop;
    close c;
end test;

end packtest;

---------程序调用

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using Oracle.DataAccess;
using Oracle.DataAccess.Client;
using Oracle.DataAccess.Types;

public partial class oracle_array : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {
    }
    protected void Button1_Click(object sender, EventArgs e)
    {
        string connectionstring = string.Concat
        (
        "Password=gkl",
        ";User ID=gkl",
        ";Data Source=ORCL"
        );
        OracleConnection con = new OracleConnection(connectionstring);
        try
        {

            con.Open();
            OracleCommand cmd = con.CreateCommand();
            //
            //
            //
            cmd.CommandType = CommandType.StoredProcedure;
            cmd.CommandText = "packtest.test";
            //
            //定义Parameter，其中，Size是数组中的元素数量
            //
            OracleParameter Param1 = new
OracleParameter(@"p1", OracleDbType.Varchar2, 3);
            OracleParameter Param2 = new
OracleParameter(@"p2", OracleDbType.Int32, 3);
            //
            Param1.Direction = ParameterDirection.Input;
            Param2.Direction = ParameterDirection.Output;


            // Specify that we are binding PL/SQL Associative Array
            Param1.CollectionType = OracleCollectionType.PLSQLAssociativeArray;


            Param2.CollectionType = OracleCollectionType.PLSQLAssociativeArray;


            // Setup the values for PL/SQL Associative Array
            Param1.Value = new string[3]{"First Element",
                                                                                                "Second Element ",
                                                                                                "Third Element "};
            Param2.Value = null;
            // Specify the maximum number of elements in the PL/SQL Associative


            //Array
            //


            // Setup the ArrayBindSize for Param1
            Param1.ArrayBindSize = new int[3] { 13, 14, 13 };
            // Setup the ArrayBindStatus for Param1
            Param1.ArrayBindStatus = new OracleParameterStatus[3]{
                                                                                                                                                 OracleParameterStatus.Success,
                                                                                                                                                 OracleParameterStatus.Success,
                                                                                                                                                 OracleParameterStatus.Success};
            // Setup the ArrayBindSize for Param2
            //对于Int类型的Parameter，可以不设置Size，因为本身Int定义了自身大小
            //
            //                              Param2.ArrayBindSize = new int[3]{1, 2, 1};
            cmd.Parameters.Add(Param1);
            cmd.Parameters.Add(Param2);


            // execute the cmd
            cmd.ExecuteNonQuery();
            //print out the parameter's values
            int[] matrixint = (int[])Param2.Value;
            foreach (int t in matrixint)
            {
                Response.Write(t.ToString());
            }


            //                              con.Close();


        }
        catch (Exception ex)
        {
            Response.Write(string.Concat(
                    ex.Message,
                    ""r"n",
                    ex.Source.ToString(),
                    ""r"n",
                    ex.TargetSite.ToString(),
                    ""r"n",
                    ex.StackTrace.ToString()


                    ));
        }
        finally
        {
            con.Close();
        }

    }
}