[Resolvido]Custo médio ponderado

Boa tarde.
Estou com dificuldade em um calculo

Havendo registro de entrada e saida o CMP é calculado o que é correto, mas se haver somente entrada duas consultas não fazem o calclo

e preciso que faça.

as consultas são

Cs_EstoqueAtual e automaticamente fara a cs_EstoqueFinanceiro

Agradeço e muito ajuda par resolver.


https://www.dropbox.com/s/71qmvevu9og94bo/estoque%20certo%20ATUAL.rar?dl=0

Boa noite,
As consulta de saldos exigem sempre muita perícia, conforme forem montadas as tabelas de origem dos dados

veja se funciona nas várias situações possíveis
SELECT tbl_produto.Idproduto, tbl_produto.Produto, cs_SaidaSintetica.unidade, cs_EntradaSintetica.SomaDeqtdrecebida AS Entrada, cs_SaidaSintetica.SomaDeqtdSaida AS Saida, (Nz([Entrada])-(Nz([saida]))) AS estoque
FROM (tbl_produto INNER JOIN cs_EntradaSintetica ON tbl_produto.IdProduto = cs_EntradaSintetica.IdProduto) LEFT JOIN cs_SaidaSintetica ON tbl_produto.IdProduto = cs_SaidaSintetica.IdProduto
ORDER BY tbl_produto.Produto;

SELECT tbl_produto.Idproduto, tbl_produto.Produto, tbl_produto.unidade, cs_EntradaSintetica.SomaDeqtdrecebida AS QEntrada, cs_EntradaSintetica.[R$TotalEntrada], cs_SaidaSintetica.SomaDeqtdSaida AS QSaida, cs_SaidaSintetica.Total AS [R$TotaSaida], cs_EstoqueAtual.estoque, Format([R$TotalEntrada]-[R$TotaSaida],"#.00") AS [R$Estoque], Format([R$Estoque]/[estoque],"#.000000") AS CMP
FROM ((tbl_produto INNER JOIN cs_EntradaSintetica ON tbl_produto.IdProduto = cs_EntradaSintetica.IdProduto) LEFT JOIN cs_SaidaSintetica ON tbl_produto.IdProduto = cs_SaidaSintetica.IdProduto) LEFT JOIN cs_EstoqueAtual ON tbl_produto.IdProduto = cs_EstoqueAtual.Idproduto
GROUP BY tbl_produto.Idproduto, tbl_produto.Produto, tbl_produto.unidade, cs_EntradaSintetica.SomaDeqtdrecebida, cs_EntradaSintetica.[R$TotalEntrada], cs_SaidaSintetica.SomaDeqtdSaida, cs_SaidaSintetica.Total, cs_EstoqueAtual.estoque
ORDER BY tbl_produto.Produto;

Boa noite colega Alexandre.

No seu código somente acrescentar o nz onde efetua o calculo do CMP, estava retornando erro

Format(Nz([R$Estoque])/Nz([Estoque]),"#.000000") AS CMP
FROM tbl_produto
ORDER BY tbl_produto.Produto;

e assim efetua todos os calculos mesmo não havendo saida.

Alexandre eu encontrei outra maneira de efetuar os calculos sem o registro da saida.
Assim:
Eliminei a consulta Cs_EstoqueFinanceiro e realizei todos os cálculos no no cs_estoqueatual.

ficou assim:

SELECT tbl_produto.Idproduto, tbl_produto.Produto, tbl_produto.unidade, IIf(IsNull([IdProduto]),0,DSum("[QuantEntrada]","tbl_EntradaDetalhe","[IdProduto]=" & [IdProduto])) AS QEntrada, IIf(IsNull([IdProduto]),0,DSum("[SubTotalE]","tbl_EntradaDetalhe","[IdProduto]=" & [IdProduto])) AS [R$Entrada], IIf(IsNull([IdProduto]),0,DSum("[QuantSaida]","tbl_SaidaDetalhe","[IdProduto]=" & [IdProduto])) AS QSaida, IIf(IsNull([IdProduto]),0,DSum("[QuantSaida]","tbl_SaidaDetalhe","[IdProduto]=" & [IdProduto])) AS [R$Saida], Nz([QEntrada])-Nz([QSaida]) AS Estoque, Nz([R$Entrada])-Nz([R$Saida]) AS [R$Estoque], Nz([R$Estoque])/Nz([Estoque]) AS CMP
FROM tbl_produto
ORDER BY tbl_produto.Produto;

A formatação dos campos fiz no form.


Enfim, muito obrigado Alexandre Neves. pela sua ajuda.

Estou melhorando o sistema com ajuda do forum e quando finalizar irei disponibilizar no repositorio.

Opa...resolvido