> Dm.QY_011.Close; > Dm.QY_011.SQL.Clear; > Dm.QY_011.SQL.Add('UPDATE PRODUTOS'); > Dm.QY_011.SQL.Add('INNER JOIN ITENSPEDIDOCompras ON PRODUTOS.COD = > ITENSPEDIDOCompras.CODPROD'); > Dm.QY_011.SQL.Add('SET PRODUTOS.ESTOQUEATUAL = > PRODUTOS.ESTOQUEATUAL'+SINAL+'ItensPedidoCompras.QTD'); > Dm.QY_011.SQL.Add('WHERE ((PRODUTOS.COD=ITENSPEDIDOCompras.CODPROD And > ITENSPEDIDOCompras.Movimento='+Movimento+'))'); > Dm.QY_011.ExecSQL; > > o parametro movimento é o número do Pedido > e o parametro sinal é + para acrescentar o estoque e - para diminuir o > estoque >
Adapta os nomes das tabelas/campos pro teu caso. UPDATE PRODUTOS SET PRODUTOS.QTDE = PRODUTOS.QTDE - (SELECT ITENSPED.qtdeped FROM ITENSPED WHERE ITENSPED.IDITEM = PRODUTOS.ID AND ITENSPED.IDPED = 1) WHERE PRODUTOS.ID IN (SELECT IDITEM FROM ITENSPED WHERE IDPED = 1) Alencar --------------------------------------- Philler Informatica Ltda Jose Alencar Philereno ICQ 13458351 Messenger/Skype (voz): alencar "Feliz aquele que transfere o que sabe e aprende o que ensina" Cora Coralina -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html