No artigo de hoje, vamos abordar alguns passos à executar, caso uma empresa mude para Lucro Real e já tenha alguns documentos de entrada lançados no sistema.

Antes de começarmos o tutorial, ressaltamos que o processo ideal é excluir os documentos de entrada e lançar eles novamente, após ter parametrizado o sistema para calcular o PIS e COFINS.

Mas se o prazo tiver curto, for poucas notas, ou até se quiser ir simulando numa base local, o tutorial abaixo é para você.

A ideia aqui, é por exemplo, supondo que havia poucas notas já lançadas, e elas precisam ter o PIS e COFINS ajustados.

O passo 1 é atualizar no documento de entrada, com as alíquotas necessárias e com a TES nova que controle o PIS e COFINS:

/* passo 1 - atualizar no documento de entrada */

UPDATE SD1010
SET
	D1_TES = '071',
	D1_BASIMP6 = D1_TOTAL - D1_VALICM,
	D1_ALQIMP6 = 1.65,
	D1_VALIMP6 = ROUND((D1_TOTAL - D1_VALICM) * 0.0165, 2),
	D1_BASIMP5 = D1_TOTAL - D1_VALICM,
	D1_ALQIMP5 = 7.60,
	D1_VALIMP5 = ROUND((D1_TOTAL - D1_VALICM) * 0.0760, 2)
WHERE
	D1_DOC = '000036656'
	AND D1_FORNECE = '002104'
	AND D_E_L_E_T_ = ' '

O passo 2, você precisa capturar o IDTRIB que esta gravado na SD1 para depois atualizar também no CBS e IBS:

/* passo 2 - atualizar a base do CBS e IBS */

--Pegar o IdTrib
SELECT D1_IDTRIB, * FROM SD1010 WHERE D1_DOC = '000036656' 	AND D1_FORNECE = '002104' AND D_E_L_E_T_ = ' '

Ainda no passo 2, após pegar o IDTRIB, você vai atualizar a base de cálculo (F2D_BASE) do CBS e IBS dessa nota:

--Atualizar conforme o IdTrib
UPDATE
	F2D010
SET
	F2D_BASE = (
	SELECT
		D1_TOTAL - D1_VALICM - D1_VALIMP6 - D1_VALIMP5
	FROM
		SD1010 SD1
	WHERE
		D1_IDTRIB = F2D_IDREL
		AND D_E_L_E_T_ = ' '
	)
WHERE
	F2D_IDREL = 'BD9E7465-9103-4111-881B-005056908921'

O passo 3, você precisa rodar o Reprocessamento do Livros Fiscais (MATA930) dessa NF que foi atualizada, para ele pegar as informações da SD1 e atualizar na SF3 e SFT.

Por fim, o passo 4, é necessário atualizar a parte de custo da entrada (MATA190) dessa NF que foi atualizada, pra ele atualizar o D1_CUSTO.

Lembrando que se forem fazer, rodem primeiro na base de testes, e validem as informações com o departamento fiscal da empresa.

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLProtheusTLPP