01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:Financeiro
Função:

FINA050 - Contas a Pagar

Requisito/Story/Issue (informe o requisito relacionado) :DFINGRV-26568
Observações:

Ponto de entrada para manipulação do valor do IRRF.
Deve ser utilizado para tratamento de redução da base por numero de dependentes.
Retornar novo valor calculado do IRRF.


02. DESCRIÇÃO

A finalidade do ponto de entrada F050CIRF é permitir validações de usuário no valor do IRRF. Este ponto de entrada não trabalha em conjunto com o F50CIRFF.

03. PARÂMETROS


Nome

Tipo

Descrição

nBaseIrrf

Numérico

Valor da base de cálculo do IRRF.

04. RETORNO

Nome

Tipo

Descrição

nNewIRRF

Numérico

Novo valor calculado para o IRRF.

05. EXEMPLO DE UTILIZAÇÃO

#INCLUDE "protheus.ch"
//-------------------------------------------------------------------
/*/{Protheus.doc} user function F50CIRFF
description Ponto de entrada para manipular o valor de IRRF (M->E2_IRRF). 
Deve retornar o valor da base e moeda corrente.
contexto de execução, alteração na emissão ou valor de título a pagar.
@author  diegos.sousa
@since   27/05/2022
@version 12.1.33
@return nNewIrrf, numerico.  Valor do campo M->E2_IRRF. 
/*/
//-------------------------------------------------------------------
user function F050CIRF(nBaseIrrf) as numeric
    local nDependentes    := M->A2_NUMDEP   //Ex: 6
    local nValDedPorDep   := 100,00
    local nw              := 0
    local lAtivo          := .F.
    default nNewIrrf      := 0,00
    default nBaseIrrf     := M->E2_BASEIRF  //Ex: 10.000,00 

 
    lAtivo := (FunName() = "FINA050" )
         
    If lAtivo
 
        For nw := 1 to nDependentes

            nBaseIrrf -= nValDedPorDep

        Next nw

        nNewIrrf := (nBaseIrrf * 1.5) / 100  
    EndIf
 
return nNewIrrf


06. LEIA TAMBÉM

F50CIRFF - Ponto de entrada para manipulação do cálculo da base de cálculo do IRRF. 



<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>