Sintoma

necessário acrescentar campos da pasta antidumping no replicador da DI

Solução

Atualização do programa da DI para criar opção para replicar campos na pasta de replicação do

detalhe de item.

Informações Complementares

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

Nota Número 06484 Data: 29/04/2008 Hora: 17:11:15

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

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

Nota Número              : 06484

Categoria                : Melhoria

Prioridade               : Alta

Versão PW.CE             : 7.0

Pacote                   : 00005

Agrupamento              : 00045

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

Referência às notas relacionadas:

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

04760  - 00001 - 7.0    - 00003  - ACRESCENTAR CAMPOS NA TELA DE REPLICAÇÃO DA DI

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

NECESSÁRIO ACRESCENTAR CAMPOS DA PASTA ANTIDUMPING NO REPLICADOR DA DI

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

Palavras Chave:

CAMPOS - PASTA - ANTIDUMPING - DI- REPLICADOR

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

Objetos da nota:

DYNP /PWS/SAPMZYCI023                        0440

REPS /PWS/MZYCI023F03

REPS /PWS/MZYCI023I01

REPS /PWS/MZYCI023TOP

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

Modificações efetuadas em DYNP /PWS/SAPMZYCI023                        0440

MODIFICAR CARACTERÍSTICAS DA TELA 0440

Altura atual (linhas)    28

Largura atual (colunas)  77

MODIFICAR FRAME ""

Altura                   17

Linha                    12

MODIFICAR BOTÃO "BOT_DES"

Linha                    1

MODIFICAR BOTÃO "BOT_SELE"

Linha                    1

MODIFICAR CAIXA DE VERIFICAÇÃO "S_ICDIF"

Linha                    19

MODIFICAR CHTXT "S_ICDIF"

Linha                    19

Código função

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OACOR"

Linha                    21

MODIFICAR CHTXT "S_OACOR"

Linha                    21

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OADVALCOF"

Linha                    17

MODIFICAR CHTXT "S_OADVALCOF"

Linha                    17

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OADVALICMS"

Linha                    15

MODIFICAR CHTXT "S_OADVALICMS"

Linha                    15

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OADVALII"

Linha                    13

MODIFICAR CHTXT "S_OADVALII"

Linha                    13

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OADVALIPI"

Linha                    14

MODIFICAR CHTXT "S_OADVALIPI"

Linha                    14

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OADVALPIS"

Linha                    16

MODIFICAR CHTXT "S_OADVALPIS"

Linha                    16

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OALAD"

Linha                    22

MODIFICAR CHTXT "S_OALAD"

Linha                    22

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OEXAD"

Linha                    24

Coluna                   4

MODIFICAR CHTXT "S_OEXAD"

Linha                    24

Coluna                   6

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OEXII"

Linha                    25

Coluna                   4

MODIFICAR CHTXT "S_OEXII"

Linha                    25

Coluna                   6

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OEXIPI"

Linha                    26

Coluna                   4

MODIFICAR CHTXT "S_OEXIPI"

Linha                    26

Coluna                   6

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OEXM"

Linha                    23

Coluna                   4

MODIFICAR CHTXT "S_OEXM"

Linha                    23

Coluna                   6

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OFUND"

Linha                    18

MODIFICAR CHTXT "S_OFUND"

Linha                    18

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OFUNDIC"

Linha                    20

MODIFICAR CHTXT "S_OFUNDIC"

Linha                    20

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OFUNDPC"

Linha                    19

MODIFICAR CHTXT "S_OFUNDPC"

Linha                    19

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OMETV"

Linha                    13

MODIFICAR CHTXT "S_OMETV"

Linha                    13

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OREGICMS"

Linha                    17

MODIFICAR CHTXT "S_OREGICMS"

Linha                    17

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OREGIPC"

Linha                    16

MODIFICAR CHTXT "S_OREGIPC"

Linha                    16

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OREGP"

Linha                    15

MODIFICAR CHTXT "S_OREGP"

Linha                    15

MODIFICAR CAIXA DE VERIFICAÇÃO "S_OREGT"

Linha                    14

MODIFICAR CHTXT "S_OREGT"

Linha                    14

INCLUIR CAIXA DE VERIFICAÇÃO "S_RADBS"

Comprimento Visível      1

Linha                    20

Coluna                   44

Formato                  CHAR

Texto                    _

INCLUIR CHTXT "S_RADBS"

Comprimento Visível      24

Linha                    20

Coluna                   46

Formato                  CHAR

Texto                    Base Cálculo Antidumping

INCLUIR CAIXA DE VERIFICAÇÃO "S_RADQTAD"

Comprimento Visível      1

Linha                    23

Coluna                   44

Formato                  CHAR

Texto                    _

Código função

INCLUIR CHTXT "S_RADQTAD"

Comprimento Visível      13

Linha                    23

Coluna                   46

Formato                  CHAR

Texto                    Qtde. na U.M.

Código função

INCLUIR CAIXA DE VERIFICAÇÃO "S_RADRATE"

Comprimento Visível      1

Linha                    18

Coluna                   44

Formato                  CHAR

Texto                    _

INCLUIR CHTXT "S_RADRATE"

Comprimento Visível      22

Linha                    18

Coluna                   46

Formato                  CHAR

Texto                    Ad Valorem Antidumping

INCLUIR CAIXA DE VERIFICAÇÃO "S_RADUM"

Comprimento Visível      1

Linha                    22

Coluna                   44

Formato                  CHAR

Texto                    _

INCLUIR CHTXT "S_RADUM"

Comprimento Visível      4

Linha                    22

Coluna                   46

Formato                  CHAR

Texto                    U.M.

INCLUIR CAIXA DE VERIFICAÇÃO "S_RADVL"

Comprimento Visível      1

Linha                    21

Coluna                   44

Formato                  CHAR

Texto                    _

INCLUIR CHTXT "S_RADVL"

Comprimento Visível      14

Linha                    21

Coluna                   46

Formato                  CHAR

Texto                    Valor na U.M.

MODIFICAR CONTROLE DE TABELA "TC_IREP"

Linha                    2

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

Modificações efetuadas em REPS /PWS/MZYCI023F03

...

     NOT s_oregicms IS INITIAL   OR

     NOT s_ofundpc  IS INITIAL   OR

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

     NOT s_ofundic  IS INITIAL  .

* << Fim da exclusão

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

     NOT s_ofundic  IS INITIAL   OR

     NOT s_radbs IS INITIAL      OR

     NOT s_radrate IS INITIAL    OR

     NOT s_radvl IS INITIAL      OR

     NOT s_radum IS INITIAL      OR

     NOT s_radqtad IS INITIAL    .

* << Fim da inclusão

    MOVE itab_it TO wa_itb.

    LOOP AT itab_itc WHERE NOT mark IS initial.

      READ TABLE itab_it WITH KEY

           nrseq = itab_itc-nrseq

           ebeln = itab_itc-ebeln

           ebelp = itab_itc-ebelp.

      IF sy-subrc EQ 0.

        IF NOT s_ometv IS INITIAL.

          itab_it-codmat = /pws/zycie100a-codmat.

        ENDIF.

...

...

          itab_it-ipi_orgemiss = /pws/zycie003-ipi_orgemiss.

          itab_it-ipi_numero   = /pws/zycie003-ipi_numero.

          itab_it-ipi_anoemiss = /pws/zycie003-ipi_anoemiss.

        ENDIF.

        IF NOT s_oexad IS INITIAL.

          itab_it-ad_extarif   = /pws/zycie003-ad_extarif.

          itab_it-ad_tipo      = /pws/zycie003-ad_tipo.

          itab_it-ad_orgemiss  = /pws/zycie003-ad_orgemiss.

          itab_it-ad_numero    = /pws/zycie003-ad_numero.

          itab_it-ad_anoemiss  = /pws/zycie003-ad_anoemiss.

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

        ENDIF.

        IF NOT s_radbs IS INITIAL.

          itab_it-baseantid    = /pws/zycie100a-baseantid .

        ENDIF.

        IF NOT s_radvl IS INITIAL.

          itab_it-vlantid = /pws/zycie100a-vlantid.

        ENDIF.

        IF NOT s_radum IS INITIAL.

          itab_it-meinsantid = /pws/zycie100a-meinsantid.

        ENDIF.

        IF NOT s_radqtad IS INITIAL.

          itab_it-qtdeantid = /pws/zycie100a-qtdeantid.

        ENDIF.

        IF NOT s_radrate IS INITIAL.

          itab_it-antidrate = /pws/zycie100a-antidrate.

* << Fim da inclusão

        ENDIF.

        MODIFY itab_it INDEX sy-tabix.

      ENDIF.

    ENDLOOP.

    MOVE wa_itb TO itab_it.

    LEAVE TO SCREEN 0.

  ENDIF.

ENDFORM.

...

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

Modificações efetuadas em REPS /PWS/MZYCI023I01

...

    WHEN '0440'.

      CASE sy-ucomm.

        WHEN 'CHECK'.

          s_icdif = s_ometv  = s_oregt = s_oregp  = s_ofund    =

          s_oacor      = s_oalad = s_oexm      = s_oexii    =

          s_oexipi     = s_oexad = s_oadvalipi = s_oadvalii =

          s_oadvalicms = s_oadvalpis = s_oadvalcof = s_oregipc =

* >> Início da exclusão: MODULE USER_COMMAND_0231

          s_oregicms = s_ofundpc = s_ofundic = 'X'.

* << Fim da exclusão

* >> Início da inclusão: MODULE USER_COMMAND_0231

          s_oregicms = s_ofundpc = s_ofundic =

          s_radbs = s_radrate = s_radvl = s_radum =

          s_radqtad = 'X'.

* << Fim da inclusão

        WHEN 'UNCHECK'.

          s_icdif = s_ometv  = s_oregt = s_oregp  = s_ofund    =

          s_oacor      = s_oalad = s_oexm      = s_oexii    =

          s_oexipi     = s_oexad = s_oadvalipi = s_oadvalii =

          s_oadvalicms = s_oadvalpis = s_oadvalcof = s_oregipc =

* >> Início da exclusão: MODULE USER_COMMAND_0231

          s_oregicms = s_ofundpc = s_ofundic = space.

* << Fim da exclusão

* >> Início da inclusão: MODULE USER_COMMAND_0231

          s_oregicms = s_ofundpc = s_ofundic =

          s_radbs = s_radrate = s_radvl = s_radum = s_radqtad =

          space.

* << Fim da inclusão

        WHEN 'FC_SEL'.

          PERFORM fill_mark USING 'X'.

        WHEN 'FC_DES'.

          PERFORM fill_mark USING space.

        WHEN 'ENTE'.

* >> Início da inclusão: MODULE USER_COMMAND_0231

          LOOP AT itab_itc WHERE mark EQ 'X' .

            EXIT.

          ENDLOOP.

          IF sy-subrc NE 0.

            MESSAGE i015 WITH text-012.

          ENDIF.

* << Fim da inclusão

          PERFORM comm_repl.

          SET SCREEN 0.

          LEAVE SCREEN.

        WHEN 'BACK'.

          SET SCREEN 0.

          LEAVE SCREEN.

      ENDCASE.

    WHEN OTHERS.

      IF sy-dynnr EQ '0400'.

        t_pisbs = itab_it-basepis.

...

...

        WHEN 'REPL'.

          IF v_ipt > 1.

            s_icdif = s_ometv  = s_oregt = s_oregp = s_ofund =

            s_oacor  = s_oalad = s_oexm  = s_oexii =

            s_oexipi = s_oexad =

* >> Início da exclusão: MODULE USER_COMMAND_0231

            s_oregipc = s_oregicms = s_ofundpc = s_ofundic = space.

* << Fim da exclusão

* >> Início da inclusão: MODULE USER_COMMAND_0231

            s_oregipc = s_oregicms = s_ofundpc = s_ofundic =

          s_radbs = s_radrate = s_radvl = s_radum = s_radqtad =

          space.

* << Fim da inclusão

            CALL SCREEN '0440' STARTING AT 5 2.

          ELSE.

            MESSAGE s015 WITH text-041.

          ENDIF.

        WHEN 'ENTE'.

          PERFORM save_data_item.

...

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

Modificações efetuadas em REPS /PWS/MZYCI023TOP

...

  s_oregipc,

  s_oregicms,

  S_OFUNDpc,

  S_OFUNDic,

* >> Início da inclusão:

s_radbs,

s_radrate,

s_radvl,

s_radum,

s_radqtad,

* << Fim da inclusão

...