Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Rotina Mensal
Data/Hora da Publicação: 15/02/2008 00:00:00
Data/Hora Última Alteração: 10/03/2010 18:05:26
Descrição da Nota: ROTINA MENSAL EXPORTAÇÃO - JUROS SOBRE DIAS INCORRETOS - VALOR INCORRETO
Sintoma
O programa deixa o usuario salvar a vinculação/liquidação mesmo quando não existe prorrogação da
captação. Ao executar a rotina mensal esta exibindo valor incorreto de juros.
Solução
Adicionado tratamento para travar o programa quando não existir prorrogação. Na rotina mensal
verificar se a data início esta vazia, para que carregue e calcule o nro. de dias corretamente.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 05938 Data: 15/02/2008 Hora: 11:15:08
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 05938
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00034
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
ROTINA MENSAL EXPORTAÇÃO - JUROS SOBRE DIAS INCORRETOS - VALOR INCORRETO
----------------------------------------------------------------------------------------------------
Palavras Chave:
ROTINA MENSAL EXPORTAÇÃO - JUROS SOBRE DIAS INCORRETOS - VALOR INCORRETO
VERIFICAÇÃO PRORROGAÇÃO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCB004F01
REPS /PWS/ZYCBR003
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB004F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCBR003
...
v_txjtotal = itab_zycbt002j-txjtotal.
v_tptxjur = itab_zycbt002j-tptxjur.
ENDIF.
itab_relat-vlme = p_vlme.
itab_relat-ftpj = 'E'.
itab_relat-dtde = itab_zycbt005-dtvincul.
itab_relat-dtate = p_dtfim.
PERFORM preenche_itab_relat.
CHECK NOT itab_relat IS INITIAL.
CHECK itab_relat-dtde =< itab_relat-dtate.
* >> Início da inclusão: FORM PROCESSA_PERIODO_JACE
IF v_dtate IS INITIAL.
v_dtate = itab_relat-dtde.
ENDIF.
* << Fim da inclusão
PERFORM processa_calculo_juros USING p_vlme
v_txjtotal
v_tptxjur
v_dtate
p_dtfim
itab_zycbt001-waers
itab_zycbt011-ctmoed
'E'.
ENDIF.
ENDFORM.
...