Últimas Novidades

Saiba o que cada tipo de movimento faz


Dentro do TOTVS Gestão de Estoque, Compras e Faturamento - antigo RM Nucleus - existe as parametrizações por tipo de movimento.
Mas a minha dúvida, era: Toda vez que se eu quisesse saber o que aquele tipo de movimento faz, eu tinha que ficar abrindo os parâmetros dele.
Pensando nisto, eu montei este script para me trazer as informações mais importantes referente aos movimentos.

SELECT
CASE B.CLASSIFICACAO
 WHEN '04.04.04' THEN 'Estoque > Requisição de Material'
 WHEN '04.04.05' THEN 'Estoque > Baixa de Estoque'
 WHEN '04.04.06' THEN 'Estoque > Transferências'
 WHEN '04.04.08' THEN 'Estoque > Produção > Movimentação'
 WHEN '04.06.01' THEN 'Compras > Solicitação de Compra'
 WHEN '04.06.02' THEN 'Compras > Cotação'
 WHEN '04.06.04' THEN 'Compras > Ordem de Compras'
 WHEN '04.06.05' THEN 'Compras > Recebimento de Materiais'
 WHEN '04.06.06' THEN 'Compras > Importação'
 WHEN '04.06.07' THEN 'Compras > Aquisição de Serviços'
 WHEN '04.06.08' THEN 'Compras > Devolução de Compras'
 WHEN '04.07' THEN 'Outras Movimentações > Controle de Imobilizado'
 WHEN '04.08.01' THEN 'Vendas > Pedido de Vendas'
 WHEN '04.08.02' THEN 'Vendas > Faturamento > Movimentação'
 WHEN '04.08.03' THEN 'Vendas > Exportações'
 WHEN '04.08.04' THEN 'Vendas > Devolução de Vendas'
 WHEN '04.09' THEN 'Outras Movimentações > Outras Movimentações'
 ELSE B.CLASSIFICACAO + ' - A localizar'
END LOCAL, A.CODTMV, B.NOME,
CASE A.EFEITOSALDOA1 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO_BALANCO,
CASE A.EFEITOSALDOA2 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO_ATUAL,
CASE A.EFEITOSALDOA3 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END PEDIDO_FORNECEDOR,
CASE A.EFEITOSALDOA4 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END PEDITO_CLIENTE,
CASE A.EFEITOSALDOA5 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO5,
CASE A.EFEITOSALDOA6 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO6,
CASE A.EFEITOSALDOA7 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO7,
CASE A.EFEITOSALDOA8 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO8,
CASE A.EFEITOSALDOA9 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO9,
CASE A.EFEITOSALDOA10 WHEN 'N' THEN 'Nada' WHEN 'A' THEN 'Aumenta' WHEN 'D' THEN 'Diminui' ELSE 'xxx' END SALDO10,
CASE B.FATURA WHEN 1 THEN 'Gera Financeiro' ELSE 'Não Gera' END GERA_FINANCEIRO,
CASE B.CONTABILLAN
	WHEN 'N' THEN 'Nâo Contábil'
	WHEN 'B' THEN 'Baixa Contábil'
	WHEN 'C' THEN 'Contábil'
	WHEN 'A' THEN 'A Contabilizar'
	ELSE 'Sem parametrização'
END CONT_FINANCEIRO,
CASE A.GERAESCRITURACAO WHEN 1 THEN 'Gera Escrituração' ELSE 'Não Gera' END ESCRITURACAO,
CASE WHEN B.USAREVC BETWEEN 1 AND 3 THEN 'Contabiliza' ELSE 'Não Contabiliza' END CONTABILIZACAO,
CASE A.USATRBIT WHEN 1 THEN 'Sim' ELSE 'Não' END TRIBUTACAO_ITEM,
CASE B.USATRBMOV WHEN 1 THEN 'Sim' ELSE 'Não' END TRIBUTACAO_MOVIMENTO,
CASE C.NFEESTADUAL WHEN 1 THEN 'Gera manual' WHEN 2 THEN 'Gera Automático' ELSE 'Não' END NOTA_ESTADUAL,
CASE C.NFEMUNICIPAL WHEN 1 THEN 'Gera manual' WHEN 2 THEN 'Gera Automático' ELSE 'Não' END NOTA_MUNICIPAL,
CASE C.NFCE WHEN 1 THEN 'Gera manual' WHEN 2 THEN 'Gera Automático' ELSE 'Não' END NFCe,
D.DESCRICAO MOTIVO_REFERENCIA,
CASE A.INTEGRARBONUM WHEN 1 THEN 'Integrado Patrimônio' ELSE 'Não Integrado' END PATRIMONIO,
CONVERT(VARCHAR(15), (SELECT MAX(X.DATAEMISSAO)
 FROM TMOV X WITH (NOLOCK)
 WHERE X.CODCOLIGADA = B.CODCOLIGADA
 AND X.CODTMV = B.CODTMV), 103) ULTIMO_MOVIMENTO
FROM TITMTMV A WITH (NOLOCK)
 JOIN TTMV B WITH (NOLOCK) ON B.CODCOLIGADA = A.CODCOLIGADA AND B.CODTMV = A.CODTMV
 JOIN TTMVEXT C WITH (NOLOCK) ON C.CODCOLIGADA = B.CODCOLIGADA AND C.CODTMV = B.CODTMV
 LEFT JOIN TMOTIVOREFMOV D WITH (NOLOCK) ON D.CODCOLIGADA = C.CODCOLIGADA AND D.IDMOTIVOREF = C.IDMOTIVOREF
WHERE A.CODCOLIGADA = 1
ORDER BY A.CODTMV
Assim eu consigo saber o que cada destes movimento faz.
Gostou da dica? Comente e compartilhe.

2 comentários:

  1. Muito bem bolado! Parabéns!

    ResponderExcluir
    Respostas
    1. Que bom que gostou @Silas. Aqui tem várias dicas do sistema TOTVS. Qualquer coisa estamos a disposição, e no cabeçalho da página tem nossos contatos, caso precise.

      Excluir