Sintoma

Necessário criar os campos PIS e COFINS na pasta Importações/DI Combosta/Impostos

Solução

Criado os campos PIS e COFINS na pasta Importações/DI Combosta/Impostos

Informações Complementares

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

Nota Número 00348 Data: 25/11/2005 Hora: 15:48:55

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

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

Nota Número              : 00348

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 6.0

Pacote                   : 00021

Agrupamento              : 00089

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

FAVOR CRIAR OS CAMPOS PIS E COFINS NA PASTA IMPORTAÇÕES/DI COMBOSTA/IMPO

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

Palavras Chave:

PIS - COFINS - PASTA IMPORTAÇÕES - ATO CONCESSÓRIO

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

Objetos da nota:

DYNP /PWS/SAPMZYCI040                        0220

REPS /PWS/MZYCI040F02

REPS /PWS/MZYCI040TOP2

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI040                        0220

<< Modificação no Layout >>

 Total DI                                  Total Geral

   Nro.    __________  Adição    ___

   II               _______________>         II              ________________

   IPI              _______________>         IPI             ________________

   AFRMM            ________________         AFRMM           ________________

   PIS              ________________         PIS             ________________

   COFINS           ________________         COFINS          ________________

         Nome

            Ctg.      Linha   Coluna  CmprDf  CmVis   Altura  Format Dict  Modif At.Des.Só At

            Gr1 Gr2 Gr3 Gr4  SPA GPA ID parâm             Cód.F                TCmp   TpoLoopExbLoop

                Outros atributos

Inserido   /PWS/ZYCIE260D-VLPIS

              I/O        6       24      16      16       1     CURR   X     X         Off

              Dest, Alinh.à dir.

              Código da moeda=/PWS/ZYCIE260D-WAERSIMP

Inserido     TT_PIS_DICP

                I/O        6       65      16      16       1     CURR                   Off

                NEX

                Dest, Alinh.à dir.

                Código da moeda=/PWS/ZYCIE260D-WAERSIMP

Inserido     /PWS/ZYCIE260D-VLCOFINS

                I/O        7       24      16      16       1     CURR   X     X         Off

                Dest, Alinh.à dir.

                Código da moeda=/PWS/ZYCIE260D-WAERSIMP

Inserido     TT_COFINS_DICP

                I/O        7       65      16      16       1     CURR                   Off

                NEX

                Dest, Alinh.à dir.

                Código da moeda=/PWS/ZYCIE260D-WAERSIMP

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

Modificações efetuadas em REPS /PWS/MZYCI040F02

...

      AND itab_zycit246_final-codcomp EQ /pws/zycie245c-codcomp.

    MOVE-CORRESPONDING itab_zycit246_final TO itab_zycit246.

    APPEND itab_zycit246.

  ENDLOOP.

  CLEAR: itab_res_dicomp. REFRESH itab_res_dicomp.

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

  CLEAR: tt_ii_dicp, tt_ipi_dicp, tt_icms_dicp, tt_afrmm_dicp.

* << Fim da exclusão

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

  CLEAR: tt_ii_dicp, tt_ipi_dicp, tt_icms_dicp, tt_afrmm_dicp,

         tt_pis_dicp, tt_cofins_dicp.

* << Fim da inclusão

  LOOP AT itab_det_dicomp_final.

    CHECK itab_det_dicomp_final-codcomp EQ /pws/zycie245c-codcomp.

    MOVE:

      itab_det_dicomp_final-codcomp     TO itab_res_dicomp-codcomp    ,

      itab_det_dicomp_final-nrdi        TO itab_res_dicomp-nrdi       ,

      itab_det_dicomp_final-adicao      TO itab_res_dicomp-adicao     ,

      itab_det_dicomp_final-qtd_vinc    TO itab_res_dicomp-qtd_vinc   ,

      itab_det_dicomp_final-i_vlcifn_mi TO itab_res_dicomp-i_vlcifn_mi.

    COLLECT itab_res_dicomp.

    tt_ii_dicp   = tt_ii_dicp   + itab_det_dicomp_final-i_vlii.

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

    tt_pis_dicp  = tt_pis_dicp  + itab_det_dicomp_final-vlpis.

    tt_cofins_dicp = tt_cofins_dicp + itab_det_dicomp_final-vlcofins.

* << Fim da inclusão

    tt_ipi_dicp  = tt_ipi_dicp  + itab_det_dicomp_final-i_vlipi.

    tt_icms_dicp = tt_icms_dicp + itab_det_dicomp_final-i_vlicms.

    tt_afrmm_dicp = tt_afrmm_dicp + itab_det_dicomp_final-vlafrmm.

  ENDLOOP.

  LOOP AT itab_res_dicomp.

...

...

      MODIFY itab_res_dicomp.

    ENDIF.

  ENDLOOP.

  pressed_tab_3a = ok_code2.

  dynpronr3a     = '0214'.

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

  pressed_tab_6a = 'FS_RESDI2'.

  dynpronr6a     = '0215'.

* << Fim da inclusão

ENDFORM.

FORM carrega_di_composta2.

  CLEAR: itab_det_dicomp_final,

         itab_zycit260        .

  REFRESH: itab_det_dicomp_final,

...

...

 itab_det_dicomp-i_vlipi .

    /pws/zycie260d-i_vlicms = /pws/zycie260d-i_vlicms +

 itab_det_dicomp-i_vlicms.

    /pws/zycie260d-vlafrmm = /pws/zycie260d-vlafrmm +

 itab_det_dicomp-vlafrmm.

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

    /pws/zycie260d-vlpis = /pws/zycie260d-vlpis +

itab_det_dicomp-vlpis.

    /pws/zycie260d-vlcofins = /pws/zycie260d-vlcofins +

 itab_det_dicomp-vlcofins.

* << Fim da inclusão

    APPEND itab_det_dicomp.

  ENDLOOP.

  pressed_tab_6a = ok_code2.

  dynpronr6a     = '0220'.

ENDFORM.

...

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

Modificações efetuadas em REPS /PWS/MZYCI040TOP2

...

      v_erro2(1)         TYPE c                          ,

      v_tabix2           LIKE sy-tabix                   ,

      marc_rdc(1)        TYPE c                          ,

      v_descr1_0216(40)  TYPE c                          ,

      marc_rrm(1)        TYPE c                          ,

* >> Início da exclusão:

      tt_ii_dicp         LIKE /pws/zycie260d-i_vlii           ,

* << Fim da exclusão

* >> Início da inclusão:

      tt_pis_dicp        LIKE /pws/zycie260d-vlpis           ,

      tt_cofins_dicp     LIKE /pws/zycie260d-vlcofins        ,

      tt_ii_dicp         LIKE /pws/zycie260d-i_vlii          ,

* << Fim da inclusão

      tt_ipi_dicp        LIKE /pws/zycie260d-i_vlipi          ,

      tt_icms_dicp       LIKE /pws/zycie260d-i_vlicms         ,

      tt_afrmm_dicp       LIKE /pws/zycie260d-i_vlicms         ,

      v_verificp2(1)     TYPE c VALUE 'N'                ,

      v_verificp2_merc   TYPE c VALUE 'S'                ,

...