Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


AleksandrKu ©   (2003-04-08 15:26:00) 

Текст
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:57:00) [1]

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


Zz_   (2003-04-08 15:50:00) [2]

Как пример

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


AleksandrKu   (2003-04-08 15:33:00) [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:28:00) [4]

Вызов покажи


AleksandrKu   (2003-04-08 15:27:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо