CE PLUS - Nota 002173
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Custo Efetivo
Data/Hora da Publicação: 28/09/2006 00:00:00
Data/Hora Última Alteração: 20/06/2011 13:13:25
Descrição da Nota: VALOR DO SEGURO INCORRETO DEPOIS DO RECEBIMENTO
Sintoma
A Fatura possui o valor em BRL informado na DI. Contudo, o valor do seguro que foi movimentado no
Custo Efetivo está errado, pois o PW.CE considerou que o valor da fatura estava com a mesma moeda da
DI que é USD. Sendo assim, ele multiplicou o valor desse seguro em BRL pela taxa da DI, e lançou a
diferença na coluna "Dif Real x Movimentado".
Solução
insluido tratamento para quando ser fatura usar a taxa do documento e quando for DI usar a taxa da
di, e para verificar se a moeda é brl ou não
Versões Tratadas
6.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02173 Data: 28/09/2006 Hora: 15:47:54
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02173
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00132
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
VALOR DO SEGURO INCORRETO DEPOIS DO RECEBIMENTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
SEGURO - DIFERENÇA - BRL - FATURA - CUSTO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCIR006
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR006
...
IF itab_zycit036-origem NE 'EST'.
IF v_itemcongela = 'X' AND
itab_zycit036-origem EQ 'NF' OR
itab_zycit036-origem EQ 'FAT' AND
NOT /pws/zycit085-ukursseg IS INITIAL.
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS
IF itab_zycit036-origem EQ 'FAT' AND
itab_zycit036-waers_real NE /pws/zycbt007-waersb.
READ TABLE itab_zycit006 WITH KEY
nrseq = itab_zycit036-nrseqori.
IF sy-subrc EQ 0.
READ TABLE itab_bkpf WITH KEY
belnr = itab_zycit006-belnr_p.
IF sy-subrc EQ 0.
v_valor = v_valor * itab_bkpf-kursf.
ENDIF.
ENDIF.
ELSEIF itab_zycit036-origem EQ 'NF'.
* << Fim da inclusão
v_valor = v_valor * /pws/zycit085-ukursseg.
* >> Início da inclusão: FORM CALCULAR_OUTROS_CUSTOS
ENDIF.
* << Fim da inclusão
PERFORM trata_decimais USING itab_zycit036-waers_mov
...