如何用oledb调用as400存储过程？

Question

I am trying to call a stored procedure from my code using oledb but I can't figure out how to do this. This is the code I wrote but it's not working

OleDbCommand sp = connectionDB.CreateCommand();
sp.CommandText = "CALL NASVARWG.§SP001('?','?','?','?','?','?')";
sp.CommandType = CommandType.StoredProcedure;

sp.Parameters.Add("P1", System.Data.OleDb.OleDbType.Char).Value = "ESANASTRIS";
sp.Parameters["P1"].Size = 10;
sp.Parameters["P1"].Direction = ParameterDirection.Input;

sp.Parameters.Add("P2", System.Data.OleDb.OleDbType.Char).Value = "SAMNAS";
sp.Parameters["P2"].Size = 10;
sp.Parameters["P2"].Direction = ParameterDirection.Input;

sp.Parameters.Add("P3", System.Data.OleDb.OleDbType.Char).Value = "blah";
sp.Parameters["P3"].Size = 10;
sp.Parameters["P3"].Direction = ParameterDirection.Input;

sp.Parameters.Add("P4", System.Data.OleDb.OleDbType.Char);
sp.Parameters["P4"].Size = 2;
sp.Parameters["P4"].Direction = ParameterDirection.Output;

sp.Parameters.Add("P5", System.Data.OleDb.OleDbType.Char);
sp.Parameters["P5"].Size = 256;
sp.Parameters["P5"].Direction = ParameterDirection.Output;

sp.Parameters.Add("P6", System.Data.OleDb.OleDbType.Char).Value = textBox_Reparto.Text;
sp.Parameters["P6"].Size = 6;
sp.Parameters["P6"].Direction = ParameterDirection.Input;

sp.Parameters.Add("P7", System.Data.OleDb.OleDbType.Char).Value = "we can do this";
sp.Parameters["P7"].Size = 60;
sp.Parameters["P7"].Direction = ParameterDirection.Input;

sp.Parameters.Add("P8", System.Data.OleDb.OleDbType.Char).Value = "help";
sp.Parameters["P8"].Size = 256;
sp.Parameters["P8"].Direction = ParameterDirection.Input;

sp.Prepare();
sp.ExecuteNonQuery();

I get an exception at "sp.Prepare();" telling me that the syntax of the command is wrong.

Answer 1

If you can, use the IBM i Access ADO.NET drivers and place the program call in a stored procedure. They can convert the data from i to PC.

Answer 2

As @Syafiqur__ mentioned the ADO.NET drivers are a better choice.

And as always there is an IBM redbook about it. In my solutions I use the IBMDA400 version.

For your case it should look like this:

var command = new iDB2Command(cmdText: "§SP001", cmdType: CommandType.StoredProcedure, connection: masterSystemConnection);
var p1 = new iDB2Parameter(parameterName: "@P1", type: iDB2DbType.iDB2Char, size: 10);
    p1.Direction = ParameterDirection.Input;
    p1.Value = "ESANASTRIS";
    command.Parameters.Add(p1);
// ... all your other parameters, no call to Prepare
command.ExecuteNonQuery();

Regarding your SQL0469:

Either change the attribute of the parameter on the DECLARE PROCEDURE, CREATE PROCEDURE, or ALTER PROCEDURE statement or change the parameter.

For additional details please have a look at the IBM documentation .

Bernd

Answer 3

I think your problem is most likely that you have NO parameter markers in your SQL statement.

sp.CommandText = "CALL NASVARWG.§SP001('?','?','?','?','?','?')";

The '?' are string constants, not parameter markers ? which should appear without apostrophes. So the statement should really look like this:

sp.CommandText = "CALL NASVARWG.§SP001(?, ?, ?, ?, ?, ?)";