Exibir código-fonte para Divergência Estoque em lançamentos de Ajuste

Ao rodar ao módulo de Acerto de estoque, e gerar produtos com divergência, abaixo as formas pra verificar a quantidade que vai colocar no lançamento.

 A quantidade do acerto de estoque pode ser obtida na pesquisa de movimentação de estoque, filtrando por setor, deve ser subtraído o saldo atual do saldo anterior.


Também pode ser obtida por uma instrução SQL que vou enviar a seguir, onde a quantidade do acerto é a coluna Diferença, sempre observando o setor e empresa.


 SELECT Estoque.SetoresEmpresaCodigo, Estoque.SetoresCodigo, Estoque.ProdutoEstoqueCodigo, SUM(QtdeUsada) QtdeUsadaEstoqueIndevido , (SELECT ISNULL(SUM(Saldo), 0) FROM Estoque E2 WHERE EXISTS (SELECT 1 FROM EstoqueMovto WHERE EstoqueMovto.Operacao = 1 AND EstoqueMovto.Lote = E2.Lote AND EstoqueMovto.SetoresEmpresaCodigo = E2.SetoresEmpresaCodigo AND EstoqueMovto.SetoresCodigo = E2.SetoresCodigo) AND E2.Baixado = 0 AND E2.SetoresEmpresaCodigo = Estoque.SetoresEmpresaCodigo AND E2.SetoresCodigo = Estoque.SetoresCodigo AND E2.ProdutoEstoqueCodigo = Estoque.ProdutoEstoqueCodigo) as TeoricamenteDisponivel, (SELECT ISNULL(SUM(Saldo), 0) FROM Estoque E2 WHERE EXISTS (SELECT 1 FROM EstoqueMovto WHERE EstoqueMovto.Operacao = 1 AND EstoqueMovto.Lote = E2.Lote AND EstoqueMovto.SetoresEmpresaCodigo = E2.SetoresEmpresaCodigo AND EstoqueMovto.SetoresCodigo = E2.SetoresCodigo) AND E2.Baixado = 0 AND E2.SetoresEmpresaCodigo = Estoque.SetoresEmpresaCodigo AND E2.SetoresCodigo = Estoque.SetoresCodigo AND E2.ProdutoEstoqueCodigo = Estoque.ProdutoEstoqueCodigo) - SUM(QtdeUsada) AS Diferença FROM Estoque WHERE NOT EXISTS (SELECT 1 FROM EstoqueMovto WHERE EstoqueMovto.Operacao = 1 AND EstoqueMovto.Lote = Estoque.Lote AND EstoqueMovto.SetoresEmpresaCodigo = Estoque.SetoresEmpresaCodigo AND EstoqueMovto.SetoresCodigo = Estoque.SetoresCodigo) AND Estoque.QtdeUsada > 0 GROUP BY Estoque.SetoresEmpresaCodigo, Estoque.SetoresCodigo, Estoque.ProdutoEstoqueCodigo, Estoque.Data order by Estoque.ProdutoEstoqueCodigo