CalculaRateioPgtoFisica

Esta função é utilizada para carregar as variáveis do sistema de valores rateados do pagamento de terceiros (pessoa física), de acordo com os valores passados como parâmetro.

Sintaxe: CalculaRateioPgtoFisica(Numero NumEmp, Numero CodFil, Numero CmpPte, Numero NumCad, Numero SeqPte, Numero BaseInss, Numero BaseIR, Numero ConIns, Numero InsTrp, Numero IrfRet);

NumEmp: Variável numérica que contém o Código da Empresa do Terceiro;

CodFil: Variável numérica que contém o Código da Filial do Terceiro;

CmpPte: Variável numérica que contém a Competência do Pagamento do Terceiro;

NumCad: Variável numérica que contém o Cadastro do Terceiro;

SeqPte: Variável numérica que contém a Sequência do Pagamento do Terceiro;

BaseInss: Variável numérica que contém a Base de Inss do Pagamento;

BaseIR: Variável numérica que contém a Base de IR do Pagamento;

ConIns: Variável numérica que contém a Contribuição Inss do Pagamento;

InsTrp: Variável numérica que contém o INSS Transporte do Pagamento;

IrfRet: Variável numérica que contém o IR Retido do Pagamento.

Retorno: Carrega as seguintes variáveis de sistema, que podem ser utilizadas no gerador de relatórios, regras e cubos:

CodRatPagTer, PerRatPagTer, BasInsTerRat, BasIrfTerRat, ConInsTerRat, InsTrpTerRat, IrfRetTerRat e QtdRatPag.

Importante: Essas variáveis possuem índices, porque um Terceiro poderá possuir até 80 valores acima para cada Rateio.

Exemplo: Terceiro possui 1 pagamento de Terceiro:

<div class="Code"><p>NumEmp = 1;<br></br>CodFil = 1;<br></br>CmpPte = 10/2006;<br></br>NumCad = 1;<br></br>SeqPte = 1;<br></br>BaseInss = 240,00;<br></br>BaseIR = 1200,00;<br></br>ConIns = 50,00;<br></br>InsTrp = 6,00;<br></br>IrfRet = 100,00.</p><p></p><p>CalculaRateioPgtoFisica(NumEmp, CodFil, CmpPte, NumCad, SeqPte, BaseInss, BaseIR, ConIns, InsTrp, IrfRet);</p><p></p><p>CodRatPagTer[1] = 8;<br></br>CodRatPagTer[2] = 10;<br></br>PerRatPagTer[1] = 50%;<br></br>PerRatPagTer[2] = 50%<br></br>BasInsTerRat[1] = 120,00;<br></br>BasInsTerRat[2] = 120,00;<br></br>BasIrfTerRat [1] = 600,00;<br></br>BasIrfTerRat [2] = 600,00;<br></br>ConInsTerRat[1] = 25,00;<br></br>ConInsTerRat[2] = 25,00;<br></br>InsTrpTerRat[1] = 3,00;<br></br>InsTrpTerRat[2] = 3,00;<br></br>IrfRetTerRat[1] = 50,00;<br></br>IrfRetTerRat[2] = 50,00;<br></br>QtdRatPag = 2.</p></div>

E assim vai de acordo com a quantidade de rateios (limite = 80) na guia rateio do pagamento do Terceiro, ou, caso não exista lançamento, de acordo com o rateio do local ou c.custo informado neste pagamento.

Utilização: Gerador de Relatórios, Regras, Importação/Exportação e Cubos.

Disponível para o módulo: Administração de Pessoal.