CE PLUS - Nota 003459
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 13/04/2007 00:00:00
Data/Hora Última Alteração: 09/03/2010 09:19:55
Descrição da Nota: VALOR DO FRETE NACIONAL ESTÁ DUPLICADO NA NF
Sintoma
Quando tenho um processo que tem frete em território nacional no BL o sistema está se perdendo ao
criar os valores da nota fiscal. Esta despesa esta indo para a base de ICMS para calculo do imposto,
mas ao lançar o valor da mercadoria o sistema considera novamente o valor deste frete, duplicando
assim o valor desta despesa aumentando o valor total da nota deixando diferente do valor da base.
Erro ocorre em processo com o frete destacado na fatura.
Solução
Corrigir o programa para que retire o valor do frete nacionaldo valor unitário da mercadoria ao
fazer a nf.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03459 Data: 13/04/2007 Hora: 15:52:12
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03459
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00027
Agrupamento : 00161
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
VALOR DO FRETE NACIONAL ESTÁ DUPLICADO NA NF
----------------------------------------------------------------------------------------------------
Palavras Chave:
FRETE NACIONAL - FRETE RODOVIÁRIO - VALOR DUPLICADO
NOTA FISCAL
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ebeln = itab_zycit042-ebeln
ebelp = itab_zycit042-ebelp.
IF sy-subrc EQ 0 .
IF NOT /pws/zycit093-ternacion IS INITIAL.
PERFORM trata_decimais USING /pws/zycit093-waersfre
CHANGING /pws/zycit093-ternacion.
v_ternacion = /pws/zycit093-ternacion.
IF /pws/zycie085-dttax IS INITIAL.
/pws/zycie085-dttax = /pws/zycit085-dttax.
ENDIF.
* >> Início da exclusão: FORM SELECIONA_ITENS_NFG
IF sy-subrc = 0 .
* << Fim da exclusão
IF /pws/zycit093-waersfre = /pws/zycbt007-waersb.
IF NOT v_ntgew_tot IS INITIAL.
v_ternacion = ( v_ternacion * itab_zycit003-ntgew
/ v_ntgew_tot ).
ENDIF.
IF NOT itab_zycit042-qtd_iten IS INITIAL.
itab_zycit042-netpr = itab_zycit042-netpr -
( v_ternacion / itab_zycit042-qtd_iten ).
ENDIF.
ELSE.
...
...
/pws/zycit085-dttax
CHANGING v_taxa_desp.
v_ternacion = v_ternacion * v_taxa_desp .
IF NOT v_ntgew_tot IS INITIAL.
v_ternacion = ( v_ternacion * itab_zycit003-ntgew
/ v_ntgew_tot ).
ENDIF.
IF NOT itab_zycit042-qtd_iten IS INITIAL.
itab_zycit042-netpr = itab_zycit042-netpr -
( v_ternacion / itab_zycit042-qtd_iten ).
* >> Início da exclusão: FORM SELECIONA_ITENS_NFG
ENDIF.
* << Fim da exclusão
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
PERFORM gera_itab_zycit042.
ELSE.
IF NOT itab_zycit003-qtd_itend IS INITIAL.
MOVE itab_zycit003-qtd_itend TO itab_zycit042-qtd_iten.
ENDIF.
...