CE PLUS - Nota 008158
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 10/03/2009 00:00:00
Data/Hora Última Alteração: 09/03/2010 16:37:36
Descrição da Nota: VALOR DA MERCADORIA NA MOEDA INTERNA ESTÁ ERRADO NO CABEÇALHO DA DI
Sintoma
Valor da mercadoria na moeda interna no cabeçalho da DI está errado quando icoterm diferente de FOB.
Solução
Ajustado calculo do valor da mercadoria na moeda interna para tratar o icoterm.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08158 Data: 10/03/2009 Hora: 16:27:00
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08158
Categoria : Erro de Programa
Prioridade : Baixa
Versão PW.CE : 7.0
Pacote : 00008
Agrupamento : 00088
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
VALOR DA MERCADORIA NA MOEDA INTERNA ESTÁ ERRADO NO CABEÇALHO DA DI
----------------------------------------------------------------------------------------------------
Palavras Chave:
VALOR - MERCADORIA - MOEDA - INTERNA - CABEÇALHO - DI
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
LEAVE PROGRAM.
ELSE.
MESSAGE i015 WITH text-119 text-125.
LEAVE PROGRAM.
ENDIF.
ENDIF.
ELSE.
IF /pws/zycie085-vlfob IS INITIAL.
/pws/zycie085-vlfob = v_tval2.
ENDIF.
* >> Início da exclusão: FORM CALC_ITAB
/pws/zycie085-vlfobr = s_fbvr = v_tmle.
* << Fim da exclusão
* >> Início da inclusão: FORM CALC_ITAB
READ TABLE itab_zycit003 INDEX 1.
IF sy-subrc EQ 0 .
IF itab_zycit003-qtd_itend IS INITIAL.
/pws/zycie085-vlfobr = s_fbvr = v_tmle +
/pws/zycie085-ukursfob * v_tdif.
ELSE.
/pws/zycie085-vlfobr = s_fbvr = v_tmle .
ENDIF.
ENDIF.
* << Fim da inclusão
ENDIF.
CLEAR: v_desp_acr, v_desp_brl.
PERFORM load_sevl.
...