CE PLUS - Nota 000809
Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina Mensal
Data/Hora da Publicação: 06/02/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 14:50:21
Descrição da Nota: PRÉ,LINEAR AO ANO SOBRE SLD DEV,S/ OPÇ DEDUZ J,CALCULA ERRADO ULT PARC
Sintoma
Rotina mensal de contratos de pré pagamento com forma de cálculo Linear ao ano sobre o saldo
devedor, sem flegar a opção "Deduz Juros" na liquidação: Quando há várias liquidações para o
contrato, sendo que todas elas foram feitas na data final da parcela (consequentemente data início
da parcela seguinte), ao rodar a rotina mensal os cálculos estão sendo feitos corretamente exceto
para a última parcela do contrato.
Solução
Corrigida a forma de cálculo do juros
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 00809 Data: 06/02/2006 Hora: 11:40:07
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 00809
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00022
Agrupamento : 00099
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
PRÉ,LINEAR AO ANO SOBRE SLD DEV,S/ OPÇ DEDUZ J,CALCULA ERRADO ULT PARC
----------------------------------------------------------------------------------------------------
Palavras Chave:
PRÉ LINEAR AO ANO SOBRE SALDO DEVEDOR DEDUZ JUROS CALCULO ÚLTIMA PARCELA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCBR003
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCBR003
...
itab_relat-vlmij = itab_relat-vlmej * itab_relat-txc.
PERFORM preenche_itab_relat.
APPEND itab_relat.
ELSEIF s_dtentr > itab_relat-dtate.
v_per_dias = s_dtentr - itab_relat-dtate.
* >> Início da exclusão: FORM PROCESSA_PERIODO_JL
v_juros = ( v_saldo_inicial * itab_zycbt002j-txjtotal / 100 )
* << Fim da exclusão
* >> Início da inclusão: FORM PROCESSA_PERIODO_JL
v_juros = ( v_saldo_final * itab_zycbt002j-txjtotal / 100 )
* << Fim da inclusão
* ( v_per_dias / v_base_dias ).
itab_relat-vlmej = v_juros.
* >> Início da exclusão: FORM PROCESSA_PERIODO_JL
itab_relat-vlme = v_saldo_inicial.
* << Fim da exclusão
* >> Início da inclusão: FORM PROCESSA_PERIODO_JL
itab_relat-vlme = v_saldo_final.
* << Fim da inclusão
itab_relat-dtde = itab_relat-dtate.
itab_relat-dtate = s_dtentr.
PERFORM seleciona_taxa.
itab_relat-txc = itab_tcurr-ukurs.
itab_relat-vlmij = itab_relat-vlmej * itab_relat-txc.
...