Передать массив в качестве параметра ХП (Invalid class type cast)
Добавлено: Пт 05 апр 2019 09:10
Не могу разобраться как правильно и быстро можно записать массив через ХП
на сервере
на Delphi
Подскажите, почему выскакивает ошибка Invalid class type cast
на сервере
Код: Выделить всё
TYPE TAB_pl_dt IS TABLE OF date INDEX BY PLS_INTEGER;
procedure ins_buf(mDate in TAB_pl_dt);
Код: Выделить всё
oProc:= TOraStoredProc.Create(nil);
oProc.Params.Clear;
oProc.StoredProcName:= 'pkg.ins_buf';
oProc.Connection := oConnection;
oProc.Prepare;
mDate:= VarArrayCreate([0, SizeArr-1], varDate);
oProc.Params[0].DataType:= ftDateTime;
oProc.Params[0].ParamType:= ptInput;
oProc.Params[0].Table:= True;
oProc.Params[0].Length:= SizeArr;
oProc.Params[0].Value:= mDate; //Invalid class type cast