CE PLUS - Nota 001391

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.

 

Versões Tratadas

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