CE PLUS - Nota 003456

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

Versões Tratadas

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.

...