Perci
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 11/08/2006 15:45 hs
Alguém pode me ajudar??? Tenho uma tabela com itens de pedidos. NumPed CodProd Quant 100 10 10 100 15 10 100 10 10 100 15 10 Queria que no meu relatório imprimisse assim: Num Ped CodProd Quant 100 10 20 100 15 20 Ou seja, não repetisse itens com o mesmo codigo do produto. Não estou conseguindo montar a instrução SQL. Sei que é simples, mas estou quebrando a cabeça
|
|
|
|
Daniel
|
SÃO PAULO SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 11/08/2006 15:59 hs
faça uma select assim: SELECT Itens_Pedidos.Cod_Pedido, Itens_Pedidos.Cod_Prod, Iens_Pedidos.Vlr_Unitario FROM Itens_Pedidos GROUP BY Itens_Pedidos.Cod_Pedido, Itens_Pedidos.Cod_Prod, Itens_Pedidos.Vlr_Unitario;
dsmn
|
|
|
|
Postada em 11/08/2006 16:13 hs
Parece q vc quer somar a qtde certo?? Faz assim: SELECT NumPed,CodProd,sum(Qtde) FROM Pedidos GROUP BY Numped,codprod;
|
|
|
Perci
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 11/08/2006 16:15 hs
Daniel, me desculpe, mas eu não entendo este GROUP BY. Poderia me explicar como funciona? O que esta cláusula faz? No meu caso, nesta Select, o que eu estou pedindo para o VB fazer?
|
|
|
Perci
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 11/08/2006 16:53 hs
Ghost e Daniel ou quem puder me ajudar. Fiz uma alteração no projeto e preciso montar uma instrução de SQL na qual eu faça o seguinte: quando eu salvo os itens do pedido, preciso verificar na tabela se já existe o mesmo produto no mesmo pedido; se ele já tiver com o mesmo numero do pedido e mesmo codigo do produto, tenho que somar a quantidade e salvar na tabela; se não tiver na tabela com o mesmo numero do pedido e mesmo codido do produto, eu tenho que gravá-lo. Entenderam? Se puderem me ajudar, agradeço. Eu uso o PC do escritório e portanto vou poder ler o post apenas na segunda-feira, mas podem postar que na segunda-feira cedo eu leio e testo e depois retorno se der certo. OK? BOM FINAL DE SEMANA A TODOS E FIQUEM COM DEUS.
|
|
|
JJF
|
GUARULHOS SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 14/08/2006 03:01 hs
Perci, tenta assim: 'procura se há pedido e produto Dim oRsPed as new Adodb.recordset oRsPed.open "select codprod,quant where numped = "& pedido &" and codprod = "& produto & " ",cnn 'se encontrar pedido e produto if not oRsPed.eof then orsped.Update 'aqui vai somar se já tiver este produto orsped!quant = orsped!quant + quant orsped.requery orsped.update orsped.close else orsped.addnew 'aqui vai adicionar um novo se for o primeiro registro. orsped!numped = pedido orsped!codprod = produto orsped!quant = quant orsped.requery orsped.update orsped.close end if
|
|
|