Пишу программу (делфи). Для доступа к DB2 на AS/400 используется ADO. В БД в некой таблице имеется поле DCINMB, объявленное как DECIMAL (11,0).
У ADODataSet, прицепленному к ADOConnection (с "Provider=IBMDA400.DataSource.1") свойству CommandText присваиваю строку Поскольку, DataSet.ParamCheck=True, то после присвоения у DataSet сразу же появляется параметр VAR1 с типом ftBCD . Присваиваю этому параметру значение: myDataSet.Parameters.ParamValues['VAR1'] := GetDCINMB . GetDCINMB - моя функция, возвращающая нужное значение (пробывал разные типы возвращаемых данных: и string, и currency, и int64).
При myDataSet.Open вылетает исключение "Неверное имя типа". Вылетает именно из-за этого параметра, потому что если задать значение прямо в commandText (вместо :VAR1), то все работает.
Текст ошибки нашел в oledb32r.dll. Гугл на данное сообщение выдал всего 10 страниц, в которых ничего не нашел. Если нет ответа, почему вылетает это исключение, то подскажите как эта ошибка звучит на английском (буду гуглить на буржуйском).