Alteração de Registro no BD

[Diaclau 0]

Olá, Boa noite!Estou com dificuldade de alteração no BD.Vou explicar melhor:Tenho as seguintes tabelas com seus respectivos campos:Tabela PRODUTOId_prod, ... Quantidade.Tabela ENTRADAId_entrada, Notafiscal, Fornecedor, data, valortotalentrada.Tabela ITENS_ENTRADAId_entrada, Id_itens, Id_prod, Descrição_produto, Quantidade...Criei um relacionamento mestredetail entre as tabelas ENTRADA (mestre) e ITENS_ENTRADA (cliente), mas tenho q alterar a quantidade na tabela PRODUTO toda vez q for dada entrada, não sei como fazer.Alguém pode me ajudar?Muito obrigado.

[Diaclau 0]

No Delphi coloquei o seguinte comando no procedimento do btnSalva

 while dm.cdsProdCODPROD.Value = dm.cdsItensEntCODPROD.Value do begin    dm.cdsProdQUANTIDADE.Value:= (dm.cdsProdQUANTIDADE.Value) + (dm.cdsItensEntQUANTIDADE.Value);  end;  dm.cdsProd.Close;

Mas não deu certo.

[Rodrigo Miss 1]

Daria pra você montar uma Query para a Tabela de Prodos (qryProd) e dai fazer assim:

 

dm.cdsItensEnt.First;while not dm.cdsItensEnt.Eof dobegin  with qryProd do  begin	Close;	SQL.Clear;	SQL.Add('UPDATE PRODUTOS SET');	SQL.Add('QTDE = QTDE +' + dm.cdsItensEntQTDE.Text);	SQL.Add('WHERE ID_PRODUTO = ' + dm.cdsItensEntID_PRODUTO.Text);	ExecSQL;  end;dm.cdsItensEnt.Next;end;

[Diaclau 0]

Como monto essa query?

[Diaclau 0]

Muito obrigada Rodrigo, deu certinho!

[Rodrigo Miss 1]

hehe

Ok!

Precisando .... http://forum.imasters.com.br/public/style_emoticons/default/shifty.gif