 Re: Update failed -
02-14-2008
, 02:38 PM
that is Delphi code.. you should go to the Borland forums for help..
--
Steven Green - Myrtle Beach, South Carolina USA
Diamond Software Group
http://www.diamondsg.com/main.htm
Paradox Support & Sales
Diamond Sports Gems
http://www.diamondsg.com/gemsmain.htm
Sports Memorabilia and Trading Cards
<mariodosreyx (AT) gmail (DOT) com> wrote
Estou usando o seguinte codigo com uma tabela paradox que pretendo
actulizar em batch
c/ o N.ª de Recibo depois de ter sido bem sucedido na Impressão e,
quando vou fazer
UpdateSQL1.ExecSQL(ukModify) tenho sempre o mesmo erro:
EDataBaseError: "Update failed" porém, actualiza se fechar e abrir o
Query1 a actualização foi efectuada.
Alguem poderá ajudar?
Obrigado
Mário Reis
Query1.Close ;
Query1.ParamByName('OLD_SEQ_INT').AsString := '0000000083' ;
Query1.ParamByName('OLD_PEFECTIVO').Value := StrToDate('2008-01-01');
Query1.Open ;
I:= StrToIntDef(Query1DOCUMENT.AsString,0)+1;
Query1.Edit;
Updatesql1.SetParams(ukModify);
UpdateSQL1.Query[ukModify].ParamByName('Document').AsString:='00000'+
INTTOSTR(I);
UpdateSQL1.Query[ukModify].Prepare;
UpdateSQL1.ExecSQL(ukModify);
UpdateSQL1.Query[ukModify].CommitUpdates;
If UpdateSQL1.Query[ukModify].UpdatesPending Then
UpdateSQL1.Query[ukModify].ApplyUpdates;
 |
Linear Mode
