Boa tarde,
Estou desenvolvendo um BI para trazer valores de saldos no período de um ano atras. Já estudei o MATR260, mas não consegue entender como ele demonstrar o saldo da database retroativa.
Alguém tem uma sentença sql para me ajudar nesta analise?
Boa tarde,
Existe uma função que te retorna os valores se ajudar é CalcEst(codi.produto,local,data)
Mauro,
Não tem um modo fácil para fazer isso, tem que verificar os movimentos na SD3, SD1 e SD2 até a data que você que e fazer o cálculo.
Boa tarde, Realmente Tiago, conheço a CalcEst, porem só dentro do protheus teria como utilizar. Mas estou utilizando o Power BI para criar o dashboard, fora do protheus, apenas utilizando o SQL
Felipe, estou ja analisando as tabelas SB9, SD1, SD2 e SD3, mas sem muito sucesso.
Segue a sentença que fiz:
SELECT '' AS DOCUMENTO, RTRIM(B9COD) AS CODIGO, B9_LOCAL AS LOCAL, B9_DATA AS DATA, B9_QINI AS QUANT, B1.B1_UPRC AS VLR, B1_TIPO AS TIPO, RTRIM(B1_DESC) AS DESCRICAO, BM.BM_GRUPO AS GRUPO FROM SB9010 B9 INNER JOIN SB1010 B1 ON B1.B1_COD = B9.B9_COD INNER JOIN SBM010 BM ON BM.BM_GRUPO = B1.B1_GRUPO WHERE B9.B9_DATA <> '' AND B9.B9_QINI > 0 AND B1.B1_TIPO IN ('MP','PA','II','OI','ME') AND B9_LOCAL NOT IN ('05','06','07','11') AND B9.D_E_L_E_T <> '' AND B1.DE_L_E_T <> '' AND BM.DE_L_E_T <> '' UNION SELECT F1.F1DOC AS DOCUMENTO, RTRIM(D1_COD) AS CODIGO, D1.D1_LOCAL AS LOCAL, F1.F1_DTDIGIT AS DATA, D1_QUANT AS QUANT, B1.B1_UPRC AS VLR, B1_TIPO AS TIPO, RTRIM(B1_DESC) AS DESCRICAO, BM.BM_GRUPO AS GRUPO FROM SD1010 D1 INNER JOIN SF1010 F1 ON F1.F1_DOC = D1.D1_DOC AND F1.F1_FORNECE = D1.D1_FORNECE INNER JOIN SF4010 F4 ON F4.F4_CODIGO = D1.D1_TES INNER JOIN SB1010 B1 ON B1.B1_COD = D1.D1_COD INNER JOIN SBM010 BM ON BM.BM_GRUPO = B1.B1_GRUPO WHERE F1.F1_DTDIGIT >= '20190101' AND F4.F4_ESTOQUE = 'S' AND B1.B1_TIPO IN ('MP','PA','II','OI','ME') AND D1_LOCAL NOT IN ('05','06','07','11') AND D1.D_E_L_E_T <> '' AND F1.DE_L_E_T <> '' AND F4.DE_L_E_T <> '' AND B1.DE_L_E_T <> '' AND BM.DE_L_E_T <> '' UNION SELECT F2.F2DOC AS DOCUMENTO, RTRIM(D2_COD) AS CODIGO, D2.D2_LOCAL AS LOCAL, F2.F2_EMISSAO AS DATA, -D2_QUANT AS QUANT, B1.B1_UPRC AS VLR, B1_TIPO AS TIPO, RTRIM(B1_DESC) AS DESCRICAO, BM.BM_GRUPO AS GRUPO FROM SD2010 D2 INNER JOIN SF2010 F2 ON F2.F2_DOC = D2.D2_DOC AND F2.F2_CLIENTE = D2.D2_CLIENTE INNER JOIN SF4010 F4 ON F4.F4_CODIGO = D2.D2_TES INNER JOIN SB1010 B1 ON B1.B1_COD = D2.D2_COD INNER JOIN SBM010 BM ON BM.BM_GRUPO = B1.B1_GRUPO WHERE F2.F2_EMISSAO >= '20190101' AND F4.F4_ESTOQUE = 'S' AND B1.B1_TIPO IN ('MP','PA','II','OI','ME') AND D2_LOCAL NOT IN ('05','06','07','11') AND D2.D_E_L_E_T <> '' AND F2.DE_L_E_T <> '' AND F4.DE_L_E_T <> '' AND B1.DE_L_E_T <> '' AND BM.DE_L_E_T <> '' UNION SELECT D3DOC AS DOCUMENTO, RTRIM(D3_COD) AS CODIGO, D3_LOCAL AS LOCAL, D3_EMISSAO AS DATA, D3_QUANT AS QUANT, B1.B1_UPRC AS VLR, B1_TIPO AS TIPO, RTRIM(B1_DESC) AS DESCRICAO, BM.BM_GRUPO AS GRUPO FROM SD3010 D3 INNER JOIN SB1010 B1 ON B1.B1_COD = D3.D3_COD INNER JOIN SBM010 BM ON BM.BM_GRUPO = B1.B1_GRUPO WHERE D3.D3_EMISSAO >= '20190101' AND D3_TM <= '500' AND D3_LOCAL NOT IN ('05','06','07','11') AND B1.B1_TIPO IN ('MP','PA','II','OI','ME') AND D3.D_E_L_E_T <> '' AND B1.DE_L_E_T <> '' AND BM.DE_L_E_T <> '' UNION SELECT D3DOC AS DOCUMENTO, RTRIM(D3_COD) AS CODIGO, D3_LOCAL AS LOCAL, D3_EMISSAO AS DATA, -D3_QUANT AS QUANT, B1.B1_UPRC AS VLR, B1_TIPO AS TIPO, RTRIM(B1_DESC) AS DESCRICAO, BM.BM_GRUPO AS GRUPO FROM SD3010 D3 INNER JOIN SB1010 B1 ON B1.B1_COD = D3.D3_COD INNER JOIN SBM010 BM ON BM.BM_GRUPO = B1.B1_GRUPO WHERE D3.D3_EMISSAO >= '20190101' AND D3_TM > '500' AND D3_LOCAL NOT IN ('05','06','07','11') AND B1.B1_TIPO IN ('MP','PA','II','OI','ME') AND D3.D_E_L_E_T <> '' AND B1.DE_L_E_T <> '' AND BM.DE_L_E_T <> '*'
Mauro, vou dar uma analisada nessa query e te dou um retorno mais tarde. blz?
— FELIPE CAIADO ALMEIDA 10 de Feb de 2020Cara não é nada fácil, melhor criar um webservice que executa a calcest para você... Caso contrário você pode utilizar como já te disseram, SB9, SD1, SD2 e SD3 mesmo.
Mauro,
Tenho essa consulta que fiz para onde trabalho pois 'zoaram' as tabelas de estoques e a diretoria precisava dos saldos retroativos para comparar o SPED....passei uma temporada quebrando a cabeça e consegui um bom resultado e utilizo sempre quando fecho o estoque. Espero que ajude.
--COMPRAS (SD1) (até o periodo) - VENDAS (SD2) (ATÉ O PERIODO) = POSIÇÃO ESTOQUES
--ENTRADAS NF
DECLARE @DATAINI AS VARCHAR(10)
DECLARE @DATAFIM AS VARCHAR(10)
SET @DATAINI = '20210731' ---DATA DO FECHAMENTO ESTOQUE
SET @DATAFIM = '20210831' --- DATA FINAL DO PERIODO DE POSIÇÃO
SELECT PRODUTOS.B1_COD,
PRODUTOS.B1_POSIPI,
PRODUTOS.B1_DESC,
CASE WHEN PRODUTOS.B1_MSBLQL = '1' THEN 'INATIVO' ELSE 'ATIVO'
END AS 'SITUAÇÃO',
PRODUTOS.B1_TIPO,
PRODUTOS.B1_UM,
PRODUTOS.B1_GRUPO,
(
CAST(
( ISNULL((SELECT SUM(SB9.B9QINI) FROM SB9010 SB9 WHERE SB9.D_E_L_E_T = '' AND SB9.B9_COD = PRODUTOS.B1_COD AND SB9.B9_DATA = @DATAINI),0) --SALDO INICIAL
ISNULL((SELECT SUM(SD1.D1QUANT) FROM SD1010 SD1, SF4010 SF4 WHERE SF4.D_E_L_E_T= '' AND SD1.DE_L_E_T = '' AND SF4.F4_ESTOQUE = 'S' AND SF4.F4_TIPO = 'E' AND SD1.D1_TES = SF4.F4_CODIGO AND SD1.D1_DTDIGIT >= @DATAINI AND SD1.D1_DTDIGIT <= @DATAFIM AND D1_ORIGLAN <> 'LF' AND SD1.D1_COD = PRODUTOS.B1_COD),0) -- NF ENTRADAS
-
( ISNULL((SELECT SUM(SD2.D2QUANT) FROM SD2010 SD2, SF4010 SF4 WHERE SF4.D_E_L_E_T= '' AND SD2.DE_L_E_T = '' AND SF4.F4_ESTOQUE = 'S' AND SF4.F4_TIPO = 'S' AND SD2.D2_TES = SF4.F4_CODIGO AND SD2.D2_EMISSAO >= @DATAINI AND SD2.D2_EMISSAO <= @DATAFIM AND D2_ORIGLAN <> 'LF' AND SD2.D2_COD = PRODUTOS.B1_COD),0) --NF SAIDAS
ISNULL((SELECT SUM(SD3.D3QUANT) FROM SD3010 SD3 WHERE SD3.D_E_L_E_T = '' AND SD3.D3_TM > '499' AND SD3.D3_EMISSAO >= @DATAINI AND SD3.D3_EMISSAO <= @DATAFIM AND D3_ESTORNO <> 'S' AND SD3.D3_COD = PRODUTOS.B1_COD),0) -- MOV SAIDAS
)
AS DECIMAL(12,2))
) AS 'SALDOS CALCULADOS',
CAST( ISNULL((SELECT SUM(SB9010.B9QINI) FROM SB9010 WHERE SB9010.D_E_L_E_T = '' AND SB9010.B9_COD = PRODUTOS.B1_COD AND SB9010.B9_DATA = @DATAFIM),0) AS DECIMAL(12,2)) AS 'SALDOS SB9'
FROM SB1010 PRODUTOS
WHERE PRODUTOS.DE_L_E_T = ''
GROUP BY PRODUTOS.B1_COD, PRODUTOS.B1_POSIPI, PRODUTOS.B1_DESC, PRODUTOS.B1_TIPO, PRODUTOS.B1_UM, PRODUTOS.B1_GRUPO, PRODUTOS.B1_MSBLQL
ORDER BY PRODUTOS.B1_COD, PRODUTOS.B1_DESC, PRODUTOS.B1_TIPO
Carlos Abreu
