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:16
Descrição da Nota: VARIAÇÃO CAMBIAL ERRADA PARA PROCESSOS COM ITENS EM MOEDAS DIFERENTES
Sintoma
A variação cambial fica incorreta para processos com itens em moedas diferentes.
Solução
Ajustado programa para gravar o valor da mercadoria na moeda de origem.
8.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11428 Data: 05/09/2011 Hora: 14:01:32
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11428
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
----------------------------------------------------------------------------------------------------
VARIAÇÃO CAMBIAL ERRADA PARA PROCESSOS COM ITENS EM MOEDAS DIFERENTES
----------------------------------------------------------------------------------------------------
Palavras Chave:
VARIAÇÃO - CAMBIAL - DI - ITEM - MOEDA - DIFERENTE
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F01
...
ENDLOOP.
DELETE FROM /pws/zycit049 WHERE nrseq = /pws/zycie085-nrseqdi.
MODIFY /pws/zycit049 FROM TABLE itab_zycit049di2.
ENDIF.
DELETE FROM /pws/zycit200 WHERE id = /pws/zycie085-nrseqdi.
MODIFY /pws/zycit200 FROM TABLE itab_zycit200.
DELETE FROM /pws/zycit100 WHERE nrseqdi = /pws/zycie085-nrseqdi.
CLEAR: itab_zycit100.
REFRESH: itab_zycit100.
LOOP AT itab_it.
* >> Início da inclusão: FORM SAVE_DATA
IF /pws/zycie085-waersfob NE itab_it-waersbem.
PERFORM: calc_conv_moeda:
USING /pws/zycie085-waersfob
itab_it-waersbem
CHANGING itab_it-vlfob.
ENDIF.
* << Fim da inclusão
MOVE-CORRESPONDING itab_it TO itab_zycit100.
APPEND itab_zycit100.
ENDLOOP.
MODIFY /pws/zycit100 FROM TABLE itab_zycit100.
...