ошибка в tFIBDataSet при использовании параметров.

[Lokos]

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

Это как? В смысле, что это поле автоинкриментное?

да поле автоинкрементное и написан тригер который срабатывает на команду insertвот код

ET SQL DIALECT 3;

CREATE GENERATOR GEN_SOTRUDNIKI_ID;

SET TERM ^ ;



CREATE OR ALTER TRIGGER SOTRUDNIKI_BI0 FOR SOTRUDNIKI
ACTIVE BEFORE INSERT OR UPDATE POSITION 0
AS
begin
  if (NEW.ID is null) then
     NEW.ID = GEN_ID(GEN_SOTRUDNIKI_ID,1);
end
^


SET TERM ; ^

так он тут не причем во второй базе он тоже есть и все хорошо работает.

[artemavd]

Ну, пока не знаю что еще предложить. Может более опытные форумчане что подскажут

[Lokos]

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

Ну, пока не знаю что еще предложить. Может более опытные форумчане что подскажут

Ну я пробовал на специализированном по базам. Там очень умные ребята ругаются и советуют идти читать книжку. Ну спс))) буду мучиться дальше

[dron-s]

ну так то правильно советуют
вы создали тему, но не пойму причём тут параметры?
перепишите запрос именно с использованием параметров и у вас отпадёт вопрос с QuotedStr

[artemavd]

Я видать переработал

[Lokos]

Сообщение от dron-s

ну так то правильно советуют
вы создали тему, но не пойму причём тут параметры?
перепишите запрос именно с использованием параметров и у вас отпадёт вопрос с QuotedStr

вопрос не в QuotedStr. использование этой функции полностью устраивает

[dron-s]

я имел ввиду создали тему "использование параметров" а параметры не используются...

[dron-s]

вопрос не в QuotedStr. использование этой функции полностью устраивает

безусловно...
стоп.. бр.. сразу не посмотрел на ту кашу, а зачем DM.FIBDS.ParamByName('foto').LoadFr omStream(msAddData);
????
нафига используешь поток?

[Lokos]

Сообщение от dron-s

безусловно...
стоп.. бр.. сразу не посмотрел на ту кашу, а зачем DM.FIBDS.ParamByName('foto').LoadFr omStream(msAddData);
????
нафига используешь поток?

чтоб фото впихнуть в блоб поле. Есть еще способ?

[Lokos]

Изменил все это дело вот так

         DM.FIBQ.SQL.Clear;
         DM.FIBQ.SQL.Text:='UPDATE SOTRUDNIKI SET '+
         'ROLE=:R,'+
         'PAS=:P,'+
         '"№ УДОСТОВЕРЕНИЯ"=:NAMBUDST,'+
         '"ИМЯ"=:NAME,'+
         '"ФАМИЛИЯ"=:FAM,'+
         '"ОТЧЕСТВО"=:OTCHESTV,'+
         '"ТЕЛЕФОН"=:TEL,'+
         '"АДРЕС ЭЛ. ПОЧТЫ"=:ADRES_EL_POCH,'+
         '"№ АГЕНСТВА"=:NAMB_AGENST,'+
         '"ДАТА ПРИЕМА"=:DATA_PRIEM,'+
         '"ДАТА УВОЛЬНЕНИЯ"=:DATuVAL,'+
         '"СТАТУС"=:STATUS,'+
         '"ОБРАЗОВАНИЕ"=:OBR,'+
         '"ДОП. ОБРАЗОВАНИЕ"=:DOP_OBR,'+
         '"ПРИМЕЧАНИЕ"=:PRIMECH,'+
         '"ФОТО"=:FOTO,'+
         '"ДОЛЖНОСТЬ"=:DOLGNOST where '+
         'ROLE='+QuotedStr(SaveInf[13])+
         ' and PAS='+QuotedStr(SaveInf[14])+
         ' and "№ УДОСТОВЕРЕНИЯ"='+QuotedStr(SaveInf[15])+
         ' and "ИМЯ"='+QuotedStr(SaveInf[1])+
         ' and "ФАМИЛИЯ"='+QuotedStr(SaveInf[2])+
         ' and "ОТЧЕСТВО"='+QuotedStr(SaveInf[3])+
         ' and "ТЕЛЕФОН"='+QuotedStr(SaveInf[4])+
         ' and "АДРЕС ЭЛ. ПОЧТЫ"='+QuotedStr(SaveInf[5])+
         ' and "№ АГЕНСТВА"='+QuotedStr(SaveInf[6])+
         ' and "ДАТА ПРИЕМА"='+QuotedStr(SaveInf[7])+
         ' and "ДАТА УВОЛЬНЕНИЯ"='+QuotedStr(DataUvalPer)+
         ' and "СТАТУС"='+ QuotedStr(SaveInf[8])+
         ' and "ОБРАЗОВАНИЕ"='+QuotedStr(SaveInf[9])+
         ' and "ДОП. ОБРАЗОВАНИЕ"='+QuotedStr(SaveInf[10])+
         ' and "ПРИМЕЧАНИЕ"='+QuotedStr(SaveInf[11])+
         ' and "ДОЛЖНОСТЬ"='+QuotedStr(SaveInf[12])+';';
         DM.FIBQ.ParamByName('FOTO').LoadFromStream(msAddData);
         DM.FIBQ.ParamByName('R').Value:=RoleName.Text;
         DM.FIBQ.ParamByName('P').Value:=PasUser.text;
         DM.FIBQ.ParamByName('NAMBUDST').Value:=AddData.sotrNamber.Text;
         DM.FIBQ.ParamByName('NAME').Value:=AddData.Name.text;
         DM.FIBQ.ParamByName('FAM').Value:=AddData.sername.text;
         DM.FIBQ.ParamByName('OTCHESTV').Value:=AddData.Otchestvo.text;
         DM.FIBQ.ParamByName('TEL').Value:=AddData.telefon.text;
         DM.FIBQ.ParamByName('ADRES_EL_POCH').Value:=AddData.adrespoch.text;
         DM.FIBQ.ParamByName('NAMB_AGENST').Value:=AddData.adresagenstva.text;
         DM.FIBQ.ParamByName('DATA_PRIEM').Value:=strtodate(AddData.datapriema.text);
         DM.FIBQ.ParamByName('DATuVAL').Value:= strtodate(AddData.datapriema.text);
         DM.FIBQ.ParamByName('OBR').Value:=AddData.Obrazovanie.text;
         DM.FIBQ.ParamByName('DOP_OBR').Value:=AddData.dopobrzovanie.text;
         DM.FIBQ.ParamByName('PRIMECH').Value:=AddData.Memo1.text;
         DM.FIBQ.ParamByName('STATUS').Value:='Работает';
         DM.FIBQ.ParamByName('DOLGNOST').Value:=Dolgnost.Text;
         DM.FIBQ.ExecQuery;
         DM.FIBQ.Transaction.Commit;

Ошибок нет но и запись не меняется