Я тестирую простую Oracle процедуру и каким-то образом получаю ошибку, которую я не могу понять, почему.
using (var dbConnection = new OracleConnection(ConfigurationManager.ConnectionStrings["KWC"].ConnectionString))
{
using (var command = dbConnection.CreateCommand())
{
var data = new List<Tuple<int, string, string, string>>
{
Tuple.Create(1, "hello", "kitty", "empty1"),
Tuple.Create(2, "mike", "perry", "empty2")
};
int listCount = data.Count;
command.CommandText = "KWC_Test_Output";
command.CommandType = CommandType.StoredProcedure;
command.BindByName = true;
command.ArrayBindCount = listCount;
command.Parameters.Add("string1", OracleDbType.Varchar2, data.Select(t=>t.Item2).ToArray(), ParameterDirection.Input);
command.Parameters.Add("string2", OracleDbType.Varchar2, data.Select(t=>t.Item3).ToArray(), ParameterDirection.Input);
var returnParam = new OracleParameter("result", OracleDbType.Varchar2, null, ParameterDirection.Output) { ArrayBindSize = new int[2] { 255, 255 } };
command.Parameters.Add(returnParam);
//command.Parameters[2].ArrayBindSize = new int[data.Count()];
//command.Parameters[2].ArrayBindSize[0] = 100;
//command.Parameters[2].ArrayBindSize[1] = 100;
var myParams = command.Parameters; // for debugging
dbConnection.Open();
command.ExecuteNonQuery(); // gets exception here
Console.WriteLine("returned value from oracle procedure: " + command.Parameters["result"].Value);
}
}
Я получил ошибку:
Oracle .ManagedDataAccess.Client.OracleException: 'ORA-06550: linje 1, kolonne 7: PLS-00306: неверный номер или типы аргументов при вызове' KWC_TEST_OUTPUT 'ORA-06550: linje 1, kolonne 7: PL / SQL: оператор игнорируется '
А вот процедура:
CREATE OR REPLACE PROCEDURE KWC_Test_Output(p_string1 IN VARCHAR2, p_string2 IN VARCHAR2, result OUT VARCHAR2)
AS
BEGIN
IF p_string1 = 'exception' THEN
DBMS_OUTPUT.PUT_LINE(p_string1);
DBMS_OUTPUT.PUT_LINE(p_string2);
RAISE_APPLICATION_ERROR(-20001,'An error was encountered - '||SQLCODE||' -ERROR- '||SQLERRM);
ELSE
result := CONCAT(p_string1, p_string2);
DBMS_OUTPUT.PUT_LINE(result);
END IF;
EXCEPTION
WHEN OTHERS THEN
result := SQLERRM;
DBMS_OUTPUT.PUT_LINE(result);
END KWC_Test_Output;
Может кто-нибудь сказать мне, почему это не удается? Заранее спасибо!