CE PLUS - Nota 008331

Módulo: DOC. IMPORTAÇÃO

Funcionalidade: DI

Data/Hora da Publicação: 23/04/2009 00:00:00

Data/Hora Última Alteração: 22/02/2011 14:03:56

Descrição da Nota: NÃO ESTÁ PREENCHENDO A ALIQUOTA DE COFINS NA CRIAÇÃO DA DI

Sintoma

Na criação da DI a aliquota de COFINS não está sendo preenchida conforme parametrizado.

 

 

Solução

Corrigir a verificação de preenchimento da aliquota de COFINS.

 

Versões Tratadas

7.0


Pré-Requisitos

Produto:

Nota

Descrição

AJUSTE DE PREFORMANCE. DUMP DETALHE DO ITEM, DI COM MAIS DE 999 ITENS

Informações Complementares

----------------------------------------------------------------------------------------------------

Nota Número 08331 Data: 23/04/2009 Hora: 10:58:48

----------------------------------------------------------------------------------------------------

 

----------------------------------------------------------------------------------------------------

Nota Número              : 08331

Categoria                : Erro de Programa

Prioridade               : Média

Versão PW.CE             : 7.0

Pacote                   : 00009

Agrupamento              : 00095

----------------------------------------------------------------------------------------------------

Referência às notas relacionadas:

Número - Ordem - Versão - Pacote - Descrição Breve

 

07873  - 00001 - 7.0    - 00008  - AJUSTE DE PREFORMANCE. DUMP DETALHE DO ITEM, DI COM MAIS DE 999 I

----------------------------------------------------------------------------------------------------

NÃO ESTÁ PREENCHENDO A ALIQUOTA DE COFINS NA CRIAÇÃO DA DI

----------------------------------------------------------------------------------------------------

Palavras Chave:

CRIAR - DI - ALIQUOTA - COFINS - PARAMETRIZADA - /PWS/ZYCIT407

/PWS/SAPMZYCI023

----------------------------------------------------------------------------------------------------

Objetos da nota:

REPS /PWS/MZYCI023F01

 

----------------------------------------------------------------------------------------------------

Modificações efetuadas em REPS /PWS/MZYCI023F01

 

...

        if sy-subrc eq 0

          and not itab_zycit374-tp_vida_util is initial.

          itab_it-advalpis =

        ( ( ( itab_it-advalpis / 100 ) * itab_zycit374-tp_perman *

     ( 1 + ( itab_it-aliqii / 100 ) + ( itab_it-aliqipi / 100 ) ) ) /

         ( 12 * itab_zycit374-tp_vida_util +

         ( ( ( itab_it-aliqii / 100 ) + ( itab_it-aliqipi / 100 ) ) *

                    itab_zycit374-tp_perman ) ) ) * 100 .

        endif.

      endif.

* >> Início da exclusão: FORM FILL_ITABIT

      IF itab_it-basredpis IS INITIAL.

* << Fim da exclusão

* >> Início da inclusão: FORM FILL_ITABIT

      IF itab_it-basredcof IS INITIAL.

* << Fim da inclusão

        READ TABLE itab_zycit406

                         WITH KEY matnr    = itab_zycit003-matnr

                                  regime   = itab_zycit001-regime

                                  tributos = 'COFINS'.

        IF sy-subrc EQ 0.

          itab_it-basredcof = itab_zycit406-basred   .

          itab_it-cof_alorig =

          itab_it-advalcofins   = itab_zycit406-aliquotas.

        ELSE.

          READ TABLE itab_zycit405

                 WITH KEY ncm      = itab_it-j_1bnbm

                          regime   = itab_zycit001-regime

                          tributos = 'COFINS'.

          IF sy-subrc EQ 0.

...

 

...

            READ TABLE itab_zycit407

                        WITH KEY tributos = 'COFINS'

                                 regime   = itab_zycit001-regime.

            IF sy-subrc EQ 0.

              itab_it-basredcof = itab_zycit407-basred   .

              itab_it-cof_alorig =

              itab_it-advalcofins  = itab_zycit407-aliquotas.

            ELSE.

              itab_it-basredcof = itab_it-advalcofins.

              CLEAR : itab_it-advalcofins,

                      itab_it-vlcofins   .

            ENDIF.

          ENDIF.

        ENDIF.

      ENDIF.

* >> Início da exclusão: FORM FILL_ITABIT

      IF itab_it-basredpis IS INITIAL.

* << Fim da exclusão

* >> Início da inclusão: FORM FILL_ITABIT

      IF itab_it-basredcof IS INITIAL.

* << Fim da inclusão

       READ TABLE itab_zycit406 WITH KEY matnr    = itab_zycit003-matnr

                                                    tributos = 'COFINS'.

        IF sy-subrc EQ 0.

          itab_it-basredcof = itab_zycit406-basred   .

          itab_it-cof_alorig =

          itab_it-advalcofins  = itab_zycit406-aliquotas.

        ELSE.

          READ TABLE itab_zycit405 WITH KEY ncm      = itab_it-j_1bnbm

                                            tributos = 'COFINS'.

          IF sy-subrc EQ 0.

            itab_it-basredcof = itab_zycit405-basred   .

...