CalcAcrs

Calcula acrescimo (juros, mora, multa) de titulo financeiro na data informada. Par natural com CalcDesc.

Assinatura: CalcAcrs(cPrefixo, cTitulo, cParcela, cTipo, cCliFor, cLoja, dData) -> nAcrescimo

Retorna: Numeric

CalcAcrs retorna o acrescimo total (juros + mora + multa) que incide sobre um titulo na data informada. Usa as regras configuradas no cadastro do cliente/condicao de pagamento (juros diario, multa por atraso).

nJuros := CalcAcrs( ;
    SE1->E1_PREFIXO, ;
    SE1->E1_NUM,     ;
    SE1->E1_PARCELA, ;
    SE1->E1_TIPO,    ;
    SE1->E1_CLIENTE, ;
    SE1->E1_LOJA,    ;
    dDataBase        )

nTotalBaixa := SE1->E1_VALOR + nJuros

Pegadinhas

Performance similar a SaldoTit — anti-padrao em loop grande.
Considera politica do cliente — clientes com isencao retornam 0.
Data futura calcula projecao — util pra simulacao.

Veja também

saldotit
calcdesc