CE PLUS - Nota 008949
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: DSI
Data/Hora da Publicação: 03/09/2009 00:00:00
Data/Hora Última Alteração: 22/02/2011 15:00:30
Descrição da Nota: PROGRAMA SE PERDE AO CALCULAR VALOR CIF NA DSI
Sintoma
Programa se perde ao calcular valor CIF na DSI
Solução
Considerar valor de seguro.
Versões Tratadas
7.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 08949 Data: 03/09/2009 Hora: 10:43:41
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 08949
Categoria : Consultoria
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00010
Agrupamento : 00112
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
08534 - 00001 - 7.0 - 00009 - A DSI CALCULA VALOR INCORRETO AO FAZER VARIAÇÃO CAMBIAL
----------------------------------------------------------------------------------------------------
PROGRAMA SE PERDE AO CALCULAR VALOR CIF NA DSI
----------------------------------------------------------------------------------------------------
Palavras Chave:
CALCULO - DSI - CIF -JPY
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI058F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI058F01
...
WHEN 'CIF'.
t_dif_seg = v_tsegfat - v_sgtofat.
t_dif_seg = ( v_cfr / ( v_tcfr ) ) * t_dif_seg.
itab_it-vlfob = t_vmle = t_vmle + t_dif_seg.
t_ivmle = t_ivmle + ( t_dif_seg * /pws/zycie085-ukursseg ).
t_ivmle_d2 = t_ivmle + t_ivfre + t_ivseg .
* >> Início da exclusão: FORM LOAD_ITAX
t_vmle_d2 = t_vmle = t_vmle + v_tot_fre + v_tot_seg + t_dif_seg.
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_ITAX
t_vmle_d2 = t_vmle = t_vmle + v_tot_fre + v_tot_seg.
* << Fim da inclusão
t_ivadu = t_ivmle + t_ivdesp + t_ivfre + t_ivseg.
t_vmle2 = t_vmle.
ENDCASE.
itab_it-vlmerc_ad = t_vmle2.
t_ivmle2 = t_vmle_d2 * /pws/zycie085-ukursfob .
* >> Início da exclusão: FORM LOAD_ITAX
v_tmle_d2 = v_tmle_d2 + t_ivmle2 .
* << Fim da exclusão
* >> Início da inclusão: FORM LOAD_ITAX
v_tmle_d2 = v_tmle_d2 + t_ivmle_d2 .
* << Fim da inclusão
ENDFORM.
...