Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.25;
Скачать: CL | DM;

Вниз

D4+Zeos+MSSQL   Найти похожие ветки 

 
Andrey2k   (2003-07-30 13:10) [0]

Добрый день.
Подскажите пожайлуста, есть проблемка при вызове хранимой процедуры, работает связка Zeos+MSSQL 7.0, Суть проблемы в следующем, подключиться к базе могу,могу просмотреть данные, а вот вызвать процедуру не получается, те получается если в Дизайн тайме сделать все настройки хранимой процедуры (имя, параметры и значения), а если вызывать в ран тайме процедура не выполняется. Вот мой код, может что-то неверно.

with DM do begin
if uslov1= true then begin
Query1.Last;
StoredProc1.StoredProcName:="insert_user;1";
file://StoredProc1.Params.Clear;
StoredProc1.Params.CreateParam(ftString,"@KOD_MAHIN_1",ptInput);
StoredProc1.ParamByName("@KOD_MAHIN_1").AsString:=Edit1.Text;
StoredProc1.Params[0].Value:=Edit1.Text;
StoredProc1.Params.C0reateParam(ftString,"@DAN_OPER_2",ptInput);
StoredProc1.Params[1].AsString:=dostup;
StoredProc1.Params.CreateParam(ftString,"@OPISAN_3",ptInput);
StoredProc1.Params[2].AsString:=Memo1.Text;
StoredProc1.Params.CreateParam(ftString,"@RASPOL_4",ptInput);
StoredProc1.Params[3].AsString:=ComboBox1.Text;
StoredProc1.Params.CreateParam(ftString,"VID_OPIS_5",ptInput);
StoredProc1.Params[4].AsString:="";
StoredProc1.Params.CreateParam(ftString,"@RAB1_6",ptInput);
StoredProc1.Params[5].AsString:="";
end
else begin
end;
StoredProc1.Prepare;
StoredProc1.ExecProc;
Transact1.Commit;
Query1.Close;
Query1.Open;

Заранеее большое спасибо


 
ZrenBy ©   (2003-07-30 13:26) [1]

StoredProc1.Params.CreateParam(ftString,"VID_OPIS_5",ptInput);
без @

И еще.
Может попробовать создать параметр для return value ?
Params[0] который будет

Parameters.CreateParameter("@RETURN",ftInteger,pdReturnValue,4,0)



Страницы: 1 вся ветка

Текущий архив: 2003.08.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.034 c
7-81983
O?O
2003-05-30 06:16
2003.08.25
Файловый кеш


7-81989
Itim
2003-06-04 16:25
2003.08.25
Работа с Web камерой.


1-81838
SergP
2003-08-13 12:43
2003.08.25
Как проверить создан ли объект?


14-81933
Верховный Иерарх Сущего
2003-08-07 11:04
2003.08.25
У-у-у-а-а-а-o-o-o-o-o-o


1-81700
dez
2003-08-11 10:51
2003.08.25
Вставка Bitmap в Word