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.
7.0
Produto:
Nota
Descrição
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 =
...