CE PLUS - Nota 011504
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal Remessa
Data/Hora da Publicação: 29/09/2011 00:00:00
Data/Hora Última Alteração: 03/10/2011 11:26:29
Descrição da Nota: NOTA FISCAL DE REMESSA DESPESA BASE DE II EM DUPLICIDADE NA LINHA DE IPI
Sintoma
Ao criar a nota fiscal de remessa o valor das despesas base de II está sendo lançado em duplicidade
na linha do IPI.
Solução
Ajustado calculo das despesas da nota fiscal de remessa para não modicar o valor do campo utilizado
no calculo do montante excluido da base para a linha de IPI
Versões Tratadas
8.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 11504 Data: 29/09/2011 Hora: 15:30:29
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 11504
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 8.0
Pacote : 00009
Agrupamento : 00087
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
09565 - 00001 - 8.0 - 00002 - NOTA FISCAL DE REMESSA ESTA LEVANDO OS DESPESAS BASE DE II 2 VEZE
----------------------------------------------------------------------------------------------------
NOTA FISCAL DE REMESSA DESPESA BASE DE II EM DUPLICIDADE NA LINHA DE IPI
----------------------------------------------------------------------------------------------------
Palavras Chave:
NOTA - FISCAL - REMESSA - DESPESA - BASE - II - DUPLICADO - IPI
/PWS/SAPMZYCI016
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ebelp = itab_zycit044-ebelp.
IF sy-subrc EQ 0 AND itab_zycit100-codregtripiscofi NE '3' AND
itab_zycit100-codregtripiscofi NE '5'..
v_vlpis = itab_zycit100-vlpis /
itab_zycit044-menge * itab_zycit044-qtd_item.
v_vlcofins = itab_zycit100-vlcofins /
itab_zycit044-menge * itab_zycit044-qtd_item.
v_vldp_044 = v_vldp_044 + v_vlpis.
v_vldp_044 = v_vldp_044 + v_vlcofins.
ENDIF.
* >> Início da exclusão: FORM VALORES_R
itab_zycit044-vldp = itab_zycit042_d-vldp.
v_outras = ( itab_zycit044-vldp /
* << Fim da exclusão
* >> Início da inclusão: FORM VALORES_R
v_outras = ( itab_zycit042_d-vldp /
* << Fim da inclusão
itab_zycit044-menge * itab_zycit044-qtd_item ).
v_outras_ic = ( itab_zycit044-vldp /
itab_zycit044-menge * itab_zycit044-qtd_item ) + v_vldp_044.
it_zycee007-netoth = v_despesas + v_outras + v_ipi +
v_vldp_044 .
it_zycee007-netpr = itab_zycit044-netpr.
v_total = ( ( it_zycee007-netpr * itab_zycit044-qtd_item ) +
it_zycee007-netfre + it_zycee007-netins +
it_zycee007-netoth ).
IF itab_zycit100-icms_dif = 'X' OR
...