Хранимая процедура iSeries, вызывающая RPG-программу, не возвращает значение программе - PullRequest
3 голосов
/ 09 марта 2011

У меня есть хранимая процедура, которая вызывает программу SQLRPGLE.Программа работает нормально, как я подтвердил в отладчике, и возвращает возвращаемое значение, как и ожидалось.Вместо того, что возвращается, глядя на cmd.Parameters["@ISMATCH"].Value = {}.Я предполагаю, что я делаю что-то не так.Что бы это могло быть?

Хранимая процедура:

CREATE PROCEDURE "MPRLIB"."CHECKHOURS" (EMPLOYEEID DECIMAL(10 , 0), 
    INOUT ISMATCH CHAR(1))
LANGUAGE RPGLE
PARAMETER STYLE SQL
NOT DETERMINISTIC
MODIFIES SQL DATA 
SPECIFIC CHECKHOURS 
NEW SAVEPOINT LEVEL
EXTERNAL NAME 'MPRLIB/MPRLRCHK';

Мой метод:

    public bool IsValidTimesheet(int id)
    {
        bool isValid = false;

        // Get the data from the iSeries
        using (iDB2Connection conn = new iDB2Connection(ConfigurationManager.ConnectionStrings["IbmIConnectionString"].ConnectionString))
        {
            using (iDB2Command cmd = conn.CreateCommand())
            {
                cmd.CommandType = CommandType.StoredProcedure;
                cmd.CommandText = "LIB.CHECKHOURS";

                cmd.Parameters.Add("@EMPLOYEEID", iDB2DbType.iDB2Decimal).Value = id;
                cmd.Parameters.Add("@ISMATCH", iDB2DbType.iDB2Char).Direction = ParameterDirection.Output;
                conn.Open();
                cmd.ExecuteNonQuery();
                isValid = (cmd.Parameters["@ISMATCH"].Value.ToString() == "1") ? true : false;
                conn.Close();
            }
        }

        return isValid;
    }

Параметры моей программы RPG:

 D CHECKHOURS      PR                  extpgm('CHECKHOURS')
 D  id                           10P 0
 D  isMatch                       1A

Ответы [ 3 ]

1 голос
/ 09 марта 2011

Решение должно быть

CREATE PROCEDURE "MPRLIB"."CHECKHOURS" (EMPLOYEEID DECIMAL(10 , 0), 
    INOUT ISMATCH CHAR(1))
    LANGUAGE RPGLE
    PARAMETER STYLE GENERAL
    NOT DETERMINISTIC
    MODIFIES SQL DATA 
    SPECIFIC CHECKHOURS 
    NEW SAVEPOINT LEVEL
    EXTERNAL NAME 'MPRLIB/MPRLRCHK';

Благодаря Schadd на MIDRANGE-L .

1 голос
/ 09 марта 2011

Я смутно помню, что, несмотря на то, что вы назвали его параметром OUT, он действительно должен быть параметром INOUT из-за того, как RPG обрабатывает его.Что произойдет, если вы измените процесс создания на INOUT и внесете соответствующее изменение в C #?

0 голосов
/ 09 марта 2011

А что если вы измените параметр out на nvarchar (1) и измените sproc.Соответствует ли N-тип типу iDB2Char?

...