[Resolvido]Relatorio não soma correto

boa tarde à todos

Estou um problema grande que a quase um mes não consigo resolver
em dois relatorios (somas)

eles não dar o resultado satisfatório (não soma direito)
- Rel vendas de lentes


- Rel vendas de lentes e armacoes


o que estou querendo é que ele faça as somas correntas
vai na barra de ferramentas e em relatorio e seleciona - vendas de produtos
vai abrir um uma janela de seleção de relatorio  - informe a data inicial 08/02/22 e data final 08/02/22
na opção - vd.lentes analitico e visualizar relatorio
la a gente ver que tem 3 vendas do mesmo cliente
só que ele soma 12.000.00 e não é isso o valor é 4.000.00
na opção - vd. lentes e armações, tambem esta no mesmo jeito
as soma não bate ....
eu quero fazer a comparação entre  vendas e objetos
não sei o porque que ele soma 3 vezes o valor
se tiver 2 vendas ele coloca 4 ...

Alguem pode mim ajudar?

Geralmente este tipo de erro dá quando fazemos as relações entre as tabelas, principalmente quando usamos um para um. A tabela que vc quer mostrar deve estar avisando que vc quer todos os registros e da outra só se for igual. Tenta ir montando passo a passo, fica mais facil

Poderia explicar os rótulos do relatório?

Vr.Lente - Valor da lente
Vr.Arm - Valor da armação
Vr.Obj - Soma do valor da lente + armação

Pr.Venda - Preço normal de venda?
Out.Obj - Desconto? Que seria o valor do preço normal de venda menos o Vr.Obj?

Se meu entendimento dos campos acima estiver correto, o relatório me parece correto. Cada linha é um produto diferente, com valor diferente e portanto deve realmente ser somado.

Se Ou.Obj for um incremento de valor, então Pr.Venda seria o preço final? Desta forma a soma ainda estaria correta.

Ajude-me a entender o problema para encontrarmos uma solução.

Bom dia Sousa Bom dia Todos..

assim
na soma dos relatório esta duplicando e no detalhes do relatório
dependendo do cliente que tiver 2 compras ou  mais

é pra ser assim
vd.objeto + vd.lente = (soma dos dois) - vr.venda = aqui é pra saber se a venda esta maior ou menor
só que na soma do relatorio da tudo errado
---deu pra entender??
o problema é quando faço a vinculação da tabela do estoque
venda produto
compra produtos
produtos
--- ai dar esse problema

aqui tenho uma tabela de vendas com os preços
pra compara a vendas se esta positiva ou negativa (coisas de vendedor se dar dando desconto ou não)

veja no construtor sql que ele duplica .. o certo é um de cada não dois

Você tem 3 itens vendidos, porém sua consulta retorna 6, outra coisa que notei é que você está calculando o valor da venda 4.000 menos o valor do objeto, por exemplo o objeto 69, 1.500 o valor da venda, no caso a diferença na consulta é 2.500, somando isso aos valores das demais linhas chega no valor de 16.000.

Colocando, Diferenca: (([ValorLentes]+[PreçoDeCompra_Compras])-[PreçoObjeto]), você teria o valor correto da diferença, no entanto teria que eliminar as 3 linhas que não fazem parte da transação, se não, vai continuar calculando errado.

Fazendo, Diferenca: [LentArm]-[PreçoObjeto], também resolve a questão da diferença, quando as duplicidades alguma chave primária não foi definida corretamente, creio eu.

Bom dia
Caro Gilvane

Fazendo, Diferenca: [LentArm]-[PreçoObjeto], também resolve a questão da diferença, quando as duplicidades alguma chave primária não foi definida corretamente

só acontece isso quando ligo a tabela de vendas com a tabela de objetos

Já refiz o sql
mas não tive exito

sql pra ver a diferença

SELECT Vendas.CódigoDaVenda, Objetos.Id_EspLentes, Clientes.NomeCliente, [Especie de Lentes].Descricao, [Especie de Lentes].ValorLentes, Vendas.CódigoDoBloco, Vendas.ValorDaVenda, Vendas.DataDaVenda, [Vendas Produtos].Data, Vendas.CódigoDaFilial, Filiais.Filial, [ValorDaVenda]-[PreçoObjeto] AS Diferenca, [PreçoDeCompra_Compras]+[valorLentes] AS LentArm, [Compras Produtos].PreçoDeCompra_Compras, Produtos.IDFornecedor_Produtos, Objetos.PreçoObjeto, [PreçoObjeto]-[LentArm] AS SubObj, [Especie de Lentes].Optometria, Objetos.Quantidade, Vendas.QuantDePres FROM (Clientes INNER JOIN ((Produtos INNER JOIN [Compras Produtos] ON Produtos.IDProdutosDesc_Produtos = [Compras Produtos].CódProdDesc_Compras) INNER JOIN [Vendas Produtos] ON [Compras Produtos].CódProduto_Compras = [Vendas Produtos].CódProduto_Compras) ON Clientes.CódigoDoCLiente = [Vendas Produtos].CódigoDoCLiente) INNER JOIN ((Vendas INNER JOIN Filiais ON Vendas.CódigoDaFilial = Filiais.CódigoDaFilial) INNER JOIN ([Especie de Lentes] INNER JOIN Objetos ON [Especie de Lentes].Id_EspLentes = Objetos.Id_EspLentes) ON Vendas.CódigoDaVenda = Objetos.CódigoDaVenda) ON Clientes.CódigoDoCLiente = Vendas.CódigoDoCliente GROUP BY Vendas.CódigoDaVenda, Objetos.Id_EspLentes, Clientes.NomeCliente, [Especie de Lentes].Descricao, [Especie de Lentes].ValorLentes, Vendas.CódigoDoBloco, Vendas.ValorDaVenda, Vendas.DataDaVenda, [Vendas Produtos].Data, Vendas.CódigoDaFilial, Filiais.Filial, [Compras Produtos].PreçoDeCompra_Compras, Produtos.IDFornecedor_Produtos, Objetos.PreçoObjeto, [Especie de Lentes].Optometria, Objetos.Quantidade, Vendas.QuantDePres HAVING (((Vendas.DataDaVenda) Between [Formulários]![Dialogo Vendas Objetos]![Data de Inicio] And [Formulários]![Dialogo Vendas Objetos]![Data de Termino]) AND (([Vendas Produtos].Data) Between [Formulários]![Dialogo Vendas Objetos]![Data de Inicio] And [Formulários]![Dialogo Vendas Objetos]![Data de Termino]));

Sql so vendas do objeto

SELECT Vendas.CódigoDaVenda, Objetos.id_EspLentes, Clientes.NomeCliente, [Especie de Lentes].Descricao, [Especie de Lentes].Optometria, [Especie de Lentes].ValorLentes, [PreçoObjeto]-[ValorLentes] AS VrLenArm, Vendas.CódigoDoBloco, Vendas.QuantDePres, Vendas.ValorDaVenda, Vendas.DataDaVenda, Vendas.CódigoDaFilial, Filiais.Filial, [ValorDaVenda]-[PreçoObjeto] AS Dif, Objetos.PreçoObjeto, [Especie de Lentes].Optometria FROM (Clientes INNER JOIN (Vendas INNER JOIN Filiais ON Vendas.CódigoDaFilial = Filiais.CódigoDaFilial) ON Clientes.CódigoDoCLiente = Vendas.CódigoDoCliente) INNER JOIN ([Especie de Lentes] INNER JOIN Objetos ON [Especie de Lentes].Id_EspLentes = Objetos.id_EspLentes) ON Vendas.CódigoDaVenda = Objetos.CódigoDaVenda WHERE (((Vendas.DataDaVenda) Between [Formulários]![Dialogo Vendas Objetos]![Data de Inicio] And [Formulários]![Dialogo Vendas Objetos]![Data de Termino]));

Sql da vendas do objeto vejo as somas os valores corretas sem duplicar

valeu pela orientação

Testei fazendo um relatório sem a Tabela Objeto e deu certo. Só não sei se é porque a tabela Objeto não tem chave primaria ou outro motivo.

Boa tarde Juares
vou olhar aqui

a tabela de objetos é ligado com a vendas pelo CódigoDaVenda

Bom dia Todos



sql do relatorio

SELECT Vendas.CódigoDaVenda, Objetos.id_EspLentes, Clientes.NomeCliente, [Especie de Lentes].Descricao, Vendas.CódigoDoBloco, Vendas.QuantDePres, Vendas.ValorDaVenda, Vendas.DataDaVenda, [Vendas Produtos].Data, Filiais.CódigoDaFilial, Filiais.Filial, Avg([PreçoDeVenda_Compras]+[ValorLentes]) AS VrLenArm, Objetos.PreçoObjeto, [Especie de Lentes].Optometria, [Especie de Lentes].ValorLentes, [Vendas Produtos].CódigoDoCLiente, Avg([Compras Produtos].PreçoDeVenda_Compras) AS MédiaDePreçoDeVenda_Compras, [PreçoObjeto]-[VrLenArm] AS VrDifere
FROM (Clientes INNER JOIN (([Vendas Produtos] INNER JOIN (Vendas INNER JOIN Filiais ON Vendas.CódigoDaFilial = Filiais.CódigoDaFilial) ON [Vendas Produtos].CódigoDoCLiente = Vendas.CódigoDoCliente) INNER JOIN [Compras Produtos] ON [Vendas Produtos].CódProduto_Compras = [Compras Produtos].CódProduto_Compras) ON Clientes.CódigoDoCLiente = Vendas.CódigoDoCliente) INNER JOIN ([Especie de Lentes] INNER JOIN Objetos ON [Especie de Lentes].Id_EspLentes = Objetos.id_EspLentes) ON Vendas.CódigoDaVenda = Objetos.CódigoDaVenda
GROUP BY Vendas.CódigoDaVenda, Objetos.id_EspLentes, Clientes.NomeCliente, [Especie de Lentes].Descricao, Vendas.CódigoDoBloco, Vendas.QuantDePres, Vendas.ValorDaVenda, Vendas.DataDaVenda, [Vendas Produtos].Data, Filiais.CódigoDaFilial, Filiais.Filial, Objetos.PreçoObjeto, [Especie de Lentes].Optometria, [Especie de Lentes].ValorLentes, [Vendas Produtos].CódigoDoCLiente
HAVING (((Vendas.DataDaVenda) Between [Formulários]![Dialogo Vendas Objetos]![Data de Inicio] And [Formulários]![Dialogo Vendas Objetos]![Data de Termino]) AND (([Vendas Produtos].Data) Between [Formulários]![Dialogo Vendas Objetos]![Data de Inicio] And [Formulários]![Dialogo Vendas Objetos]![Data de Termino]));

vou dar como resolvido
qualquer duvida eu volto
Agradeço
Grato pelas dicas
show

Helder