CE PLUS - Nota 009748
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DI
Data/Hora da Publicação: 29/01/2010 00:00:00
Data/Hora Última Alteração: 22/02/2011 14:09:46
Descrição da Nota: (CFR)VALOR DO SEGURO NA DI COM MOEDA DE FRETE E MERCADORIA DIFERENTES(CF
Sintoma
Ao criar uma DI com icoterm CFR em que a moeda do frete seja diferente da moeda da mercadoria e o
seguro possui um percentual informado o valor calculado fica incorreto.
Solução
Corrigida conversão do valor do frete para o calculo do valor do seguro.
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 09748 Data: 29/01/2010 Hora: 09:10:41
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 09748
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 8.0
Pacote : 00002
Agrupamento : 00006
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
07645 - 00001 - 7.0 - 00007 - DUMP NA DI QUANDO NÃO ENCONTRA TAXA DE VALOR DE SEGURO.
----------------------------------------------------------------------------------------------------
(CFR)VALOR DO SEGURO NA DI COM MOEDA DE FRETE E MERCADORIA DIFERENTES(CF
----------------------------------------------------------------------------------------------------
Palavras Chave:
DI - VALOR - SEGURO - FRETE - MERCADORIA - MOEDA - DIFERENTE - CFR
/PWS/SAPMZYCI023
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI023F02
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI023F02
...
ENDIF.
ELSE.
IF NOT v_tval2 IS INITIAL AND
NOT /pws/zycie085-per_seg IS INITIAL.
PERFORM taxa_converte USING /pws/zycie085-waersfob
/pws/zycie085-dttax
CHANGING v_taxa.
IF NOT v_taxa IS INITIAL.
v_fob = v_tval2 * v_taxa .
ENDIF.
* >> Início da inclusão: FORM LOAD_SEVL
IF s_inco1_ci EQ 'FOB'.
* << Fim da inclusão
PERFORM taxa_converte USING /pws/zycie085-waersfre
/pws/zycie085-dttax
CHANGING v_taxa.
* >> Início da inclusão: FORM LOAD_SEVL
ENDIF.
* << Fim da inclusão
IF NOT v_taxa IS INITIAL.
v_fre = v_bltofat * v_taxa .
ENDIF.
IF NOT /pws/zycie085-ukursseg IS INITIAL.
...