Query erro ao inserir

11/03/2013

1

// faz a inserção no banco de destino
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.ApplyUpdates(0);

end

erro :

[DCC Error] UTransfere.pas(86): E2003 Undeclared identifier: ''ApplyUpdates''
Responder

Posts

// faz a inserção no banco de destino
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.ApplyUpdates(0);

end

erro :

[DCC Error] UTransfere.pas(86): E2003 Undeclared identifier: ''ApplyUpdates''


Faça a substituição de ApplyUpdates por UpdateBatch
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.UpdateBatch;


Boa sorte e bons códigos!
Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira