Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Fatura Mercadoria
Data/Hora da Publicação: 21/05/2007 00:00:00
Data/Hora Última Alteração: 03/02/2010 16:52:11
Descrição da Nota: DIFERENÇA DE R$ 0,01 NO FRETE INTERNACIONAL PARA NF COMPLEMENTAR.
Sintoma
O sistema esta lançando uma diferença de R$ 0,01 na despesa que gera a nota fiscal
complementar.
Solução
Corrigir valor levado para campo VLREAL da tabelaa /PWS/ZYCIT036.
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03725 Data: 21/05/2007 Hora: 17:03:55
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03725
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00027
Agrupamento : 00167
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
DIFERENÇA DE R$ 0,01 NO FRETE INTERNACIONAL PARA NF COMPLEMENTAR.
----------------------------------------------------------------------------------------------------
Palavras Chave:
DIFERENÇA - CUSTO EFETIVO - 1 CENTAVO - 0,01 - FRETE INTERNACIONAL
NOTA FISCAL COMPLEMENTAR
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
itab_zycit036aux-codigo = 'PIS' OR
itab_zycit036aux-codigo = 'COFINS'.
READ TABLE itab_zycit036_di WITH KEY nrseq = itab_zycit036aux-nrseq
ebeln = itab_zycit036aux-ebeln
ebelp = itab_zycit036aux-ebelp
codigo = itab_zycit036aux-codigo.
IF sy-subrc = 0.
IF itab_zycit036aux-codigo = 'FRETEI'.
PERFORM trata_decimais USING itab_zycit036_di-waers_real
CHANGING itab_zycit036_di-vlreal.
* >> Início da exclusão: FORM CONGELA_DESPESA
IF itab_zycit036_di-waers_real = /pws/zycbt007-waersb.
/pws/zycit053-vlreal = itab_zycit036_di-vlreal.
ELSE.
/pws/zycit053-vlreal = itab_zycit036_di-vlreal *
wa_zycit085-ukursfre.
ENDIF.
* << Fim da exclusão
* >> Início da inclusão: FORM CONGELA_DESPESA
/pws/zycit053-vlreal = itab_zycit036_di-vlmov.
* << Fim da inclusão
ELSEIF itab_zycit036aux-codigo = 'SEGURO'.
PERFORM trata_decimais USING itab_zycit036_di-waers_real
CHANGING itab_zycit036_di-vlreal.
IF itab_zycit036_di-waers_real = /pws/zycbt007-waersb.
/pws/zycit053-vlreal = itab_zycit036_di-vlreal.
ELSE.
/pws/zycit053-vlreal = itab_zycit036_di-vlreal *
wa_zycit085-ukursseg.
ENDIF.
ELSEIF itab_zycit036aux-codigo = 'FOB' OR
...