Sintoma

Nota Fiscal Complementar Nota fiscal complementar não contabiliza o IPI, em processos de importação

por conta e ordem (FUNDAP).

Solução

Atualizado programa para calcular e contabilizar o IPI no processos de importação por conta e ordem

(FUNDAP) de acordo com parametrização na /pws/zycit033.

Informações Complementares

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

Nota Número 12229 Data: 23/05/2012 Hora: 15:18:41

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

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

Nota Número              : 12229

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 8.0

Pacote                   : 00011

Agrupamento              : 00115

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

Referência às notas relacionadas:

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

09910  - 00001 - 8.0    - 00002  - NOTA FISCAL COMPLEMENTAR DE FUNDAP DESCONTAR O VALOR DO ICMS

10263  - 00002 - 8.0    - 00003  - TRATAMENTO PARA ADMISSÃO TEMPORARIA NA NOTA FISCAL COMPLEMENTAR

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

NOTA FISCAL COMPLEMENTAR IPI FUNDAP

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

Palavras Chave:

/PWS/SAPMZYCI029

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

Objetos da nota:

REPS /PWS/MZYCI029F01

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

Modificações efetuadas em REPS /PWS/MZYCI029F01

...

  ENDCASE.

  IF itab_zycit100-codregtriicms = '3' OR

     itab_zycit100-codregtriicms = '5'.

    CLEAR it_zycee007-taxval.

  ENDIF.

  CASE itab_zycit033-tribipi.

    WHEN 1.

      it_zycee007-base2   = itab_zycit265_c2-vldp_dif.

      IF /pws/zycit062-flag_icms = 'X' AND

          itab_zycit100-icms_dif NE 'X'.

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

        IF itab_zycit001-modalidade EQ '05'.

          it_zycee007-p_excbas = itab_zycit265_c2-vldp_pis +

            itab_zycit265_c2-vldp_cofins.

        ELSE.

          it_zycee007-p_excbas = it_zycee007-taxval +

          itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

        ENDIF.

* << Fim da exclusão

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

        it_zycee007-p_excbas = it_zycee007-taxval +

        itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

        it_zycee007-rate2 = itab_zycit003-advalipi.

        it_zycee007-taxval2 = it_zycee007-base2 *

                                ( it_zycee007-rate2 / 100 ).

* << Fim da inclusão

      ENDIF.

    WHEN 2.

      it_zycee007-p_excbas = itab_zycit265_c2-vldp_dif +

           itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

      IF /pws/zycit062-flag_icms = 'X' AND

          itab_zycit100-icms_dif NE 'X'.

       it_zycee007-p_excbas = it_zycee007-p_excbas + it_zycee007-taxval.

      ENDIF.

    WHEN 3.

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

        it_zycee007-othbas2  = itab_zycit265_c2-vldp_dif +

             itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

      IF /pws/zycit062-flag_icms = 'X' AND

          itab_zycit100-icms_dif NE 'X'.

        it_zycee007-p_excbas = it_zycee007-taxval.

* << Fim da exclusão

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

      IF itab_zycit001-modalidade EQ '05'.

        it_zycee007-othbas2  = itab_zycit265_c2-vldp_dif.

        it_zycee007-rate2 = itab_zycit003-advalipi.

        it_zycee007-taxval2 = it_zycee007-othbas2 *

                                ( it_zycee007-rate2 / 100 ).

      ELSE.

        it_zycee007-othbas2  = itab_zycit265_c2-vldp_dif +

             itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

      ENDIF.

      IF /pws/zycit062-flag_icms = 'X' AND

          itab_zycit100-icms_dif NE 'X'.

        IF itab_zycit001-modalidade EQ '05'..

          it_zycee007-p_excbas = it_zycee007-taxval +

               itab_zycit265_c2-vldp_pis + itab_zycit265_c2-vldp_cofins.

        ELSE.

          it_zycee007-p_excbas = it_zycee007-taxval.

        ENDIF.

* << Fim da inclusão

      ENDIF.

  ENDCASE.

  it_zycee007-taxtyp2  = itab_zycit033-taxtyp2.

  IF /pws/zycit001-regime EQ '05' OR

     /pws/zycit001-regime EQ '12' .

    READ TABLE itab_zycit374 WITH KEY

...