Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 05/09/2011 00:00:00
Data/Hora Última Alteração: 09/09/2011 11:39:12
Descrição da Nota: ERRO AO CALCULAR VALOR ADUANEIRO COM MOEDA JPY
Sintoma
Erro ao calcular valor aduaneiro com moeda JPY
Solução
Tratar decimais dos valores
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11427 Data: 05/09/2011 Hora: 11:00:02
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11427
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00008
Agrupamento : 00084
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
11377 - 00001 - 8.0 - 00008 - RATEIO DE SEGURO NÃO BATE COM TOTAL DE ITENS QUANDO A MOEDA É DIF
----------------------------------------------------------------------------------------------------
ERRO AO CALCULAR VALOR ADUANEIRO COM MOEDA JPY
----------------------------------------------------------------------------------------------------
Palavras Chave:
JPY - DI - VALOR ADUANEIRO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
IF /pws/zycie085-waersfob NE itab_it-waersbem.
PERFORM: calc_conv_moeda:
USING itab_it-waersbem
/pws/zycie085-waersfob
CHANGING t_vmle.
ENDIF.
t_vmle3 = t_vmle_d2 = t_vmle .
v_it_plan = /pws/zycie003-netpr * v_qtd_c3.
* >> Início da exclusão: FORM LOAD_IFRE
v_frete_nm = /pws/zycie093-prepaid + /pws/zycie093-collect +
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_IFRE
v_frete_nm = /pws/zycie093-prepaid + /pws/zycie093-collect -
* << Fim da inclusão
/pws/zycie093-ternacion.
* >> Início da inclusão: FORM LOAD_IFRE
PERFORM trata_decimais USING /pws/zycie093-waersfre
CHANGING v_frete_nm.
* << Fim da inclusão
IF NOT v_ntgewd IS INITIAL.
t_ivfre = ( /pws/zycie003-ntgewd / v_ntgewd ) * s_frvr.
v_tot_fre = ( /pws/zycie003-ntgewd / v_ntgewd ) * v_frete_nm.
ELSE.
IF NOT v_ntgew IS INITIAL.
...