Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 08/10/2010 00:00:00
Data/Hora Última Alteração: 23/02/2011 10:16:59
Descrição da Nota: VALOR FOB FICA INCORRETO QUANDO POSSUI DESPESA EM JPY
Sintoma
Em um processo com a Moeda JPY ao fazer a DI e incluir a Despesa THC (soma no valor aduaneiro) na
Moeda JPY o sistema está dividindo o valor da despesa por 100 e somando ao valor FOB, o que está
errado. O FOB está em JPY e a Despesa foi informada na pasta de "Despesa" em JPY, o sistema deveria
somar os 2 valores.
Solução
Tratar os decimais do valor da despesa antes de somar.
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 10654 Data: 08/10/2010 Hora: 11:00:05
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 10654
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00005
Agrupamento : 00042
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
01088 - 00001 - 6.0 - 00023 - CÁLCULO VALOR FOB ERRADO QUANDO TINHA DESPESA NA DI
01242 - 00002 - 6.0 - 00023 - ERRO AO CRIAR A DSI
----------------------------------------------------------------------------------------------------
VALOR FOB FICA INCORRETO QUANDO POSSUI DESPESA EM JPY
----------------------------------------------------------------------------------------------------
Palavras Chave:
FOB - DI - JPY - SOMA DESPESA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F04
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F04
...
FORM soma_despesa_acr.
DATA: v_vldp LIKE itab_zycit049-vldp.
LOOP AT itab_zycit049 WHERE tipo = 'A' AND
vldp > 0.
IF itab_zycit049-tpdesp NE /pws/zycit000-flagfreten.
* >> Início da inclusão: FORM SOMA_DESPESA_ACR
IF itab_zycit049-waers NE wa_zycbt007-waersb.
PERFORM trata_decimais USING itab_zycit049-waers
CHANGING itab_zycit049-vldp.
ENDIF.
* << Fim da inclusão
IF itab_zycit049-waers NE /pws/zycie085-waersfob.
...