Módulo: CÂMBIO EXPORTAÇÃO
Funcionalidade: Captação
Data/Hora da Publicação: 23/05/2006 00:00:00
Data/Hora Última Alteração: 18/02/2011 15:10:33
Descrição da Nota: CAPTAÇÃO PRORROGAÇÃO DE JUROS - FLAG ALTERA TAXA.
Sintoma
Na Captação não está respeitando o flag do campo FLAG.ALT.TAXA da tabela /PWS/ZYCBT003.
Solução
Ajuste Efetuado para ser realizada a consistencia de quando o campo FALTTX da tabela /PWS/ZYCBT003
(prorrogação) não estiver com o Flag ativo, o programa não deixará ser alterado o campo TXJFIXA da
tabela /PWS/ZYCBT002 (juros) sendo juros proveniente de prorrogação.
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 01391 Data: 23/05/2006 Hora: 14:41:53
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 01391
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00023
Agrupamento : 00115
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
CAPTAÇÃO PRORROGAÇÃO DE JUROS - FLAG ALTERA TAXA.
----------------------------------------------------------------------------------------------------
Palavras Chave:
FLAG DO CAMPO FLTTX DA TABELA /PWS/ZYCBT003
----------------------------------------------------------------------------------------------------
Objetos da nota:
MESS /PWS/ZYCBM301
REPS /PWS/MZYCB001F01
REPS /PWS/MZYCB001F02
REPS /PWS/MZYCB001F03
REPS /PWS/MZYCB001F04
REPS /PWS/MZYCB001H01
REPS /PWS/MZYCB001I01
REPS /PWS/MZYCB001O01
REPS /PWS/MZYCB001TOP
REPS /PWS/MZYCB001X01
REPS /PWS/SAPMZYCB001
TRAN /PWS/ZYCB001_A
TRAN /PWS/ZYCB001_C
TRAN /PWS/ZYCB001_E
----------------------------------------------------------------------------------------------------
Modificações efetuadas em MESS /PWS/ZYCBM301
Mensage: i301
Texto: A taxa de juros de prorrogação não pode ser alterada.
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F01
...
itab_zycbt002-nrdiasj = /pws/zycbe002-nrdiasj.
APPEND itab_zycbt002.
ENDIF.
/pws/zycbe002-txjtotal = /pws/zycbe002-txjfixa + /pws/zycbe002-txjvar.
/pws/zycbe002-tptxjur = /pws/zycbe002-tptxjur .
* >> Início da exclusão: FORM UPDATE_ITAB_ZYCBT002
MOVE: /pws/zycbe002-txjfixa TO itab_zycbt002-txjfixa,
/pws/zycbe002-txjvar TO itab_zycbt002-txjvar,
/pws/zycbe002-nrdiasj TO itab_zycbt002-nrdiasj,
/pws/zycbe002-tptxjur TO itab_zycbt002-tptxjur,
/pws/zycbe002-txjtotal TO itab_zycbt002-txjtotal,
* << Fim da exclusão
* >> Início da inclusão: FORM UPDATE_ITAB_ZYCBT002
IF NOT itab_zycbt003 IS INITIAL.
READ TABLE itab_zycbt003 WITH KEY dtpror = itab_zycbt002-dtfinal.
IF sy-subrc EQ 0.
IF itab_zycbt003-falttx EQ ' '
AND /pws/zycbe002-txjfixa NE itab_zycbt002-txjfixa.
MESSAGE i301.
/pws/zycbe002-txjfixa = itab_zycbt002-txjfixa.
/pws/zycbe002-txjtotal = itab_zycbt002-txjtotal.
ELSE.
itab_zycbt002-txjfixa = /pws/zycbe002-txjfixa.
itab_zycbt002-txjtotal = /pws/zycbe002-txjtotal.
ENDIF.
ELSE.
itab_zycbt002-txjfixa = /pws/zycbe002-txjfixa.
itab_zycbt002-txjtotal = /pws/zycbe002-txjtotal.
ENDIF.
ELSE.
itab_zycbt002-txjfixa = /pws/zycbe002-txjfixa.
itab_zycbt002-txjtotal = /pws/zycbe002-txjtotal.
ENDIF.
MOVE: /pws/zycbe002-txjvar TO itab_zycbt002-txjvar,
/pws/zycbe002-nrdiasj TO itab_zycbt002-nrdiasj,
/pws/zycbe002-tptxjur TO itab_zycbt002-tptxjur,
* << Fim da inclusão
/pws/zycbe002-kostl TO itab_zycbt002-kostl,
/pws/zycbe002-aufnr TO itab_zycbt002-aufnr,
/pws/zycbe002-kstrg TO itab_zycbt002-kstrg,
/pws/zycbe002-prctr TO itab_zycbt002-prctr,
/pws/zycbe002-ps_posid TO itab_zycbt002-ps_posid,
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001H01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001I01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001O01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001TOP
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCB001X01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/SAPMZYCB001
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TRAN /PWS/ZYCB001_A
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TRAN /PWS/ZYCB001_C
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TRAN /PWS/ZYCB001_E