PAGUE 6 MESES
LEVE 12 MESES
GARANTIR DESCONTO

Fórum O que há de errado Nesse Comando (URGENTE) #146332

17/03/2003

0

Bom todos as Tabelas estao em um datamodulo !! Chamado DM ! Bom simplismente o comando não funciona !!! não da erro de sql nem nada simplismente não altera o registro !!! Será que tem algum comando errado ou falta alguma coisa !!!!!

DM.TbEstoque.SQL.Clear ;
DM.TbEstoque.SQL.Add (´UPDATE ESTOQUE´);
DM.TbEstoque.SQL.Add (´SET DATA = :DATA,CODPROD = :CODPROD,CODFILIAL = :CODFILIAL,SALDO = :SALDO,PRECOMED = :PRECOMED,TOTAL = :TOTAL,ESTOQUEINIC = :ESTOQUEINIC´);
DM.TbEstoque.SQL.Add (´WHERE CODESTOQ = :CODESTOQ´);
DM.TbEstoque.ParamByName(´Data´).VALUE := StrToDateTime(´01/01/2003´);
DM.TbEstoque.ParamByName(´CODPROD´).VALUE := STRTOINT(EDCODPROD.Text);
DM.TbEstoque.ParamByName(´CODFILIAL´).VALUE := STRTOINT(EDCODFIL.Text);
DM.TbEstoque.ParamByName(´SALDO´).VALUE := EDSALDO.Value ;
DM.TbEstoque.ParamByName(´PRECOMED´).VALUE := EDPM.value;
DM.TbEstoque.ParamByName(´TOTAL´).VALUE := EDTOTAL.value ;
DM.TbEstoque.ParamByName(´ESTOQUEINIC´).VALUE := edsaldo.value;
DM.TbEstoque.ParamByName(´CODESTOQ´).VALUE := CODESTOQ ;
DM.TbEstoque.ExecSQL;


Anonymous

Anonymous

Responder

Posts

17/03/2003

Anonymous

Esta linha está ´estranha´. QUEM ou O QUE é CODESTQ ???

DM.TbEstoque.ParamByName(´CODESTOQ´).VALUE := CODESTOQ ;

se estiver indefinido, este comando

DM.TbEstoque.SQL.Add (´WHERE CODESTOQ = :CODESTOQ´);

não vai trazer nada. Isto não significa que seu SQL esteja errado, ele só não achou ninguém que satisafaça a condição estabelecida.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar