CE PLUS - Nota 007089
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 06/08/2008 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:17:20
Descrição da Nota: NOTA FISCAL A LINHA DO IPI NÃO ESTÁ FECHANDO COM O VALOR TOTAL DA NF
Sintoma
Nota Fiscal a linha do IPI não está fechando com o valor total da NF e valor da base de ICMS.
Solução
Na Nota Fiscal verificar os valores da linha do IPI com o valor total da NF e valor da base de ICMS.
Versões Tratadas
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 07089 Data: 06/08/2008 Hora: 11:56:14
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 07089
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 7.0
Pacote : 00006
Agrupamento : 00059
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
00001 - 06714 - 6.0 - 00021 - DI - SUSPENSÃO DE ICMS
----------------------------------------------------------------------------------------------------
NOTA FISCAL A LINHA DO IPI NÃO ESTÁ FECHANDO COM O VALOR TOTAL DA NF
----------------------------------------------------------------------------------------------------
Palavras Chave:
NOTA FISCAL - IPI - BASE - ICMS
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ELSE.
CLEAR it_zycee007-taxval2.
ENDIF.
it_zycee007-taxtyp2 = itab_zycit033-taxtyp2.
CASE itab_zycit033-tribipi.
WHEN 1.
PERFORM verifica_montante.
v_montante1 = itab_zycit100-baseipi.
it_zycee007-base2 = v_montante1.
IF /pws/zycit001-meioemba = 'PS'.
* >> Início da exclusão: FORM ITENS_NFNEW
it_zycee007-base2 = it_zycee007-base2 +
it_zycee007-taxval.
* << Fim da exclusão
* >> Início da inclusão: FORM ITENS_NFNEW
it_zycee007-base2 = it_zycee007-base2.
if /pws/zycit062-flag_icms = 'X'.
it_zycee007-p_excbas = it_zycee007-taxval .
endif.
* << Fim da inclusão
ENDIF.
IF itab_zycit100-codregtriicms EQ '3'.
it_zycee007-p_excbas = itab_zycit100-vlicms.
ENDIF.
WHEN 2.
PERFORM verifica_montante.
v_montante1 = itab_zycit100-baseipi.
it_zycee007-p_excbas = v_montante1.
CLEAR it_zycee007-taxval2.
IF /pws/zycit001-meioemba = 'PS'.
* >> Início da inclusão: FORM ITENS_NFNEW
if /pws/zycit062-flag_icms = 'X'.
* << Fim da inclusão
it_zycee007-p_excbas = it_zycee007-p_excbas +
it_zycee007-taxval.
* >> Início da inclusão: FORM ITENS_NFNEW
endif.
* << Fim da inclusão
IF itab_zycit100-codregtriipi = '1' .
it_zycee007-p_excbas = it_zycee007-p_excbas +
itab_zycit100-vlipi.
ENDIF.
ENDIF.
WHEN 3.
PERFORM verifica_montante.
v_montante1 = itab_zycit100-baseipi.
it_zycee007-othbas2 = v_montante1.
IF /pws/zycit001-meioemba = 'PS'.
it_zycee007-othbas2 = it_zycee007-othbas2 .
* >> Início da inclusão: FORM ITENS_NFNEW
if /pws/zycit062-flag_icms = 'X'.
* << Fim da inclusão
it_zycee007-p_excbas = it_zycee007-taxval .
* >> Início da inclusão: FORM ITENS_NFNEW
endif.
* << Fim da inclusão
ENDIF.
IF itab_zycit100-codregtriicms EQ '3'.
it_zycee007-p_excbas = itab_zycit100-vlicms.
ENDIF.
ENDCASE.
ENDIF.
...
...
it_zycee007-p_excbas = it_zycee007-p_excbas +
itab_zycit042-vldp + ( ( it_zycee007-taxval * 100 ) /
v_basred ) + v_impostos.
ENDIF.
ELSEIF /pws/zycit001-meioemba NE 'PS'.
it_zycee007-p_excbas = it_zycee007-p_excbas + itab_zycit042-vldp +
v_impostos.
ELSE.
CASE itab_zycit033-tribipi.
WHEN 1.
* >> Início da exclusão: FORM ITENS_NFNEW
it_zycee007-base2 = it_zycee007-base2 +
it_zycee007-taxval_pis + it_zycee007-taxval_cof.
* << Fim da exclusão
* >> Início da inclusão: FORM ITENS_NFNEW
it_zycee007-base2 = it_zycee007-base2 .
it_zycee007-p_excbas = it_zycee007-p_excbas +
itab_zycit042-vldp + v_impostos.
* << Fim da inclusão
WHEN 2.
it_zycee007-p_excbas = it_zycee007-p_excbas +
* >> Início da exclusão: FORM ITENS_NFNEW
it_zycee007-taxval_pis + it_zycee007-taxval_cof.
* << Fim da exclusão
* >> Início da inclusão: FORM ITENS_NFNEW
itab_zycit042-vldp + v_impostos.
* << Fim da inclusão
WHEN 3.
IF /pws/zycit001-meioemba = 'PS'.
* >> Início da exclusão: FORM ITENS_NFNEW
it_zycee007-othbas2 = it_zycee007-othbas2 +
it_zycee007-taxval_pis + it_zycee007-taxval_cof.
* << Fim da exclusão
* >> Início da inclusão: FORM ITENS_NFNEW
it_zycee007-othbas2 = it_zycee007-othbas2 .
* << Fim da inclusão
it_zycee007-p_excbas = it_zycee007-p_excbas +
itab_zycit042-vldp + v_impostos.
ENDIF.
ENDCASE.
ENDIF.
ENDIF .
CLEAR /pws/zycit036.
it_zycee007-mfrpn = itab_zycit003-mfrpn.
CONCATENATE itab_zycit042-ebeln '/' itab_zycit042-ebelp
INTO it_zycee007-msg1.
...