USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Relatório de produtos mais vendidos
ATS
OURINHOS
SP - BRASIL
Postada em 13/03/2005 11:08 hs            
Tenho uma tabela de vendas onde ficam gravadas todas as vendas, o que eu gostaria de fazer era montar um relatório no Active Reports que me mostrase os produtos mais vendidos. Este relatório teria o seguinte layout:

Código     Produto     Quantidade    Total da venda    Vendas

Sendo que todos os quatro primeiros campos eu tenho em minha tabela, e só o ultimo campo Vendas eu não tenho na tabela por que este campo tem que somar quantas vezes o produto foi vendido.
     
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 14/03/2005 08:11 hs         
Então o campo vendas é igual ao campo Quantidade, se entendi direito...
     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 14/03/2005 08:24 hs         
select
 C7_PRODUTO,
 C7_DESCRI,
 SUM(C7_QUANT) AS QTDEVENDIDA,
 SUM(C7_QUANT * C7_PRECO) AS TOTALVENDIDO
from SC7010
where D_E_L_E_T_ <> '*'
group by C7_PRODUTO, C7_DESCRI
order by QTDEVENDIDA desc
 
     
ATS
OURINHOS
SP - BRASIL
Postada em 14/03/2005 15:04 hs            
Muito obrigado ao Kerplunk e ao Martini pela valiosa ajuda, montei a instrução SQL com base no codigo que vc me passou e ela esta funcionando pefeitamente a não ser por um detalhe, não estou conseguindo ordenar os dados com o ORDER BY vejam a instrução abaixo está funcionando perfeitamente:
 
arProdMaisVendidos.daoMaisVendidos.RecordSource = "SELECT CodigoProduto, " _
& "DescricaoProduto, COUNT(Codigo) AS VENDAS, SUM(Quantidade) AS QTDEVENDIDA, SUM(Quantidade * ValorUnitario) " _
& "AS TOTALVENDIDO FROM tblVendasGrid WHERE DataSaida BETWEEN #" & strDataI & "# AND #" & strDataF & "#" _
& "GROUP BY CodigoProduto, DescricaoProduto"
 
Mas se coloco o ORDER BY da erro, veja como estou fazendo:
 
arProdMaisVendidos.daoMaisVendidos.RecordSource = "SELECT CodigoProduto, " _
& "DescricaoProduto, COUNT(Codigo) AS VENDAS, SUM(Quantidade) AS QTDEVENDIDA, SUM(Quantidade * ValorUnitario) " _
& "AS TOTALVENDIDO FROM tblVendasGrid WHERE DataSaida BETWEEN #" & strDataI & "# AND #" & strDataF & "#" _
& "GROUP BY CodigoProduto, DescricaoProduto ORDER BY QTDEVENDIDA"
 
O Active Reports me da o seguinte erro:
 
Error 5000 : Error in processing report.
[Extended Info:Parâmetros insuficientes. Eram esperados 1.]
 
Alguem pode me ajudar.
     
ATS
OURINHOS
SP - BRASIL
Postada em 15/03/2005 09:17 hs            
Ja tentei de tudo e não consigo ordenar os registros, alguem tem alguma solução.
     
Mateus
AMADORA
PT - PORTUGAL
Postada em 15/03/2005 09:31 hs            
substitua:
 
ORDER BY QTDEVENDIDA
por
ORDER BY sum(Quantidade) desc
 

João Mateus

Se precisar de ajuda extra, visite:

http://joaomateus.planetaclix.pt

     
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página