- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Relatórios
- Relatório Produtos sem Movimentação
Perguntas Relatório Produtos sem Movimentação
- clistenis
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 97
- Obrigados Recebidos: 0
8 anos 8 meses atrás #30214
por clistenis
Relatório Produtos sem Movimentação foi criado por clistenis
Pessoal bom dia.
Estou em processo de auditoria, e os mesmos me pediram um relatório de produtos que não tiveram movimentação por exemplo a 60 dias.
Pesquisei no Protheus e não encontrei algo parecido, vocês sabem me informar se existe algo nos relatórios padrões ?
Obrigado a todos.
Clístenis
Estou em processo de auditoria, e os mesmos me pediram um relatório de produtos que não tiveram movimentação por exemplo a 60 dias.
Pesquisei no Protheus e não encontrei algo parecido, vocês sabem me informar se existe algo nos relatórios padrões ?
Obrigado a todos.
Clístenis
Por favor Acessar ou Registrar para participar da conversa.
- maurorafael
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 64
- Obrigados Recebidos: 0
8 anos 8 meses atrás #30215
por maurorafael
Respondido por maurorafael no tópico Relatório Produtos sem Movimentação
Pode ser uma query?
Depois tu ajusta para Advpl.
Depois tu ajusta para Advpl.
Por favor Acessar ou Registrar para participar da conversa.
- clistenis
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 97
- Obrigados Recebidos: 0
- maurorafael
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 64
- Obrigados Recebidos: 0
8 anos 8 meses atrás #30231
por maurorafael
Respondido por maurorafael no tópico Relatório Produtos sem Movimentação
Bom dia Clistenis, da uma ajustada nela pois possuimos uns campos personalizados, mas creio que a logica seja essa... qualquer duvida chama ai, abraço.
SELECT B2.B2_FILIAL AS "Filial",
TRIM(B1_COD) AS "Código",
TRIM(B1_DESC) AS "Descrição",
B2_QATU AS "Qtd Atual",
B2_CMFIM1 AS "Custo",
B2_QATU * B2_CMFIM1 AS "Val. Estoq.",
(SELECT MAX(TO_DATE(D2.D2_EMISSAO, 'YYYYMMDD'))
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
--AND D2.D2_EMISSAO < '20150601'
AND D2.D_E_L_E_T_ != '*'
) AS "Ultima Mov."
FROM SB1010 B1
INNER JOIN SB2010 B2
ON B2.B2_COD = B1.B1_COD
WHERE NOT EXISTS
(SELECT 1
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
AND D2.D2_EMISSAO > TO_CHAR(SYSDATE-60,'YYYYMMDD')
AND D2.D_E_L_E_T_ != '*'
)
AND B1_GRAO_ != '1'
AND EXISTS
(SELECT 1
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
AND D2.D2_EMISSAO < TO_CHAR(SYSDATE-60,'YYYYMMDD')
AND D2.D_E_L_E_T_ != '*'
)
AND B2_QATU > 0
GROUP BY B2.B2_FILIAL,
B1_DESC,
B1_COD,
B2.B2_COD,
B2_QATU,
B2_CMFIM1,
B2_LOCAL
ORDER BY "Val. Estoq." DESC,
B2.B2_FILIAL,
B1.B1_COD
SELECT B2.B2_FILIAL AS "Filial",
TRIM(B1_COD) AS "Código",
TRIM(B1_DESC) AS "Descrição",
B2_QATU AS "Qtd Atual",
B2_CMFIM1 AS "Custo",
B2_QATU * B2_CMFIM1 AS "Val. Estoq.",
(SELECT MAX(TO_DATE(D2.D2_EMISSAO, 'YYYYMMDD'))
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
--AND D2.D2_EMISSAO < '20150601'
AND D2.D_E_L_E_T_ != '*'
) AS "Ultima Mov."
FROM SB1010 B1
INNER JOIN SB2010 B2
ON B2.B2_COD = B1.B1_COD
WHERE NOT EXISTS
(SELECT 1
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
AND D2.D2_EMISSAO > TO_CHAR(SYSDATE-60,'YYYYMMDD')
AND D2.D_E_L_E_T_ != '*'
)
AND B1_GRAO_ != '1'
AND EXISTS
(SELECT 1
FROM SD2010 D2
WHERE B2.B2_FILIAL = D2_FILIAL
AND B2.B2_COD = D2_COD
AND D2.D2_EMISSAO < TO_CHAR(SYSDATE-60,'YYYYMMDD')
AND D2.D_E_L_E_T_ != '*'
)
AND B2_QATU > 0
GROUP BY B2.B2_FILIAL,
B1_DESC,
B1_COD,
B2.B2_COD,
B2_QATU,
B2_CMFIM1,
B2_LOCAL
ORDER BY "Val. Estoq." DESC,
B2.B2_FILIAL,
B1.B1_COD
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Relatórios
- Relatório Produtos sem Movimentação
Tempo para a criação da página:0.180 segundos