Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 28/10/2010 00:00:00
Data/Hora Última Alteração: 20/06/2011 12:05:52
Descrição da Nota: DUMP AO ENTRAR NA ANA
Sintoma
dump ao entrar na ANA
Solução
Verificar se campo está zerado antes da divisão.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10695 Data: 28/10/2010 Hora: 11:30:42
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10695
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00005
Agrupamento : 00045
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08959 - 00001 - 7.0 - 00010 - ADEQUAÇÕES NO PROGRAMA DA ANA
09072 - 00002 - 8.0 - 00001 - VÁRIOS AJUSTES DE TRATAMENTO E VARIAÇÃO DA ANA - DI ARGENTINA
10023 - 00003 - 8.0 - 00003 - AJUSTADO CALCULO DO SEGURO (ANA)
----------------------------------------------------------------------------------------------------
DUMP AO ENTRAR NA ANA
----------------------------------------------------------------------------------------------------
Palavras Chave:
DUMP - ANA - DIVISÃO POR ZERO.
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI059F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI059F03
...
FORM valor_cfr USING p_tipo.
CLEAR: v_tcfr.
IF NOT v_usd IS INITIAL.
s_fbvr_s_d = /pws/zycie085-vlfob.
ENDIF.
IF s_inco1_ci EQ 'CIF'.
* >> Início da inclusão: FORM VALOR_CFR
IF NOT v_usd IS INITIAL.
* << Fim da inclusão
v_tcfr = /pws/zycie085-vlfob +
( v_bltofat * /pws/zycie085-ukursfre / v_usd ) +
( v_sgtofat * /pws/zycie085-ukursseg / v_usd ) .
* >> Início da inclusão: FORM VALOR_CFR
ENDIF.
* << Fim da inclusão
v_cfr = t_vmle .
v_cfr = t_vmle .
ELSEIF s_inco1_ci EQ 'C&F'.
* >> Início da inclusão: FORM VALOR_CFR
IF NOT v_usd IS INITIAL.
* << Fim da inclusão
v_tcfr = /pws/zycie085-vlfob +
( v_bltofat * /pws/zycie085-ukursfre / v_usd ).
* >> Início da inclusão: FORM VALOR_CFR
ENDIF.
* << Fim da inclusão
v_cfr = t_vmle .
ELSE.
v_tcfr = s_fbvr_s_d .
v_cfr = t_ivmle .
ENDIF.
...