Ajudem Um Estudante Por Favor

[Guest Sindicley]

Olá Pessoal Estou precisando da ajuda de Vocês que entende muito. Eu tenho o seguinte código

Para Atualizar Os registros de toda uma coluna em uma tabela.

tabelatotal.first;

while not tabelatotal.eof do

begin

tabelatotal.fieldbyname('quantidade').asinteger :=

tabelatotal.fieldbyname('quantidade').asinteger - tabelavenda.fieldbyname('quantidade')asinteger;

tabelatotal.next

Minha duvida e a seguinte. Como eu posso Fazer o código para que Está atualização seja feita apenas

Onde a data, codigodoproduto da tabela vendas seja igual a data, codigodoproduto da tabelatotal?

Porque na tabela vendas vai está assim.

Data |Codigodoproduto|Quantidade|

8/9/2004 | 1 | 5 |

8/9/2004 | 2 | 10 |

9/9/2004 | 1 | 10 |

Na tabelatotal vai está assim

Data |Codigodoproduto|Quantidade|

8/9/2004 | 1 | 10 |

8/9/2004 | 2 | 20 |

9/9/2004 | 1 | 20 |

Então Se Tabela Vendas.data e Vendas.Codigodoproduto = Tabelatotal.data e TabelaTotal.Codigodoproduto

TabelaTotal.Quantidade := TabelaTotal.Quantidade – TabelaVendas.Quantidade

Agora como eu Faço para que Isto seja feito com todos os registros?

Obrigado pela atenção de todos.

[Progr'amador]

você pode colocar um if dentro do while:

tabelatotal.first; 
while not tabelatotal.eof do begin
   if tabelatotal.fieldbyname('data').AsDate = tabelavenda.fieldbyname ('data').AsDate then begin
      tabelatotal.fieldbyname('quantidade').asinteger := 
      tabelatotal.fieldbyname('quantidade').asinteger - tabelavenda.fieldbyname   ('quantidade')asinteger;
   end; 
   tabelatotal.next;
end;

foi o que eu entendi...