Скачать: CL | DM;

Не выполняется хранимая процедура на SQL server из delphi   Найти похожие ветки 

← →
freeman2003 ©   (2003-09-03 16:38) [0]

Есть хранимая процедура
CREATE PROCEDURE sp_v_remont
@printer_id smallint,
@date_begin datetime,
@prim text
AS
UPDATE printer
SET remont=1
WHERE printer_id=@printer_id

INSERT INTO remont (rem_type,technika_id,date_begin,prim)
VALUES (2,@printer_id,@date_begin,@prim)
GO

В приложении
procedure TFremont.BitBtn1Click(Sender: TObject);
begin
dm1.v_remont.ParamByName("@printer_id").AsInteger :=dm1.QPrinterALL.Fieldbyname("printer_id").AsInteger;
dm1.v_remont.ParamByName("@date_begin").AsDateTime := datetimepicker1.DateTime ;
dm1.v_remont.ParamByName("@prim").AsMemo :=memo1.Text;
dm1.v_remont.execproc ;
end

Не срабатывает хранимая процедура.Почему?Помогите!!!
Ошибок не возникает.

---

← →
freeman2003 ©   (2003-09-03 16:51) [1]

Вот лог из SQL monitor

1155 16:48:41 SQL Data In: SQL Server - Param = 2, Name = @date_begin, Type = fldTIMESTAMP, Precision = 23, Scale = 0, Data = 1/1/2003 0:0:0:0
1156 16:48:41 SQL Blob IO: SQL Server - Return blob data
1157 16:48:41 SQL Execute: SQL Server - { call "sp_v_remont;1" (:@printer_id,:@date_begin,:@prim)}
1158 16:48:41 SQL Vendor: ODBC - SQLAllocStmt

---

← →
Nikolay M. ©   (2003-09-03 17:19) [2]

Компоненты доступа - не АДО? Если да, то попробуй поставить в начало процедуры SET NOCOUNT ON;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c