CE PLUS - Nota 007003

Módulo: CÂMBIO FINANCEIRO

Funcionalidade: Rotina de Pagamento

Data/Hora da Publicação: 22/07/2008 00:00:00

Data/Hora Última Alteração: 18/02/2011 14:04:21

Descrição da Nota: COMPLEMENTO DO BOLETO - DIVISÃO POR ZERO - DUMP

Sintoma

Ao clicar enter em um boleto, ocorre dump.

 

 

Solução

Analisar se a variável esta com valor zero, se sim, deixar com o valor = 1 para evitar o dump.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

REMESSA FINANCEIRA - COMPLEMENTO DO BOLETO - SAÍDA DE PAGAMENTO - F63

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 07003 Data: 22/07/2008 Hora: 12:05:50

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 07003

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00006

Agrupamento              : 00057

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

02872  - 00001 - 6.0    - 00026  - REMESSA FINANCEIRA - COMPLEMENTO DO BOLETO - SAÍDA DE PAGAMENTO -

----------------------------------------------------------------------------------------------------

COMPLEMENTO DO BOLETO - DIVISÃO POR ZERO - DUMP

----------------------------------------------------------------------------------------------------

Palavras Chave:

COMPLEMENTO DO BOLETO DIVISÃO POR ZERO DUMP

 

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCB110F01

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCB110F01

 

...

           EXCEPTIONS

                i_demoeda_nao_encontrado     = 1

                i_paramoeda_nao_encontrado   = 2

                fator_nao_encontrado         = 3

                i_ctmoeda_nao_encontrado     = 4

                i_dtbase_nao_encontrada      = 5

                taxa_nao_encontrada          = 6

                i_montante_nao_encontrado    = 7

                tabela_categ_nao_configurada = 8

                OTHERS                       = 9.

* >> Início da exclusão: FORM CALCULA_VLMI

      IF sy-subrc NE 0.

        v_dfact = v_pfact = 1.

      ENDIF.

* << Fim da exclusão

    ELSE.

      MESSAGE i061 WITH text-107 text-108.

      EXIT.

    ENDIF.

* >> Início da inclusão: FORM CALCULA_VLMI

    IF v_dfact = 0.

      v_dfact = 1.

    ENDIF.

    IF v_pfact = 0.

      v_pfact = 1.

    ENDIF.

* << Fim da inclusão

    IF  sy-subrc EQ 0.

      SELECT SINGLE * FROM tcurx WHERE currkey = itab_zycbt031_tc-waers.

      IF sy-subrc <> 0.

        tcurx-currdec = 2.

      ENDIF.

      v_vlmeaux  =

      itab_zycbt031_tc-v_vlme / ( 10 ** ( tcurx-currdec - 2 ) ).

      v_vlmeaux_cide =

      itab_zycbt031_tc-v_vlcide / ( 10 ** ( tcurx-currdec - 2 ) ).

      v_vlmeaux_ir =

...