CE PLUS - Nota 000653

Módulo: DRAWBACK

Funcionalidade: Composição

Data/Hora da Publicação: 13/01/2006 00:00:00

Data/Hora Última Alteração: 17/02/2011 12:50:27

Descrição da Nota: PARAMETRO TAMANHO NCM E TRATAMENTO DE LISTA P/ AGRUPAMENTO NA COMPOSIÇÃO

Sintoma

A composição não possui tratamento para lista por agrupamento.

 

 

Solução

Ajustar composição para tratar lista por agrupamento.

 

Versões Tratadas

6.0


Pré-Requisitos

Produto:

Nota

Descrição

EXIT NA SELEÇÃO DOS ITENS DE EXPORTAÇÃO DA COMPOSIÇÃO ISENÇÃO

Informações Complementares

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

Nota Número 00653 Data: 13/01/2006 Hora: 10:44:00

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

 

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

Nota Número              : 00653

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00022

Agrupamento              : 00096

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

Referência às notas relacionadas:

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

 

00514  - 00001 - 6.0    - 00022  - EXIT NA SELEÇÃO DOS ITENS DE EXPORTAÇÃO DA COMPOSIÇÃO ISENÇÃO

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

PARAMETRO TAMANHO NCM E TRATAMENTO DE LISTA P/ AGRUPAMENTO NA COMPOSIÇÃO

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

Palavras Chave:

COMPOSIÇÃO - LISTA - AGRUPAMENTO - /PWS/SAPMZYCI064

PARAMETRO - TAMANHO - NCM

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

Objetos da nota:

DOMA /PWS/ZYCID173

DOMA /PWS/ZYCID174

DTEL /PWS/ZYCIL828

DTEL /PWS/ZYCIL829

REPS /PWS/MZYCI064F03

REPS /PWS/MZYCI064TOP

REPS /PWS/MZYCI064X01

TABD /PWS/ZYCIE259

TABD /PWS/ZYCIE259C

TABD /PWS/ZYCIE259D

TABD /PWS/ZYCIE260

TABD /PWS/ZYCIE260C

TABD /PWS/ZYCIE260D

TABD /PWS/ZYCIT259

TABD /PWS/ZYCIT260

TABD /PWS/ZYCIT321

TABD /PWS/ZYCIT423

 

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

Modificações efetuadas em DOMA /PWS/ZYCID173

Criar dominio: /PWS/ZYCID173

Categoria dados  CHAR

Núm.posições          1

 

Area de valores:

val.fixo|

  | Completo

X | 5 digitos

 

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

Modificações efetuadas em DOMA /PWS/ZYCID174

 

Criar dominio: /PWS/ZYCID174

Categoria dados  DEC

Núm.posições         23

Decimais              2

 

 

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

Modificações efetuadas em DTEL /PWS/ZYCIL828

 

Criar elemento de dados:/PWS/ZYCIL828

Dominio: /PWS/ZYCID173

Denominhação de campo:

 

                  Comprim Denominador de campo

Breve             8       TIPO NCM

Médio             15      TIPO NCM

longa             32      TIPO NCM (LISTA POR AGRUPAMENTO)

Título            32      TIPO NCM (LISTA POR AGRUPAMENTO)

 

 

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

Modificações efetuadas em DTEL /PWS/ZYCIL829

 

Criar elemento de dados:/PWS/ZYCIL829

Dominio: /PWS/ZYCID174

Denominhação de campo:

 

                  Comprim Denominador de campo

Breve             5       Total

Médio             10      Total

longa             20      Campo de totalização

Título            20      Campo de totalização

 

 

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

Modificações efetuadas em REPS /PWS/MZYCI064F03

 

...

  ENDIF.

ENDMODULE.

FORM selecionar_exportacoes3.

  DATA: v_comisag LIKE /pws/zycet066-vlagente,

        v_waersag LIKE /pws/zycet066-waers   ,

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

        v_nrre_temp(14)                      .

* << Fim da exclusão

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

        v_nrre_temp(14)                      ,

        v_ncm_lista(10).

* << Fim da inclusão

  PERFORM verifica_exit USING 'D'

                              '/PWS/SAPMZYCI064'

                              'COI001'.

  e_subrc = 0.

  CLEAR itab_zyglt100 .

...

 

...

    ELSE.

      SELECT a~nrseqre a~nrre a~dtincl a~agrupado a~codenq1

             b~matnr b~vbeln_va b~vbeln_vf b~posnr b~vbeln_vl b~posnl

             b~gewei b~ntgew b~brgew b~waers

             b~vfob  b~vlagente  b~netpr b~seqagrupado b~codnrseq

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

             d~nrseqexp

* << Fim da exclusão

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

             d~nrseqexp c~werks c~steuc c~vkorg_auft c~vtweg_auft

* << Fim da inclusão

             INTO TABLE itab_re_final

             FROM ( /pws/zycet116 AS a INNER JOIN /pws/zycet118 AS b

             ON a~nrseqre EQ b~nrseqre

             INNER JOIN /pws/zycet002 AS c

             ON b~vbeln_va EQ c~vbeln_va AND b~vbeln_vf EQ c~vbeln_vf )

...

 

...

            ENDIF.

          ENDLOOP.

        ENDIF.

      ENDIF.

      IF NOT itab_re_final[] IS INITIAL.

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

        IF /pws/zycit321-ltopc NE '1'.

* << Fim da inclusão

        SELECT * FROM /pws/zycit281 INTO TABLE itab_zycit281

               FOR ALL ENTRIES IN itab_re_final

               WHERE matnr EQ itab_re_final-matnr.

        LOOP AT itab_zycit281.

          READ TABLE itab_zycit434 WITH KEY

                                   werks = itab_zycit281-werks.

          IF sy-subrc NE 0.

            DELETE itab_zycit281 WHERE werks EQ itab_zycit281-werks.

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

            ENDIF.

          ENDLOOP.

        ELSE.

          CLEAR: itab_mvke, itab_zycit423.

          REFRESH: itab_mvke, itab_zycit423.

          SELECT * FROM mvke INTO TABLE itab_mvke

              FOR ALL ENTRIES IN itab_re_final

              WHERE matnr EQ itab_re_final-matnr

                AND vkorg EQ itab_re_final-vkorg

                AND vtweg EQ itab_re_final-vtweg.

          SELECT * FROM /pws/zycit423 INTO TABLE itab_zycit423.

          SELECT * FROM /pws/zycit421 INTO TABLE itab_zycit421.

          LOOP AT itab_zycit421.

            READ TABLE itab_zycit434 WITH KEY

                                     werks = itab_zycit421-werks.

            IF sy-subrc NE 0.

              DELETE itab_zycit421 WHERE werks EQ itab_zycit421-werks.

* << Fim da inclusão

          ENDIF.

        ENDLOOP.

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

        ENDIF.

* << Fim da inclusão

        SELECT * FROM /pws/zycet003 INTO TABLE itab_zycet003

               FOR ALL ENTRIES IN itab_re_final

               WHERE nrseqre EQ itab_re_final-nrseqre.

        IF NOT itab_zycet003[] IS INITIAL.

          SELECT * FROM /pws/zycet001 INTO TABLE itab_zycet001

...

 

...

      ENDIF.

      PERFORM trata_ordem_venda3.

      REFRESH itab_mess_un.

      LOOP AT itab_re_final.

        CHECK NOT itab_re_final-matnr IS INITIAL.

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

        IF /pws/zycit321-ltopc NE '1'.

* << Fim da inclusão

        READ TABLE itab_zycit281 WITH KEY matnr = itab_re_final-matnr.

        IF ( sy-subrc NE 0  ) OR

           ( itab_zycit281-stlnr IS INITIAL AND

             itab_zycit281-stlal IS INITIAL AND

             itab_zycit281-stlan IS INITIAL ).

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

            CLEAR: v_errolog3, it_log_erro3.

            CONCATENATE text-156 itab_re_final-matnr text-166

                                     INTO v_errolog3 SEPARATED BY space.

            MOVE v_errolog3 TO it_log_erro3.

            COLLECT it_log_erro3.

            CONTINUE.

          ENDIF.

        ELSE.

          CLEAR: itab_mvke, itab_zycit423, v_ncm_lista.

          READ TABLE itab_mvke WITH KEY

                matnr = itab_re_final-matnr

                vkorg = itab_re_final-vkorg

                vtweg = itab_re_final-vtweg.

          IF sy-subrc EQ 0.

            IF /pws/zycit321-ncm_list EQ 'X'.

              v_ncm_lista = itab_re_final-steuc(5).

              IF v_ncm_lista+4(1) EQ '.'.

                v_ncm_lista+4(1) = itab_re_final-steuc+5(1).

              ENDIF.

            ELSE.

              v_ncm_lista = itab_re_final-steuc.

            ENDIF.

            READ TABLE itab_zycit423 WITH KEY

                        ncm = v_ncm_lista

                        mvgr1 = itab_mvke-mvgr1.

            IF sy-subrc NE 0.

              CLEAR: v_errolog3, it_log_erro3.

              CONCATENATE text-156 itab_re_final-matnr text-166

                                     INTO v_errolog3 SEPARATED BY space.

              MOVE v_errolog3 TO it_log_erro3.

              COLLECT it_log_erro3.

              CONTINUE.

            ENDIF.

            READ TABLE itab_zycit421 WITH KEY

                        werks = itab_re_final-werks

                        agrup = itab_zycit423-agrup.

            IF sy-subrc NE 0.

              CLEAR: v_errolog3, it_log_erro3.

              CONCATENATE text-156 itab_re_final-matnr text-166

                                     INTO v_errolog3 SEPARATED BY space.

              MOVE v_errolog3 TO it_log_erro3.

              COLLECT it_log_erro3.

              CONTINUE.

            ENDIF.

          ELSE.

* << Fim da inclusão

          CLEAR: v_errolog3, it_log_erro3.

          CONCATENATE text-156 itab_re_final-matnr text-166

                                     INTO v_errolog3 SEPARATED BY space.

          MOVE v_errolog3 TO it_log_erro3.

          COLLECT it_log_erro3.

          CONTINUE.

        ENDIF.

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

        ENDIF.

* << Fim da inclusão

        READ TABLE itab_det_exp_final WITH KEY

                                        codmat   = itab_re_final-matnr

                                      vbeln_va = itab_re_final-vbeln_va

                                      vbeln_vf = itab_re_final-vbeln_vf

                                        posnr    = itab_re_final-posnr

...

 

...

                          INTO v_nrre_temp.

              ENDIF.

              MOVE:

                /pws/zycie258-nrseqd    TO itab_det_exp_final-nrseqd  ,

                /pws/zycie258-lifnr     TO itab_det_exp_final-lifnr   ,

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

                itab_zycit281-werks     TO itab_det_exp_final-werks   ,

* << Fim da inclusão

                itab_zycit281-werks     TO itab_det_exp_final-werks   ,

                itab_zycit281-stlnr     TO itab_det_exp_final-stlnr   ,

                itab_zycit281-stlal     TO itab_det_exp_final-stlal   ,

                itab_zycit281-stlan     TO itab_det_exp_final-stlan   ,

                itab_re_final-matnr     TO itab_det_exp_final-codmat  ,

...

 

...

                                               itab_det_exp_final-meins

                                      matnr = itab_det_exp_final-codmat.

              IF sy-subrc EQ 0.

                CONTINUE.

              ENDIF.

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

              IF /pws/zycit321-ltopc EQ '1'.

                itab_det_exp_final-agrup = itab_zycit423-agrup.

                MOVE: itab_zycet002-werks TO itab_det_exp_final-werks.

                PERFORM converte_unidades

                      USING itab_det_exp_final-codmat

                            itab_det_exp_final-meins

                            itab_zycit421-meins

                   CHANGING itab_det_exp_final-qtd_iten.

              ELSE.

* << Fim da inclusão

              PERFORM converte_um_base USING itab_det_exp_final-codmat

                                    CHANGING itab_det_exp_final-meins

                                            itab_det_exp_final-qtd_iten.

              IF itab_det_exp_final-qtd_iten IS INITIAL.

                itab_mess_un-meins = itab_det_exp_final-meins.

                itab_mess_un-matnr = itab_det_exp_final-codmat.

                APPEND itab_mess_un.

                CONTINUE.

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

                ENDIF.

* << Fim da inclusão

              ENDIF.

              PERFORM converter_moeda_exp USING

                                           itab_det_exp_final-vlfre

                                           itab_det_exp_final-waersfob

                                           'USD'

...

 

...

      ENDIF.

      READ TABLE itab_resumo WITH KEY marc_l = 'X'.

      IF sy-subrc NE 0.

        CLEAR: v_indicatu4.

        MESSAGE s015 WITH text-102.

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

        EXIT.

      ENDIF.

      IF itab_resumo-stlan IS INITIAL AND

         itab_resumo-stlnr IS INITIAL AND

         itab_resumo-stlal IS INITIAL.

        MESSAGE w015 WITH text-133 text-134.

* << Fim da exclusão

        EXIT.

      ENDIF.

      MOVE: sy-tabix TO v_indicatu4.

      MOVE: itab_resumo-codmat   TO /pws/zycie259d-codmat  ,

            /pws/zycie258-werks       TO /pws/zycie259d-werks   ,

...

 

...

                                       codmat   = itab_det_exp-codmat

                                       vbeln_va = itab_det_exp-vbeln_va

                                       vbeln_vf = itab_det_exp-vbeln_vf

                                       posnr    = itab_det_exp-posnr.

    IF sy-subrc EQ 0.

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

      CONTINUE.

    ENDIF.

    IF itab_det_exp-stlnr IS INITIAL OR

       itab_det_exp-stlal IS INITIAL OR

       itab_det_exp-stlan IS INITIAL.

* << Fim da exclusão

      CONTINUE.

    ENDIF.

    CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'

         EXPORTING

              capid                 = 'PP01'

...

 

...

      SELECT * FROM stko INTO TABLE itab_stko

             FOR ALL ENTRIES IN itab_det_exp

             WHERE stlty EQ 'M'

               AND stlnr EQ itab_det_exp-stlnr

               AND stlal EQ itab_det_exp-stlal.

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

      IF /pws/zycit321-ltopc NE '1'.

* << Fim da inclusão

      SELECT SINGLE * FROM /pws/zycit281

          WHERE matnr = itab_det_exp-codmat

            AND werks = itab_det_exp-werks.

      PERFORM explode_lista

                         USING /pws/zycit281-matnr

                               /pws/zycit281-capid

                               /pws/zycit281-werks

                               /pws/zycit281-stlan

                               /pws/zycit281-stlnr

                               /pws/zycit281-stlal.

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

      ELSE.

        PERFORM trata_lista_agrup.

      ENDIF.

* << Fim da inclusão

      IF NOT i_final[] IS INITIAL.

        CLEAR itab_mbew. REFRESH itab_mbew.

        SELECT * FROM mbew INTO TABLE itab_mbew

               FOR ALL ENTRIES IN i_final

               WHERE matnr EQ i_final-insumo

...

 

...

              itab_det_exp-vbeln_va

                                    TO itab_comp_vinc_final-vbeln_va,

              itab_det_exp-vbeln_vf

                                    TO itab_comp_vinc_final-vbeln_vf,

              itab_det_exp-posnr    TO itab_comp_vinc_final-posnr   ,

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

              i_final-insumo        TO itab_comp_vinc_final-codcomp ,

              i_final-meins         TO itab_comp_vinc_final-meins   .

* << Fim da exclusão

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

              i_final-insumo        TO itab_comp_vinc_final-codcomp .

* << Fim da inclusão

            itab_comp_vinc_final-qtd_iten = i_final-qtunit.

            PERFORM converte_um_base USING i_final-insumo

                                  CHANGING i_final-meins

                                      itab_comp_vinc_final-qtd_iten.

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

            move : i_final-meins TO itab_comp_vinc_final-meins.

* << Fim da inclusão

            itab_comp_vinc_final-qtd_total =

              itab_comp_vinc_final-qtd_iten * itab_det_exp-qtd_iten.

            itab_comp_vinc_final-qtd_stotal =

                                     itab_comp_vinc_final-qtd_total.

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

            SELECT SINGLE meins FROM mara

                    INTO itab_comp_vinc_final-meins

                   WHERE matnr EQ it_stpox-idnrk.

* << Fim da exclusão

            COLLECT itab_comp_vinc_final.

          ENDIF.

        ENDLOOP.

      ENDIF.

     SORT itab_comp_vinc_final BY nrseqre nrseq vbeln_va vbeln_vf posnr

...

 

...

            i_codmod_nao_encontrado = 1

            i_func_nao_encontrado   = 2

            i_zexit_nao_encontrado  = 3

            OTHERS                  = 4.

ENDFORM.

* >> Início da inclusão:

FORM trata_lista_agrup.

  DATA: itab_zycit422 LIKE /pws/zycit422 OCCURS 0 WITH HEADER LINE.

  CLEAR: i_final, itab_zycit422.

  REFRESH: i_final, itab_zycit422.

  SELECT * FROM /pws/zycit422 INTO TABLE itab_zycit422

      WHERE agrup EQ itab_det_exp-agrup

        AND werks EQ itab_det_exp-werks

        AND datuv <= sy-datum

        AND datub >= sy-datum.

  LOOP AT itab_zycit422.

    MOVE: itab_zycit422-werks TO i_final-centro,

    itab_det_exp-codmat TO i_final-produto,

    itab_zycit422-idnrk TO i_final-insumo,

    itab_zycit422-menge TO i_final-qtunit,

    itab_zycit422-meins TO i_final-meins.

    APPEND i_final.

  ENDLOOP.

ENDFORM.

FORM converte_unidades USING p_matnr

                             p_meins

                             p_meinsd

                    CHANGING p_qtd.

  DATA: v_meinsb      LIKE marm-meinh,

        v_um_rez      LIKE marm-umrez,

        v_um_ren      LIKE marm-umren,

        v_um_rez2      LIKE marm-umrez,

        v_um_ren2      LIKE marm-umren.

  CLEAR: v_um_rez, v_um_ren, v_um_rez2, v_um_ren2.

  IF p_meins EQ p_meinsd.

    EXIT.

  ENDIF.

  SELECT SINGLE meins FROM mara INTO v_meinsb

    WHERE matnr EQ p_matnr.

  IF v_meinsb NE p_meins.

    SELECT SINGLE umrez umren

             FROM marm INTO (v_um_rez, v_um_ren)

             WHERE matnr = p_matnr

             AND   meinh = p_meins.

    IF sy-subrc NE 0.

      MESSAGE i015 WITH text-237 p_meins text-238 p_matnr.

      CLEAR p_qtd.

      EXIT.

    ENDIF.

    IF v_um_rez IS INITIAL

      OR v_um_ren IS INITIAL.

      EXIT.

    ENDIF.

  ELSE.

    v_um_ren = 1.

    v_um_rez = 1.

  ENDIF.

  IF v_meinsb NE p_meinsd.

    SELECT SINGLE umrez umren

             FROM marm INTO (v_um_rez2, v_um_ren2)

             WHERE matnr = p_matnr

             AND   meinh = p_meinsd.

    IF sy-subrc NE 0.

      MESSAGE i015 WITH text-237 p_meinsd text-238 p_matnr.

      CLEAR p_qtd.

      EXIT.

    ENDIF.

    IF v_um_rez IS INITIAL

      OR v_um_ren IS INITIAL.

      EXIT.

    ENDIF.

  ELSE.

    v_um_ren2 = 1.

    v_um_rez2 = 1.

  ENDIF.

  p_qtd = p_qtd *

    ( ( v_um_rez / v_um_ren ) * ( v_um_ren2 / v_um_rez2 ) ).

ENDFORM.

* << Fim da inclusão

 

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

Modificações efetuadas em REPS /PWS/MZYCI064TOP

 

...

      WHEN 'BTN1'.

        PERFORM execute_button_btn1.

    ENDCASE.

  ENDMETHOD.

ENDCLASS.

* >> Início da inclusão:

AT SELECTION-SCREEN.

  CASE sy-ucomm.

    WHEN 'CRET'.

      PERFORM selecionar_exportacoes3.

  ENDCASE.

* << Fim da inclusão

 

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

Modificações efetuadas em REPS /PWS/MZYCI064X01

 

...

      vfob        LIKE /pws/zycet118-vfob    ,

      vlagente    LIKE /pws/zycet118-vlagente,

      netpr       LIKE /pws/zycet118-netpr   ,

      seqagrupado LIKE /pws/zycet118-seqagrupado,

      codnrseq    LIKE /pws/zycet118-codnrseq,

* >> Início da exclusão:

      nrseqexp    like /pws/zycit282-nrseqexp.

* << Fim da exclusão

* >> Início da inclusão:

      nrseqexp    LIKE /pws/zycit282-nrseqexp,

      werks       type /pws/zycet002-werks   ,

      steuc       type marc-steuc            ,

      vkorg       type mvke-vkorg            ,

      vtweg       type mvke-vtweg            .

      .

* << Fim da inclusão

DATA: END OF itab_re_final.

DATA: BEGIN OF itab_j_1bnflin OCCURS 0.

        INCLUDE STRUCTURE j_1bnflin     .

DATA: END OF itab_j_1bnflin           .

DATA: BEGIN OF itab_j_1bnfdoc OCCURS 0.

...

 

...

      docnum     LIKE /pws/zycit373-docnum   ,

      itmnum     LIKE /pws/zycit373-itmnum   ,

      matnr      LIKE /pws/zycit372-matnr    .

DATA: marcd_l(1) TYPE c.

DATA: END OF itab_det_exp_final.

* >> Início da inclusão:

data: itab_zycit423 type /pws/zycit423 occurs 0 with header line,

      itab_zycit422 type /pws/zycit422 occurs 0 with header line,

      itab_zycit421 type /pws/zycit421 occurs 0 with header line,

      itab_mvke     type mvke occurs 0 with header line.

* << Fim da inclusão

DATA : BEGIN OF itab_zycet130 OCCURS 0.

        INCLUDE STRUCTURE /pws/zycet130.

DATA : END   OF itab_zycet130.

DATA: BEGIN OF itab_zycit259 OCCURS 0.

        INCLUDE STRUCTURE /pws/zycit259.

...

 

 

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

Modificações efetuadas em TABD /PWS/ZYCIE259

 

Nome campo | Elem.dados

...

WAERSEMB   | WAERS

VLFOBEMB   | WRBTV_FPM

LIFNR      | LIFNR

* >> Início da inclusão:

AGRUP      | /PWS/ZYGLL1072

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIE259C

 

Nome campo | Elem.dados

...

WAERSEMB   | WAERS

VLFOBEMB   | WRBTV_FPM

LIFNR      | LIFNR

* >> Início da inclusão:

AGRUP      | /PWS/ZYGLL1072

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIE259D

 

Nome campo | Elem.dados

...

WAERSEMB   | WAERS

VLFOBEMB   | WRBTV_FPM

LIFNR      | LIFNR

* >> Início da inclusão:

AGRUP      | /PWS/ZYGLL1072

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIE260

 

Modificar os campos:

Nome campo | Elem.dados

*De:

T_ICMS     | J_1BTXRATE

*Para:

T_ICMS     | /PWS/ZYCIL829

*De:

T_AFRMM    | J_1BTXRATE

*Para:

T_AFRMM    | /PWS/ZYCIL829

 

 

 

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

Modificações efetuadas em TABD /PWS/ZYCIE260C

 

Modificar os campos:

Nome campo | Elem.dados

*De:

T_ICMS     | J_1BTXRATE

*Para:

T_ICMS     | /PWS/ZYCIL829

*De:

T_AFRMM    | J_1BTXRATE

*Para:

T_AFRMM    | /PWS/ZYCIL829

 

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

Modificações efetuadas em TABD /PWS/ZYCIE260D

 

Modificar os campos:

Nome campo | Elem.dados

*De:

T_ICMS     | J_1BTXRATE

*Para:

T_ICMS     | /PWS/ZYCIL829

*De:

T_AFRMM    | J_1BTXRATE

*Para:

T_AFRMM    | /PWS/ZYCIL829

 

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

Modificações efetuadas em TABD /PWS/ZYCIT259

 

Nome campo | Elem.dados

 

WAERSEMB   | WAERS

VLFOBEMB   | WRBTV_FPM

LIFNR      | LIFNR

* >> Início da inclusão:

AGRUP      | /PWS/ZYGLL1072

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIT260

 

Modificar os campos:

Nome campo | Elem.dados

*De:

T_ICMS     | J_1BTXRATE

*Para:

T_ICMS     | /PWS/ZYCIL829

*De:

T_AFRMM    | J_1BTXRATE

*Para:

T_AFRMM    | /PWS/ZYCIL829

 

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

Modificações efetuadas em TABD /PWS/ZYCIT321

 

 

Nome campo | Elem.dados

...

APR_GEN    | /PWS/ZYCIL817

RECURSIVO  | /PWS/ZYCIL821

APR_IMP    | /PWS/ZYCIL822

UT_IMP     | /PWS/ZYCIL823

 

* >> Início da inclusão:

NCM_LIST   | /PWS/ZYCIL828

* << Fim da inclusão

 

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

Modificações efetuadas em TABD /PWS/ZYCIT423

 

Modificar os campos:

 

Modificar os campos:

Nome campo | Elem.dados

*De:

NCM        | CHAR5

*Para:

NCM        | CHAR10