AdoStoredProc нехочет выполняться

← →
AleksandrKu (2003-04-08 15:26) [0]

Текст
CREATE PROCEDURE Dbo.create_dog
@IdOper int,
@IdGD int,
@IdGB int,
@IdKontr int,
@IdTip int,
@Summa money,
@SummaP money,
@SummaR money,
@DataDog Datetime,
@DateIsp Datetime,
@DayToIsp int,
@DateOf datetime,
@NumDog varchar (50),
@Prim varchar(254)
as
declare
@ident int;

insert into dogov
(IdOper,IdGD,IdGB,IdKontr,IdTip,Summa,SummaP,SummaR, DataDog,DateIsp,DateOf,NumDog,Prim)
values (@IdOper, @IdGD, @IdGB,@IdKontr,@IdTip, @Summa, @SummaP, @SummaR, @DataDog, @DateIsp, @DateOf,@NumDog,@Prim)
GO
пишет что неможет сконвертировать тип DateTime в Int и просит воспользоваться функцией Convert хотя типы полей совпадают как в таблице так и данные параметров

← →
AleksandrKu (2003-04-08 15:27) [1]

да прощу прощения D5,MS SQL

← →
Zz_ (2003-04-08 15:28) [2]

Вызов покажи

← →
AleksandrKu (2003-04-08 15:33) [3]

My.create_dog.Parameters.ParamByName("@DataDog").value:=DataDog.date;
My.create_dog.Parameters.ParamByName("@DateIsp").value:=dateIsp.Date;
My.create_dog.Parameters.ParamByName("@NumDog").value:=NumDog.text;
My.create_dog.Parameters.ParamByName("@IdOper").value:=my.operac.fieldbyname("link_id").asinteger;
My.create_dog.Parameters.ParamByName("@IdGD").value:=my.GenDir.fieldbyname("link_id").asinteger;
My.create_dog.Parameters.ParamByName("@IdGB").value:=my.GlaBuh.fieldbyname("link_id").asinteger;
My.create_dog.Parameters.ParamByName("@IdKontr").value:=my.View_kontr.fieldbyname("link_id").asinteger;
My.create_dog.Parameters.ParamByName("@IdTip").value:=my.Tip_oper.fieldbyname("link_id").asinteger;
My.create_dog.Parameters.ParamByName("@Summa").value:=strtofloat(Summa.caption);
My.create_dog.Parameters.ParamByName("@SummaP").value:=strtofloat(SummaP.Caption);
My.create_dog.Parameters.ParamByName("@SummaR").value:=strtofloat(SummaR.Caption);
My.create_dog.Parameters.ParamByName("@DayToIsp").value:=strtoint(DayToIsp.caption);
My.create_dog.Parameters.ParamByName("@DateOf").value:=now;
My.create_dog.Parameters.ParamByName("@Prim").value:=prim.Text;
try
my.Create_dog.ExecProc;
MessageDlg(vartostr(my.create_dog.Parameters.Parambyname("@Return_Value").value),mtError,[mbOk],0);
Edit_dogov.Close;
except
MessageDlg(,mtError,[mbOk],0);
end;

← →
Zz_ (2003-04-08 15:50) [4]

Как пример

http://www.sql.ru/forum/actualthread.aspx?bid=1&tid=24222

← →
AleksandrKu (2003-04-08 15:57) [5]

незнаю конечно но помоему дело не в этом
когда я передаю только 3 параметра
@DataDoc,@DateIsp, @Prim
Все нормально работает

AdoStoredProc нехочет выполняться Найти похожие ветки