Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Débito em Conta
Data/Hora da Publicação: 13/04/2007 00:00:00
Data/Hora Última Alteração: 20/06/2011 11:53:26
Descrição da Nota: PIS/COFINS NO CUSTO PELO DÉB.EM CONTA NÃO VERIFICA PARÂMETRO DE CRÉDITO.
Sintoma
Quando o valor dos impostos PIS e COFINS são levados a custo pelo débito em conta o sistema não
considera o credito após fazer a Nota Fiscal.
Solução
ajustado para verificar qualquer tipo de origem
7.0
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 03456 Data: 13/04/2007 Hora: 11:00:36
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 03456
Categoria : Erro de Programa
Prioridade : Alta
Versão PW.CE : 7.0
Pacote : 00027
Agrupamento : 00161
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Descrição Breve
----------------------------------------------------------------------------------------------------
PIS/COFINS NO CUSTO PELO DÉB.EM CONTA NÃO VERIFICA PARÂMETRO DE CRÉDITO.
----------------------------------------------------------------------------------------------------
Palavras Chave:
PIS/COFINS - CUSTO EFETIVO - DÉBITO EM CONTA
PARÂMETRO DE CRÉDITO
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/MZYCI010F03
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/MZYCI010F03
...
itab_zycit036_aux-vlmov = ' '.
itab_zycit036_aux-vldif = ' '.
MODIFY itab_zycit036_aux.
ENDIF.
ELSEIF itab_zycit036_aux-codigo EQ 'IPI'.
IF ( itab_zycit033-tribipi EQ '1' ).
itab_zycit036_aux-vlmov = ' '.
itab_zycit036_aux-vldif = ' '.
MODIFY itab_zycit036_aux.
ENDIF.
* >> Início da exclusão: FORM RETIRA_IMPOSTO
ELSEIF itab_zycit036_aux-codigo EQ 'PIS'
AND itab_zycit036_aux-origem EQ 'NF'.
* << Fim da exclusão
* >> Início da inclusão: FORM RETIRA_IMPOSTO
ELSEIF itab_zycit036_aux-codigo EQ 'PIS'.
* << Fim da inclusão
READ TABLE itab_zycit398 WITH KEY
tpnf = itab_zycit042-tpnf
tributos = itab_zycit036_aux-codigo
bukrs = v_bukrs
clnf = v_clnf.
IF sy-subrc NE 0.
READ TABLE itab_zycit398 WITH KEY
tpnf = itab_zycit042-tpnf
tributos = itab_zycit036_aux-codigo
bukrs = space.
ENDIF.
IF itab_zycit398-creditar EQ 'S'.
itab_zycit036_aux-vlmov = ' '.
itab_zycit036_aux-vldif = ' '.
MODIFY itab_zycit036_aux.
ENDIF.
* >> Início da exclusão: FORM RETIRA_IMPOSTO
ELSEIF itab_zycit036_aux-codigo EQ 'COFINS'
AND itab_zycit036_aux-origem EQ 'NF'.
* << Fim da exclusão
* >> Início da inclusão: FORM RETIRA_IMPOSTO
ELSEIF itab_zycit036_aux-codigo EQ 'COFINS'.
* << Fim da inclusão
READ TABLE itab_zycit398 WITH KEY
tpnf = itab_zycit042-tpnf
tributos = itab_zycit036_aux-codigo
bukrs = v_bukrs
clnf = v_clnf.
IF sy-subrc NE 0.
READ TABLE itab_zycit398 WITH KEY
tpnf = itab_zycit042-tpnf
tributos = itab_zycit036_aux-codigo
bukrs = space.
...