[firebase-br] CONSEGUI FAZER O UPDATE RODAR;;....PORÉM..DESCOBRI UM PROBLEMA
Cesar
cesar_newton em yahoo.com.br
Qua Nov 16 15:27:18 -03 2005
obrigado a todo pela a ajuda...mas..
quando eu mando salvar ele faz o update certo na tabela....mais...esta
funcionando legal..quando um produto so na entrada..atualiza o estoque certo
mais quando eu atualizo..3 produtos ou mais..ele soma tudo e altera o valor
somente do ultimo registo que cadastrei..
tenho que fazer um while?
esta assim:
var
strQuantidade: string;
begin
If Modulo.SlqFornecedoresFORNECEDOR.AsString = 'FAIAL REPRESENTAÇÕES
LTDA' then
begin
strQuantidade := FloatToStr(Modulo.SqlPedidosQUANTIDADE.AsFloat);
Modulo.SqlProdutos.Close;
Modulo.SqlProdutos.SQL.Clear;
Modulo.SqlProdutos.SQL.Add(' UPDATE PRODUTOS'+
' SET ESTOQUE = ESTOQUE + ' + strQuantidade +
' WHERE COD_PRODUTO =
'+#39+Modulo.SqlPedidosCOD_PRODUTO.AsString+#39);
Modulo.SqlProdutos.Prepare;
Modulo.SqlProdutos.ExecSQL;
Modulo.SqlPedidos.Next;
_______________________________________________________
Yahoo! Acesso Grátis: Internet rápida e grátis.
Instale o discador agora!
http://br.acesso.yahoo.com/
Mais detalhes sobre a lista de discussão lista