Criação de novo pergunte "Considera Pagto. Antecipado?" na geração dos dados para a DIRF(FINA401)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Financeiro

Rotina:

Rotina	Nome Técnico
FINA401	Gera dados p/ DIRF

Cadastros Iniciais:

Contas a pagar

Parâmetro(s):

MV_PABRUTO
MV_COMPCP
MV_BP10925
MV_PAPRIME
MV_BX10925

Tickets relacionados

Requisito (informe o requisito relacionado):

MSERV-1087

País(es):

Brasil

Banco(s) de Dados:

Todos homologados pelo TOP

Tabelas Utilizadas:

SE2, SE5, SRL, SR4

Sistema(s) Operacional(is):

Todos homologados

Descrição

Implementado o novo pergunte " Considera Pagto Antecipado?" para o envio dos impostos IRRF, PIS, COFINS e CSLL para a DIRF, onde a configuração de retenção seja na baixa, gerados a partir de um pagamento antecipado (PA).

Isto se faz necessário uma vez que as configurações de retenção de IR e PCC sendo na baixa do título e este for compensado com um PA, seja enviado para a DIRF as informações de retenções da PA, pois o título principal não possui os títulos do tipo "TX" de impostos.

Já para os casos em que a retenção de IR e PCC são na emissão, mantém o envio como é feito atualmente, ou seja, será considerado sempre o TX gerado pelo titulo principal.

Observações:

A utilização deste pergunte pode onerar a performance da rotina, devido a necessidade de realizar buscas na SE5 e SE2 para recompor o valor compensado do título principal.
Inicialmente esta funcionalidade será somente para a configuração de retenção IR e PCC na baixa e pessoa jurídica.
No caso do TX pertencer a um PA, se o pergunte "Considera Data?" e "Considera Data PCC" for igual "DT Baixa", será considerado o campo Emissão Digit(E2_EMIS1) da PA, a PA com baixa é desconsiderado pois entende-se que houve uma devolução/cancelamento do pagamento.

Atualizações da rotina

Criação de Perguntas no arquivo SX1 – Cadastro de Perguntes:

Pergunte	Considera Pagto. Antecipado?
Nome
Grupo	FIN401
Ordem	10
Tipo	N
Tamanho	1

Procedimento para Utilização

Descreva os procedimentos, passo a passo (caso de uso), que serão realizados pelos usuários para que a melhoria seja visualizada identificando as seguintes informações:
Localização da rotina no menu;
Localização dos novos campos e/ou perguntas e respectivas pastas de cadastro que são visualizadas pelo usuário;
Caso seja necessário ter algum cadastro feito previamente, faça uma observação.

Exemplo:

1. No Plano de Saúde (SIGAPLS), acesse Atualizações / Produto Saúde / Produto Saúde (PLSA800).

O sistema apresenta a janela de produtos cadastrados.

2. Posicione o cursor em um produto e clique em Alterar.

3. Na pasta Cobertura/Carências selecione a subpasta Tipo de Prestador.

4. Dê duplo clique no campo TP Prestador (BCW_TIPPRE).

O sistema apresenta a janela Tipo de Prestador – Coparticipação – Alterar.

5. Informe os dados conforme orientação do help de campo e observe o preenchimento do novo campo:

Som. p/Compra (BCW_SOMCOM): selecione Sim para indicar se a coparticipação cadastrada será válida somente para efeito de compra de procedimentos ou Não, caso contrário.

6. Confira os dados e confirme.

Vídeo

Vídeo hospedado no youtube e inserido no template por meio da macro Widget Connector.

** Canal do youtube e software de vídeoem definição.

Título do Vídeo:	Disponibilizado pelo Marketing.
Introdução:	Disponibilizado pelo Marketing.
Passo a Passo:	Capturar diretamente do sistema.
Finalização:	Disponibilizado pelo Marketing.

Seguem abaixo alguns exemplos de envio dos dados para a DIRF, considerando cada situação.
1) Caso 1: NF e PA de mesmo valor
SE2:
Tipo Valor Data Emis TitPai CodRet
NF 10.000,00 01/01/16 1708
PA 10.000,00 01/01/16 1708
TX-IR 150,00 01/01/16 PA 1708
TX-PIS 65,00 01/01/16 PA 5952
TX-COFINS 300,00 01/01/16 PA 5952
TX-CSLL 100,00 01/01/16 PA 5952
NF e PA em aberto:
Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim
Será enviado para a DIRF os PA e seus TXs e a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 Jan
PA 10000,00 0,00 1708 jan
TX-IR 0,00 150,00 1708 Jan PA
PA 10.000,00 0,00 5952 Jan
TX-PIS 0,00 65,00 5952 Jan PA
TX-COFINS 0,00 300,00 5952 Jan PA
TX-CSLL 0,00 100,00 5952 Jan PA

2) Compensado a NF x PA acima (Compensação total).
Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim
Será enviado para a DIRF os PA e seus TXs e a NF não será levada pois foi compensada:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
PA 10000,00 0,00 1708 jan
TX-IR 0,00 150,00 1708 Jan PA
PA 10.000,00 0,00 5952 Jan
TX-PIS 0,00 65,00 5952 Jan PA
TX-COFINS 0,00 300,00 5952 Jan PA
TX-CSLL 0,00 100,00 5952 Jan PA

3) Caso 2 : NF com valor maior compensada com PA com valor menor.
SE2:
Tipo Valor Data Emis TitPai CodRet
NF 10.000,00 01/01/16 1708
PA 5.000,00 01/01/16 1708
TX-IR 75,00 01/01/16 PA 1708
TX-PIS 32,50 01/01/16 PA 5952
TX-COFINS 150,00 01/01/16 PA 5952
TX-CSLL 50,00 01/01/16 PA 5952
NF e PA em aberto:
Gerar dados para a DIRF informando data de emissão de janeiro com a NF e PA em aberto:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim
Será enviado para a DIRF os PA e seus TXs e a NF total:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10.000,00 0,00 1708 Jan
PA 5.000,00 0,00 1708 jan
TX-IR 0,00 75,00 1708 Jan PA
PA 5.000,00 0,00 5952 Jan
TX-PIS 0,00 32,50 5952 Jan PA
TX-COFINS 0,00 150,00 5952 Jan PA
TX-CSLL 0,00 50,00 5952 Jan PA

Compensar a NF com a PA:
Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim
Será enviado para a DIRF os PA e seus TXs e a NF será levada somente o valor restante que não foi compensada:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 5.000,00 0,00 1708 Jan
PA 5.000,00 0,00 1708 jan
TX-IR 0,00 75,00 1708 Jan PA
PA 5.000,00 0,00 5952 Jan
TX-PIS 0,00 32,50 5952 Jan PA
TX-COFINS 0,00 150,00 5952 Jan PA
TX-CSLL 0,00 50,00 5952 Jan PA

4) Realizado a baixa do restante da NF acima em Fevereiro, temos na SE2:
SE2:
Tipo Valor Data Emis TitPai CodRet
NF 10.000,00 01/01/16 1708
TX-IR 75,00 01/02/16 NF 1708
TX-PIS 32,50 01/02/16 NF 5952
TX-COFINS 150,00 01/02/16 NF 5952
TX-CSLL 50,00 01/02/16 NF 5952
PA 5.000,00 01/01/16 1708
TX-IR 75,00 01/01/16 PA 1708
TX-PIS 32,50 01/01/16 PA 5952
TX-COFINS 150,00 01/01/16 PA 5952
TX-CSLL 50,00 01/01/16 PA 5952

Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF e os TXs gerados pela NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 10000,00 0,00 1708 jan
TX-IR 0,00 75,00 1708 Jan NF
NF 5.000,00 0,00 5952 Jan
TX-PIS 0,00 32,50 5952 Jan NF
TX-COFINS 0,00 150,00 5952 Jan NF
TX-CSLL 0,00 50,00 5952 Jan NF
Observe que o valor da NF para o Cod Ret 1708 está o valor cheio, pois deve-se levar todo o rendimento.

Considera Pagto Antecipado? Sim
Será enviado para a DIRF a PA e os TXs gerados pela PA e a NF descontado o valor compensado e os TXs gerados pela NF na baixa :
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes TitPai
NF 5.000,00 0,00 1708 jan
PA 5.000,00 0,00 1708 Jan
TX-IR 0,00 75,00 1708 Jan NF
TX-IR 0,00 75,00 1708 Jan PA
NF 5.000,00 0,00 5952 Jan
PA 5.000,00 0,00 5952 Jan
TX-PIS 0,00 32,50 5952 Jan NF
TX-COFINS 0,00 150,00 5952 Jan NF
TX-CSLL 0,00 50,00 5952 Jan NF
TX-PIS 0,00 32,50 5952 Jan PA
TX-COFINS 0,00 150,00 5952 Jan PA
TX-CSLL 0,00 50,00 5952 Jan PA

5) Caso 3: NF com valor menor compensada com PA com valor maior.
SE2:
Tipo Valor Data Emis TitPai CodRet
NF 6.000,00 01/01/16 1708
PA 10.000,00 01/01/16 1708
TX-IR 150,00 01/01/16 PA 1708
TX-PIS 65,00 01/01/16 PA 5952
TX-COFINS 300,00 01/01/16 PA 5952
TX-CSLL 100,00 01/01/16 PA 5952

NF e PA em aberto:
Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes Titpai
NF 6.000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim

Será enviado para a DIRF os PA e seus TXs e a NF total:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes Titpai
NF 6.000,00 0,00 1708 Jan
PA 10.000,00 0,00 1708 jan
TX-IR 0,00 150,00 1708 Jan PA
PA 5.000,00 0,00 5952 Jan
TX-PIS 0,00 65,00 5952 Jan PA
TX-COFINS 0,00 300,00 5952 Jan PA
TX-CSLL 0,00 100,00 5952 Jan PA

Compensar a NF com a PA:

Gerar dados para a DIRF informando data de emissão de janeiro:
Considera Pagto Antecipado? Não
Será enviado para a DIRF somente a NF:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes
NF 6.000,00 0,00 1708 Jan

Considera Pagto Antecipado? Sim
Será enviado para a DIRF os PA e seus TXs e a NF não será levada pois foi totalmente compensada com a PA:
Tipo Rendimento Trib. Imposto Retido Cod Ret Mes
PA 10.000,00 0,00 1708 jan
TX-IR 0,00 150,00 1708 Jan PA
PA 10.000,00 0,00 5952 Jan
TX-PIS 0,00 65,00 5952 Jan PA
TX-COFINS 0,00 300,00 5952 Jan PA
TX-CSLL 0,00 100,00 5952 Jan PA

Ponto de Entrada

Descrição:

Informe o Menu em que estará localizada a rotina

Localização:

Informe o Submenu em que estará localizada a rotina

Eventos:

Informe o Título da rotina

Programa Fonte:

Informe o Fonte da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Retorno:

Nome	Tipo	Descrição	Obrigatório

Exemplo:

#Include 'Protheus.ch'

User Function CN120ALT()

Local aCab:= PARAMIXB[1]

Local cTipo:= PARAMIXB[2]

If cTipo == '1'

aCab[4][2]:= 'NF' //Validações do usuário

EndIf

Return aCab

Árvore de páginas

Versões comparadas

Versão antiga 2

Nova versão 114

Chave

Criação de novo pergunte "Considera Pagto. Antecipado?" na geração dos dados para a DIRF(FINA401)

Características do Requisito

Descrição

Atualizações da rotina

Procedimento para Utilização

Vídeo

Ponto de Entrada

Tipo	Valor	Data Emis	TitPai	CodRet
NF	10.000,00	01/01/16		1708
PA	10.000,00	01/01/16		1708
TX-IR	150,00	01/01/16	PA	1708
TX-PIS	65,00	01/01/16	PA	5952
TX-COFINS	300,00	01/01/16	PA	5952
TX-CSLL	100,00	01/01/16	PA	5952

Tipo	Rendimento Trib.	Imposto Retido	Cod Ret	Mes	TitPai
NF	10000,00	0,00	1708	Jan
PA	10000,00	0,00	1708	jan
TX-IR	0,00	150,00	1708	Jan	PA
PA	10.000,00	0,00	5952	Jan
TX-PIS	0,00	65,00	5952	Jan	PA
TX-COFINS	0,00	300,00	5952	Jan	PA
TX-CSLL	0,00	100,00	5952	Jan	PA

Tipo	Rendimento Trib.	Imposto Retido	Cod Ret	Mes	TitPai
NF	5.000,00	0,00	1708	Jan
PA	5.000,00	0,00	1708	jan
TX-IR	0,00	75,00	1708	Jan	PA
PA	5.000,00	0,00	5952	Jan
TX-PIS	0,00	32,50	5952	Jan	PA
TX-COFINS	0,00	150,00	5952	Jan	PA
TX-CSLL	0,00	50,00	5952	Jan	PA

Tipo	Valor	Data Emis	TitPai	CodRet
NF	6.000,00	01/01/16		1708
PA	10.000,00	01/01/16		1708
TX-IR	150,00	01/01/16	PA	1708
TX-PIS	65,00	01/01/16	PA	5952
TX-COFINS	300,00	01/01/16	PA	5952
TX-CSLL	100,00	01/01/16	PA	5952

Árvore de páginas

Histórico da Página

Versões comparadas

Versão antiga 2

Nova versão 114

Chave

Criação de novo pergunte "Considera Pagto. Antecipado?" na geração dos dados para a DIRF(FINA401)

Características do Requisito

Descrição

Atualizações da rotina

Procedimento para Utilização

Vídeo

Ponto de Entrada