Consulta de Produtos (NCM, CustoTotal, PrecoTotal, Forneced)

SELECT IdProduto,
Estq_cadProdutos.IdSetorProduto,
Estq_cadProdutos.IdClassProd3,
(SELECT Descricao FROM Estq_cadClassProd4 WHERE Estq_cadClassProd4.IdClassProd4=Estq_cadProdutos.IdClassProd4) AS NCM,
Estq_cadProdutos.IdClassProduto,
Codigo,
Estq_cadProdutos.Descricao,
Estq_cadSetores.Descricao AS Setor,
Estq_cadProdutos.LocalArm,
Estq_cadProdutos.Observacoes,
(SELECT Codigo FROM Forn_cadFornecedor WHERE IdFornecedor=(SELECT TOP 1 IdCliForn AS Custo FROM Estq_auxMovimentoEstoque   WHERE   Estq_auxMovimentoEstoque.IdProduto = Estq_cadProdutos.IdProduto   AND Sentido=1 AND custoTotal IS NOT NULL AND custoTotal > 0 ORDER BY DATA DESC, IdMovimentoEstoque DESC)) AS CodigoFornecedor,
(SELECT Nome FROM Forn_cadFornecedor WHERE IdFornecedor=(SELECT TOP 1 IdCliForn AS Custo FROM Estq_auxMovimentoEstoque   WHERE   Estq_auxMovimentoEstoque.IdProduto = Estq_cadProdutos.IdProduto   AND Sentido=1 AND custoTotal IS NOT NULL AND custoTotal > 0 ORDER BY DATA DESC, IdMovimentoEstoque DESC)) AS Fornecedor,
(SELECT TOP 1 (custoTotal/Qtde) AS Custo FROM Estq_auxMovimentoEstoque   WHERE   Estq_auxMovimentoEstoque.IdProduto = Estq_cadProdutos.IdProduto   AND Sentido=1 AND custoTotal IS NOT NULL AND custoTotal > 0 ORDER BY DATA DESC, IdMovimentoEstoque DESC) AS Custo,
(SELECT TOP 1 (custoTotal/Qtde) AS Custo FROM Estq_auxMovimentoEstoque   WHERE   Estq_auxMovimentoEstoque.IdProduto = Estq_cadProdutos.IdProduto   AND Sentido=1 AND custoTotal IS NOT NULL AND custoTotal > 0 ORDER BY DATA DESC, IdMovimentoEstoque DESC)*
(CASE WHEN (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual    FROM Estq_auxMovimentoEstoque    WHERE IdProduto=Estq_cadProdutos.IdProduto) IS NULL    THEN 0.000000   ELSE (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual FROM Estq_auxMovimentoEstoque WHERE IdProduto=Estq_cadProdutos.IdProduto) END) AS CustoTotal,
Estq_cadClassProduto.Descricao AS Classificacao,    Unidade,    Minimo,
(CASE WHEN (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual    FROM Estq_auxMovimentoEstoque    WHERE IdProduto=Estq_cadProdutos.IdProduto) IS NULL    THEN 0.000000   ELSE (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual FROM Estq_auxMovimentoEstoque WHERE IdProduto=Estq_cadProdutos.IdProduto) END) AS Atual,
PrecoVenda,
PrecoVenda*
(CASE WHEN (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual    FROM Estq_auxMovimentoEstoque    WHERE IdProduto=Estq_cadProdutos.IdProduto) IS NULL    THEN 0.000000   ELSE (SELECT SUM((CASE WHEN Sentido=1 THEN CONVERT(DECIMAL(18,4),Qtde) ELSE (-1)*CONVERT(DECIMAL(18,4),Qtde) END)) AS Atual FROM Estq_auxMovimentoEstoque WHERE IdProduto=Estq_cadProdutos.IdProduto) END) AS VendaTotal,
PrecoDePara,
(SELECT PRECO FROM Estq_cadPrecosProdutos WHERE ProdutoID = Estq_cadProdutos.IdProduto AND DescricaoPrecoID = (SELECT DescricaoPrecoID FROM Estq_cadDescricaoPrecos WHERE Mnemonico = 'ATACADO')) AS PrecoAtacado,   (SELECT PRECO FROM Estq_cadPrecosProdutos WHERE ProdutoID = Estq_cadProdutos.IdProduto AND DescricaoPrecoID = (SELECT DescricaoPrecoID FROM Estq_cadDescricaoPrecos WHERE Mnemonico = 'ESPECIAL')) AS PrecoEspecial,   CodigoForn AS CodReferencia
FROM Estq_cadProdutos
LEFT JOIN Estq_cadClassProduto  ON Estq_cadProdutos.IdClassProduto=Estq_cadClassProduto.IdClassProduto
LEFT JOIN Estq_cadSetores  ON Estq_cadProdutos.idSetorProduto =Estq_cadSetores.IdSetorProduto
WHERE Estq_cadProdutos.Ativado=1 ORDER BY IdProduto DESC