Ошибка: Дополнительная возможность не реализована

[Абдуллаев Рустам]

Всем Привет!
Хочу спросить тех, кто сталкивался с такой ошибкой, или тот кто знает, что эта ошибка означает или в чем дело.
Имеется обычная storedproc на Sqlserver2000, вставки одной и сразу обновления другой таблицы.

CREATE PROCEDURE passportins(
@pasid integer,
@data datetime,
@cabid integer)
 AS
insert into passports
values(@pasid,@data)
update objects_cab
set pass_id=@pasid
where cab_id=@cabid
GO

Передаю параметры и выполняю процедуру в Delphi(событие на нажатие кнопки):

with Adostoredproc16 do
begin
parameters.ParamValues['@pasid']:=m;
parameters.ParamValues['@Data']:=vartodatetime(Edit6.Text);
parameters.ParamValues['@cabid']:=k;
end;
Adostoredproc16.ExecProc;

Во время запуска приложения, а вернее нажатия на кнопку выдает такое вот сообщение:
....Дополнительная возможность не реализована....
И в чем дело не пойму, вроде сто раз все перепроверил, не хочет и все.

[Dark_Spirit]

with Adostoredproc16 do
begin
parameters.ParamValues['@pasid']:=m;
parameters.ParamValues['@Data']:=vartodatetime(Edit6.Text);
parameters.ParamValues['@cabid']:=k;
end;
Adostoredproc16.ExecProc;

а вот так попробовать:

try
 adoconnection1.begintrans;
 with Adostoredproc16 do
  begin
   parameters.ParamByName('@pasi').Value:=m;
   parameters.ParamByName('@Data').Value:=vartodatetime(Edit6.Text);
   parameters.ParamByName('@cabid').Value:=k;
  end;
 Adostoredproc16.ExecProc;
 adoconnection1.committrans;
except
 adoconnection1.rollbacktrans;
end

[Абдуллаев Рустам]

Спасибо, попробую и напишу ответ.

[Абдуллаев Рустам]

Все равно та же ошибка, и главное попробовал вставить данные хотя бы в первую таблицу через ADotablе, так он пишет: could not convert null into string. Хотя у меня нулей никаких вообще нет.

procedure TMainform.Button10Click(Sender: TObject);
begin

ADOTable2.Open;
ADOTable2.Append;
ADOTable2.Fieldbyname('Pass_id').Asinteger:=m;
ADOTable2.Fieldbyname('Pass_date').AsDatetime:=vartodatetime(Edit6.Text);
ADOTable2.Post;
ADOTable2.Close;

end;

Хотя на sql serverе прекрасно все вставляется и обновляется. Не знаете в чем дело?

[koma_grusha]

если в таблице на сервере у тебя есть и другие поля, кроме этих двух, в данном случае какое-то поле строкового типа, при этом по определению оно не должно быть пустым, и ему не указано значение по умолчанию, то происходит описанная тобой ошибка, т.е. при добавлении записи это поле не знает какое значение принять - нулл нельзя, но другого значения тоже нет, вот он ругается

[Абдуллаев Рустам]

Сообщение от koma_grusha

если в таблице на сервере у тебя есть и другие поля, кроме этих двух, в данном случае какое-то поле строкового типа, при этом по определению оно не должно быть пустым, и ему не указано значение по умолчанию, то происходит описанная тобой ошибка, т.е. при добавлении записи это поле не знает какое значение принять - нулл нельзя, но другого значения тоже нет, вот он ругается

Да, понятно. Но у меня в таблице этой только два поля. Pass_id integer, и Pass_date datetime, может быть дело в формате даты?

[soleil@mmc]

а ты проверял что именно приходит из прилады на вход ХП? может там в какой-то переменной как раз нулл и есть

[Абдуллаев Рустам]

Проверял и выводил их в edit для проверки

[Абдуллаев Рустам]

В общем все - тема закрыта. Каким-то чудом все работает!
Несколько раз исправлял тип данных на char где datetime, - потом получилось с ним, попробовал поставить datetime -и с ним теперь вышло.

try
adoconnection1.BeginTrans;
with Adostoredproc16 do
begin
parameters.Parambyname('@pasid').Value:=m;
parameters.Parambyname('@Data1').Value:=Edit6.Text;
parameters.Parambyname('@cabid').Value:=k;
end;
Adostoredproc16.ExecProc;
adoconnection1.committrans;
except
 adoconnection1.rollbacktrans;
end;

[Абдуллаев Рустам]

И еще в storedproc на сервере прописал тип не datetime а char(10). С datetime storedproc выдает такую же ошибку даже если прописывать в storedproc на обновление. В итоге на сервере:

CREATE PROCEDURE passportins(
@pasid integer,
@data1 char(10),
@cabid integer)
 AS
insert into passports
values(@pasid,@data1)
update objects_cab
set 
pass_id=@pasid
where cab_id=@cabid
GO

В то время как таблицу passports не менял вовсе.
И в Delphi дату записываю как обычную дату.

parameters.Parambyname('@Data1').Value:=Datetostr(date);

либо просто как edit6.text;