PLSQLAssociativeArray

Question

Hi,
I've found a sample code on http://download-uk.oracle.com/docs/html/B10961_01/features.htm#1024855
I modified the code a little.
               OracleCommand cmd = new OracleCommand("begin MyPack.TestVarchar2(:1, :2, :3); end;", dbConn);
               OracleParameter Param1 = new OracleParameter();
               OracleParameter Param2 = new OracleParameter();
               OracleParameter Param3 = new OracleParameter();
               Param1.ParameterName = "1";
               Param1.ParameterName = "2";
               Param1.ParameterName = "3";
               Param1.OracleDbType = OracleDbType.Varchar2;
               Param2.OracleDbType = OracleDbType.Varchar2;
               Param3.OracleDbType = OracleDbType.Varchar2;
               Param1.Direction = ParameterDirection.Input;
               Param2.Direction = ParameterDirection.InputOutput;
               Param3.Direction = ParameterDirection.Output;
               // Specify that we are binding PL/SQL Associative Array
               Param1.CollectionType = OracleCollectionType.PLSQLAssociativeArray;
               Param2.CollectionType = OracleCollectionType.PLSQLAssociativeArray;
               Param3.CollectionType = OracleCollectionType.PLSQLAssociativeArray;
               // Setup the values for PL/SQL Associative Array
               Param1.Value = new string[3]{"Papa",
                                                       "Mama",
                                                       "Gyerekek"};
               Param2.Value = new string[3]{"First Element",
                                                       "Second Element",
                                                       "Third Element"};
               Param3.Value = new string[3]{"1",
                                                       "2",
                                                       "3"};
               // Specify the maximum number of elements in the PL/SQL Associative Array
               Param1.Size = 3;
               Param2.Size = 3;
               Param3.Size = 3;
               // Setup the ArrayBindSize for Param1
               Param1.ArrayBindSize = new int[3]{13, 14, 13};
               cmd.Parameters.Add(Param1);
               cmd.Parameters.Add(Param2);
               cmd.Parameters.Add(Param3);
               // Setup the ArrayBindStatus for Param1
               Param1.ArrayBindStatus = new OracleParameterStatus[3]{
                                                                                     OracleParameterStatus.Success,
                                                                                     OracleParameterStatus.Success,
                                                                                     OracleParameterStatus.Success};
               // Setup the ArrayBindSize for Param2
               Param2.ArrayBindSize = new int[3]{20, 20, 20};
               // Setup the ArrayBindSize for Param3
               Param3.ArrayBindSize = new int[3]{20, 20, 20};
               // execute the cmd
               cmd.ExecuteNonQuery();
               //print out the parameter's values
               Console.WriteLine(Param2.ToString());
               Console.WriteLine(Param3.ToString());
In Oracle:
CREATE PACKAGE MYPACK AS
TYPE AssocArrayVarchar2_t is table of VARCHAR(20) index by BINARY_INTEGER;
PROCEDURE TestVarchar2(
Param1 IN AssocArrayVarchar2_t,
Param2 IN OUT AssocArrayVarchar2_t,
Param3 OUT AssocArrayVarchar2_t);
END MYPACK;
CREATE PACKAGE BODY MYPACK AS
PROCEDURE TestVarchar2(
Param1 IN AssocArrayVarchar2_t,
Param2 IN OUT AssocArrayVarchar2_t,
Param3 OUT AssocArrayVarchar2_t)
IS
i integer;
BEGIN
-- copy a few elements from y to z
Param3(1) := Param2(1);
Param3(2) := NULL;
Param3(3) := Param2(3);
-- copy all elements from x to y
Param2(1) := Param1(1);
Param2(2) := Param1(2);
Param2(3) := Param1(3);
FOR i IN 1..3 LOOP
insert into T1 values(i, Param2(i));
END LOOP;
FOR i IN 1..3 LOOP
select COL2 into Param2(i) from T2 where COL1 = i;
END LOOP;
END TestVarchar2;
END MYPACK;
But I don't get any character on console. WHY?

Answer 1

Hi,
From
http://download-west.oracle.com/docs/cd/B19306_01/win.102/b14307/featOraCommand.htm#BABBDHBB
<snippet>
// execute the cmd
cmd.ExecuteNonQuery();
//print out the parameter's values
Console.WriteLine("parameter values after executing the PL/SQL block");
for (int i = 0; i < 3; i++)
Console.WriteLine("Param2[{0}] = {1} ", i,
(cmd.Parameters[1].Value as Array).GetValue(i));
for (int i = 0; i < 3; i++)
Console.WriteLine("Param3[{0}] = {1} ", i,
(cmd.Parameters[2].Value as Array).GetValue(i));
</snippet>
Cheers,
Greg