Exibir origem

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Backoffice
Módulo:	Financeiro
Função:	Baixas a Pagar (FINA080)

02. DESCRIÇÃO

Este Ponto de Entrada (P.E.) tem como objetivo principal permitir a manipulação de valores residuais durante a baixa total de títulos no módulo Financeiro.

Ele é especialmente útil para tratar diferenças de arredondamento originadas pela variação da taxa de moeda.

03. DEMAIS INFORMAÇÕES

Regra de Ativação: Este P.E. é executado exclusivamente na rotina FINA080 (Baixa a Receber), para localizações no Brasil, e apenas quando a taxa da moeda for diferente de 1,00.

Impacto em Parâmetros Padrão

Ao ativar este Ponto de Entrada, o parâmetro MV_TOLERCP será desconsiderado pelo sistema, mesmo que seu valor configurado seja maior que zero.

2. Lógica de Retorno e Funcionamento

O Ponto de Entrada deve retornar obrigatoriamente um valor numérico. Esse valor define o limite de tolerância para o ajuste de arredondamento.

- Cenário A (Diferença Absorvida): Se a diferença de arredondamento calculada pelo sistema for menor ou igual ao valor retornado pelo P.E., o sistema absorve esse resíduo e não gera o registro de desconto/ajuste.
- Cenário B (Diferença Mantida): Se a diferença for maior que o valor retornado pelo P.E., o sistema ignora o ajuste customizado e mantém a criação dos registros padrão de desconto ou correção.

3 - Exemplo Prático de Cenário

Imagine a inclusão de um título com os seguintes valores:

- Valor Nominal: 2.355.600,00
- Taxa da Moeda (Inclusão): 0,035900000
- Valor Convertido: R$ 84.556,04

No momento da baixa (com uma nova taxa informada):

- Taxa da Moeda (Baixa): 0,036154000
- Valor Pago: R$ 85.164,36
- Correção Monetária: R$ 598,32
- Diferença de Arredondamento Identificada: R$ 0,07

Comparativo de Comportamento:

1. Sem o Ponto de Entrada: O sistema geraria três registros: o pagamento principal (R$ 85.164,36), a correção monetária (R$ 598,32) e um desconto de R$ 0,07 para realizar a baixa total.
2. Com o P.E. configurado para retornar 0,10: Como o resíduo de 0,07 é inferior ao limite definido (0,10), o registro de R$ 0,07 não será criado. No entanto, o registro de correção monetária de R$ 598,32 será criado normalmente.
3. Com o P.E. configurado para retornar 0,05: Como o resíduo de 0,07 é superior ao limite definido (0,05), tanto o registro de R$ 0,07 quanto o registro de correção monetária de R$ 598,32 serão criados normalmente.

04. ASSUNTOS RELACIONADOS

Pontos de Entrada - Financeiro - P12

05. PARÂMETROS

Os dados são passados ao P.E. através do array PARAMIXB. Abaixo, a descrição detalhada de cada posição:

Nome	Tipo	Descrição
PARAMIXB[1]	Numérico	Tipo de Movimento - 1 = Baixa, 2 = Cancelamento/Exclusão de Baixa
PARAMIXB[2]	Caracter	Código da filial onde o título está registrado.
PARAMIXB[3]	Caracter	Prefixo do título no Contas a Receber.
PARAMIXB[4]	Caracter	Número identificador do título.
PARAMIXB[5]	Caracter	Código da parcela do título.
PARAMIXB[6]	Caracter	Tipo do título (exemplo: NF, duplicata, etc.).
PARAMIXB[7]	Caracter	Código do fornecedor vinculado ao título.
PARAMIXB[8]	Caracter	Loja do fornecedor.
PARAMIXB[9]	Numérico	Valor do saldo do título disponível no momento exato da baixa.
PARAMIXB[10]	Numérico	Taxa utilizada no cálculo do saldo para a baixa. Em casos de cancelamento, o sistema retorna a taxa utilizada na inclusão original.

06. RETORNO

Nome	Tipo	Descrição
nValArren	Numérico	Valor Numérico. Esse valor define o limite de tolerância para o ajuste de arredondamento.

07. EXEMPLO DE UTILIZAÇÃO

#Include "protheus.ch"

//-------------------------------------------------------------------
/*/{Protheus.doc} user function F080ARREND

Este Ponto de Entrada (P.E.) tem como objetivo principal permitir a manipulação de valores residuais
durante a baixa total de títulos no módulo Financeiro.

Especialmente útil para tratar diferenças de arredondamento originadas pela variação da taxa de moeda.

@author  Francisco Oliveira
@since   17/03/2026
@version 12.1.2510

@return nValArrend numerico. Valor calculado para arrendamento do titulo conforme regra de negócio.

/*/
//-------------------------------------------------------------------

User Function F080ARREND() As Numeric

    Local nValArrend    As Numeric
    Local nTipMovim     As Numeric
    Local cFilTit       As Character
    Local cPrefixo      As Character
    Local cNumero       As Character
    Local cParcela      As Character
    Local cTipo         As Character
    Local cFornece      As Character
    Local cLoja         As Character
    Local nSaldo        As Numeric
    Local nTxMoeda      As Numeric
    
    nValArrend          := 0
    nTipMovim           := PARAMIXB[1]   // Tipo de Movimento - 1 = Baixa, 2 = Cancelamento/Exclusão de Baixa
    cFilTit             := PARAMIXB[2]   // Filial do titulo
    cPrefixo            := PARAMIXB[3]   // Prefixo do titulo
    cNumero             := PARAMIXB[4]   // Numero do titulo  
    cParcela            := PARAMIXB[5]   // Parcela do titulo
    cTipo               := PARAMIXB[6]   // Tipo do titulo
    cFornece            := PARAMIXB[7]   // Fornecedor do titulo
    cLoja               := PARAMIXB[8]   // Loja do fornecedor do titulo
    nSaldo              := PARAMIXB[9]   // Saldo do titulo no momento da baixa
    nTxMoeda            := PARAMIXB[10]  // Taxa da moeda usada no calculo do saldo para a Baixa. Se for Cancelamento/Exclusão de Baixa, a taxa será a cadastrada na inclusão.

    If nTipMovim == 1 // Baixa
        // Regra de negócio para baixa
        nValArrend := 0.10 // Valor para arrendamento do titulo na baixa
    Else // Cancelamento/Exclusão de Baixa
        // Regra de negócio para Cancelamento/exclusão de baixa
        nValArrend := 0.10 // Valor para arrendamento do titulo no Cancelamento/exclusão de baixa
    Endif
    
Return nValArrend // Valor para arrendamento do titulo na baixa e/ou exclusão/extorno