Módulo: CÂMBIO IMPORTAÇÃO
Funcionalidade: Financiamento
Data/Hora da Publicação: 13/03/2008 00:00:00
Data/Hora Última Alteração: 04/03/2010 14:11:25
Descrição da Nota: FINANCIAMENTO
Sintoma
Na criação de financiamento utilizando linha de crédito no exterior, os campos Aliq. IR e Tipo de
Juros da table control "Período Juros" do financiamento não estão trazendo os dados do registro da
linha de crédito, quando o flag "Utiliza Linha Financ." estiver marcado, os campos são ALIQIR e
TPTAXA1 da tabela /PWS/ZYCBt114 e o campo "Tx Juros Fixa" está sendo multiplicado por 100 na table
control, ou seja o campo TXJFIXA da linha de crédito está sendo convertido na exibição na table
control do financiamento.
Solução
Alterado domínio de dados /PWS/ZYGLD060 e include /PWS/MZYCM101F01, para que o programa grave
corretamente a taxa de juros fixo na tabela /PWS/ZYCBT114 e busque os valores Aliq. IR, Tipo de
Juros e Taxa de Juros Fixo da /PWS/ZYCBT114 corretamente no financiamento.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 06164 Data: 13/03/2008 Hora: 11:07:23
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 06164
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00004
Agrupamento : 00037
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
FINANCIAMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
FINANCIAMENTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
DOMD /PWS/ZYGLD060
REPS /PWS/MZYCM101F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em DOMD /PWS/ZYGLD060
------------------------------------------------------------------------
Domínio modificado: /PWS/ZYGLD060
Rotina de conversão: EXCRT
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCM101F01
...
IF NOT /pws/zycbe112-flinha IS INITIAL AND
NOT /pws/zycbe112-nrlinha IS INITIAL AND
/pws/zycbe113-txjfixa IS INITIAL.
/pws/zycbe113-txjfixa = wa_zycbt114-txjfixa.
ENDIF.
IF NOT /pws/zycbe112-flinha IS INITIAL AND
NOT /pws/zycbe112-nrlinha IS INITIAL AND
/pws/zycbe113-tptxjur IS INITIAL.
/pws/zycbe113-tptxjur = wa_zycbt114-tptaxa1.
ENDIF.
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
IF NOT wa_zycbt114-txjfixa IS INITIAL.
itab_zycbt113j-txjfixa = wa_zycbt114-txjfixa.
ELSE.
* << Fim da inclusão
itab_zycbt113j-txjfixa = /pws/zycbe113-txjfixa.
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
ENDIF.
* << Fim da inclusão
itab_zycbt113j-txjvar = /pws/zycbe113-txjvar.
itab_zycbt113j-txjtotal =
( itab_zycbt113j-txjfixa + itab_zycbt113j-txjvar ).
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
IF NOT wa_zycbt114-tptaxa1 IS INITIAL.
itab_zycbt113j-tptxjur = wa_zycbt114-tptaxa1.
ELSE.
* << Fim da inclusão
itab_zycbt113j-tptxjur = /pws/zycbe113-tptxjur.
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
ENDIF.
* << Fim da inclusão
itab_zycbt113j-tpjurv = /pws/zycbe113-tpjurv.
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
IF NOT wa_zycbt114-aliqir IS INITIAL.
itab_zycbt113j-aliqir = wa_zycbt114-aliqir.
ELSE.
* << Fim da inclusão
itab_zycbt113j-aliqir = /pws/zycbe113-aliqir.
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT113J
ENDIF.
* << Fim da inclusão
IF NOT itab_zycbt113j-tptxjur IS INITIAL.
SELECT SINGLE * FROM /pws/zycbt010
WHERE tptxjur = itab_zycbt113j-tptxjur.
v_vlmeamj = /pws/zycbe112-vlme.
LOOP AT itab_zycbt113p WHERE
dtfinal <= itab_zycbt113j-dtinicio.
...