CE PLUS - Nota 002663
Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Nota Fiscal
Data/Hora da Publicação: 11/12/2006 00:00:00
Data/Hora Última Alteração: 23/02/2011 09:12:55
Descrição da Nota: VALOR A RECOLHER DO PIS E COFINS NA NF
Sintoma
Ao criar a NF levou o valor a recolher do pis e cofins porém na DI não tem nenhum imposto a recolher
é tudo suspenso
Solução
Atualizado o programa para limpar a tabela
Versões Tratadas
6.0
Pré-Requisitos
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 02663 Data: 11/12/2006 Hora: 14:41:56
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 02663
Categoria : Erro de Programa
Prioridade : Média
Versão PW.CE : 6.0
Pacote : 00025
Agrupamento : 00142
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
02406 - 00001 - 6.0 - 00025 - A NF MOSTRA MENSAGENS DE PIS E COFINS MESMO QUANDO SUSPENSOS
----------------------------------------------------------------------------------------------------
VALOR A RECOLHER DO PIS E COFINS NA NF
----------------------------------------------------------------------------------------------------
Palavras Chave:
NF - PIS - COFINS - VALORES ERRADO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI016F01
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI016F01
...
ENDCASE.
DATA: itab_zycit398 LIKE /pws/zycit398 OCCURS 0 WITH HEADER LINE.
SELECT * FROM /pws/zycit398
INTO TABLE itab_zycit398
WHERE bukrs EQ /pws/zycie041-bukrs
AND clnf EQ itab_zycit033-clnf
AND tpnf EQ itab_zycit033-tpnf
AND ( tributos EQ 'PIS' OR
tributos EQ 'COFINS' ).
IF NOT itab_zycit100-vlpis IS INITIAL.
* >> Início da inclusão: FORM ITENS_NFNEW
clear itab_zycit036.
* << Fim da inclusão
READ TABLE itab_zycit036 WITH KEY nrseq = itab_zycit042-nrseq
ebeln = itab_zycit042-ebeln
ebelp = itab_zycit042-ebelp
codigo = 'PIS'.
it_zycee007-taxval_pis = itab_zycit036-vlreal.
READ TABLE itab_zycit398 WITH KEY tributos = 'PIS'.
IF sy-subrc EQ 0.
it_zycee007-taxtyp_pis = itab_zycit398-taxtyp.
ELSE.
CLEAR it_zycee007-taxtyp_pis.
...
...
v_montante1 = itab_zycit100-basepis.
it_zycee007-pis_excbas = v_montante1.
CLEAR it_zycee007-taxval_pis.
WHEN 3.
PERFORM verifica_montante.
v_montante1 = itab_zycit100-basepis.
it_zycee007-othbas_pis = v_montante1.
ENDCASE.
ENDIF.
IF NOT itab_zycit100-vlcofins IS INITIAL.
* >> Início da inclusão: FORM ITENS_NFNEW
clear itab_zycit036.
* << Fim da inclusão
READ TABLE itab_zycit036 WITH KEY nrseq = itab_zycit042-nrseq
ebeln = itab_zycit042-ebeln
ebelp = itab_zycit042-ebelp
codigo = 'COFINS'.
it_zycee007-taxval_cof = itab_zycit036-vlreal.
READ TABLE itab_zycit398 WITH KEY tributos = 'COFINS'.
IF sy-subrc EQ 0.
it_zycee007-taxtyp_cof = itab_zycit398-taxtyp.
ELSE.
CLEAR it_zycee007-taxtyp_cof.
...