Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Custo Efetivo
Data/Hora da Publicação: 27/11/2006 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:23:11
Descrição da Nota: VALOR DO SEGURO INCORRETO QND YEN NO CUSTO
Sintoma
Quando eu crio uma fatura de Seguro em yen (JPY) após a criação da DI, o sistema divide a taxa de
conversão JPY - BRL por cem, como se estivesse buscando essa taxa da OB08, onde existe o fator de
100 para as conversões nessa moeda, trazendo conseqüentemente todos os valores dependentes dessa
conversão dividos também por 100.
Solução
atualizado o programa de custa para buscar o fator corretamente
6.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02520 Data: 27/11/2006 Hora: 09:23:22
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02520
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00141
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02505 - 00001 - 6.0 - 00025 - EM FATURA JPY APÓS A CRIAÇÃO DA DI, OS VALORES ESTÃO DIVIDIDOS PO
----------------------------------------------------------------------------------------------------
VALOR DO SEGURO INCORRETO QND YEN NO CUSTO
----------------------------------------------------------------------------------------------------
Palavras Chave:
SEGURO - CUSTO - YEN - FATURA
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI003F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI003F01
...
gdatu >= sy-datum AND
kurst = v_kurst.
v_kursf = ( /pws/zycit085-ukursfob * v_de ) / v_para.
ELSEIF /pws/zycie006-tpfatura = '03' AND NOT
/pws/zycit085-ukursseg IS INITIAL .
* >> Início da exclusão: FORM GET_PARAMETERS_F-43_F-02
v_kursf = /pws/zycit085-ukursseg.
* << Fim da exclusão
* >> Início da inclusão: FORM GET_PARAMETERS_F-43_F-02
IF /pws/zycit000-kurst IS INITIAL.
v_kurst = 'M'.
ELSE.
v_kurst = /pws/zycit000-kurst.
ENDIF.
SELECT SINGLE ffact tfact
FROM tcurf
INTO (v_de, v_para)
WHERE fcurr = /pws/zycie006-waers AND
tcurr = /pws/zycbt007-waersb AND
gdatu >= sy-datum AND
kurst = v_kurst.
v_kursf = ( /pws/zycit085-ukursseg * v_de ) / v_para.
* << Fim da inclusão
ELSEIF /pws/zycie006-tpfatura = '11'.
PERFORM busca_taxa_dia.
ENDIF.
ENDIF.
REFRESH itab_zycbt013.
...