Sintoma

Necessidade de criação de novos campos em tabela de transit time.

Solução

Criar novas colunas na tabela de configuração de transit time /PWS/ZYCET291 para gravar as

descrições dos códigos e atualizar o Fechamento de Praça para visualizar os novos campos.

Informações Complementares

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

Nota Número 01712 Data: 12/07/2006 Hora: 08:57:53

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

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

Nota Número              : 01712

Categoria                : Melhoria

Prioridade               : Média

Versão PW.CE             : 6.0

Pacote                   : 00024

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

Texto Rápido:

NOVAS COLUNAS EM TABELA DE TRANSIT TIME

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

Palavras Chave:

TIME; TRANSIT; TABELAS; COLUNAS

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

Objetos da nota:

DYNP /PWS/SAPMZYCE044                        0100

FUGR /PWS/ZYCEGF1

REPS /PWS/MZYCE044F01

REPS /PWS/MZYCE044I01

REPT /PWS/SAPMZYCE044

SHLD /PWS/ZYCEA288

TABD /PWS/ZYCET291

TOBJ /PWS/ZYCET291S

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

Modificações efetuadas em DYNP /PWS/SAPMZYCE044                        0100

process before output.

  module: status.

  loop at itab_zycet289 with control tc_fecpca

                cursor tc_fecpca-current_line.

    module: carrega_estrutura,

            set_screen.

  endloop.

process after input.

  loop at itab_zycet289.

* >> Início da inclusão: TELA 0100

    FIELD /pws/zycee289-transit MODULE trata_transit.

* << Fim da inclusão

    field /pws/zycee289-nrbooking module trata_dtbooking on request.

    module carrega_itab.

  endloop.

  module: user_command,

          user_command_exit at exit-command.

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

Modificações efetuadas em FUGR /PWS/ZYCEGF1

* >> Alterada a lógica de processamento de tabela /PWS/ZYCET291 <<

PROCESS BEFORE OUTPUT.

 MODULE LISTE_INITIALISIEREN.

 LOOP AT EXTRACT WITH CONTROL

  TCTRL_/PWS/ZYCET291 CURSOR NEXTLINE.

   MODULE LISTE_SHOW_LISTE.

 ENDLOOP.

PROCESS AFTER INPUT.

 MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND.

 MODULE LISTE_BEFORE_LOOP.

 LOOP AT EXTRACT.

   MODULE LISTE_INIT_WORKAREA.

   CHAIN.

    FIELD /PWS/ZYCET291-PAISEMB .

    FIELD /PWS/ZYCET291-POSTOEMB .

    FIELD /PWS/ZYCET291-PAISDEST .

    FIELD /PWS/ZYCET291-POSTODEST .

    FIELD /PWS/ZYCET291-ARMADOR .

    FIELD /PWS/ZYCET291-TRANSIT .

    FIELD /PWS/ZYCET291-DESCEMB .

    FIELD /PWS/ZYCET291-DESCDEST .

    MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST.

   ENDCHAIN.

   FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX.

* >> Início da inclusão: TELA 0291

   field /pws/zycet291-postoemb module carrega_descemb on request.

   field /pws/zycet291-postodest module carrega_descdest on request.

* << Fim da inclusão

   CHAIN.

    FIELD /PWS/ZYCET291-PAISEMB .

    FIELD /PWS/ZYCET291-POSTOEMB .

    FIELD /PWS/ZYCET291-PAISDEST .

    FIELD /PWS/ZYCET291-POSTODEST .

    FIELD /PWS/ZYCET291-ARMADOR .

    MODULE LISTE_UPDATE_LISTE.

   ENDCHAIN.

 ENDLOOP.

 MODULE LISTE_AFTER_LOOP.

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

Modificações efetuadas em REPS /PWS/MZYCE044F01

...

  DATA: BEGIN OF wa_zycet015.

          INCLUDE STRUCTURE /pws/zycet015.

  DATA: END OF wa_zycet015.

  DATA: v_name LIKE /pws/zycet015-name1.

  PERFORM verifica_obrigatorio.

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

  perform trata_transit using 'BACK'.

* << Fim da inclusão

  PERFORM comm_dall.

  IF NOT itab_zycet289[] = itab_zycet289_save[].

    DELETE /pws/zycet289 FROM TABLE itab_zycet289_del.

    LOOP AT itab_zycet289_del.

      DELETE FROM /pws/zycet290 WHERE nrseq EQ itab_zycet289_del-nrseq.

...

  ELSEIF NOT sy-subrc IS INITIAL AND NOT v_submit IS INITIAL.

    MESSAGE i016 WITH text-031 sy-uname text-032 p_bukrs.

    LEAVE PROGRAM.

  ENDIF.

ENDFORM.

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

FORM trata_transit USING p_okcode.

  SELECT COUNT(*)

      FROM /pws/zycet291

      WHERE paisemb   EQ /pws/zycee289-cod_pais_emb

        AND postoemb  EQ /pws/zycee289-cod_port_emb

        AND paisdest  EQ /pws/zycee289-cod_pais_dest

        AND postodest EQ /pws/zycee289-cod_port_dest

        AND armador   EQ /pws/zycee289-carrier

        AND transit   EQ /pws/zycee289-transit.

  IF sy-subrc <> 0.

    IF okcode = p_okcode.

      MESSAGE e001 WITH 'Transit-time especificado inválido. Favor'

                        &' verificar parametrização.'(034).

    ELSE.

      /pws/zycee289-transit = itab_zycet289-transit.

    ENDIF.

  ENDIF.

ENDFORM.

* << Fim da inclusão

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

Modificações efetuadas em REPS /PWS/MZYCE044I01

...

          endif.

          leave program.

      endcase.

  endcase.

endmodule.

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

module trata_transit input.

  PERFORM trata_transit USING 'SAVE'.

endmodule.

* << Fim da inclusão

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

Modificações efetuadas em REPT /PWS/SAPMZYCE044

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

Incluído símbolo de texto:

Idioma: PT

Símbolo: 034

Texto: (83 caracteres)

"Configuração de transit-time especificado inválido. Favor verifica"

"r parametrização."

Comprimento máximo: 83

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

Modificações efetuadas em SHLD /PWS/ZYCEA288

MODIFICAR AJUDA DE PESQUISA: /PWS/ZYCEA288

DESCRIÇÃO BREVE: CE - Transit Time

DEFINIÇÃO

OBTENÇÃO DE DADOS

MÉTODO DE SELEÇÃO: /PWS/ZYCET291

COMPORTAMENTO DE DIÁLOGO

TIPO DE DIÁLOGO: Exibição de valores imediata

HOT KEY: ____

EXIT AJUD. PESQUISA: _________________________________

PARÂMETROS:

PARAM.    IMP EXP POSL ISEL EXAJ ELEM. DADOS    MOD  VALOR PROPOSTO

PAISEMB            1    1        /PWS/ZYCEL445

POSTOEMB           2    2        DZOLLS

DESCEMB            3    3        BEZEI30

PAISDEST           4    4        /PWS/ZYCEL445

POSTODEST          5    5        DZOLLS

DESCDEST           6    6        BEZEI30

ARMADOR            7    7        /PWS/ZYCEL104

TRANSIT        X   8    8        /PWS/ZYCEL616

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

Modificações efetuadas em TABD /PWS/ZYCET291

MODIFICAR TABELA TRANSPARENTE: /PWS/ZYCET291

DESCRIÇÃO BREVE: CE - Tabela de Transit Times

CAMPOS NOVOS

CAMPOS:         TP. CAMPO   CH: INI: TAB.VERIF.:    TAB.REF.:     CPO.RE

DESCEMB         BEZEI30

DESCDEST        BEZEI30

CAMPOS MODIFICADOS

CAMPOS:         TP. CAMPO       CH: INI: TAB.VERIF.:    TAB.REF.:     CPO.RE

MANDT           MANDT           X    X    T000

PAISEMB         /PWS/ZYCEL445   X    X    T005

POSTOEMB        DZOLLS          X    X    T615

PAISDEST        /PWS/ZYCEL445   X    X    T005

POSTODEST       DZOLLS          X    X    T615

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

Modificações efetuadas em TOBJ /PWS/ZYCET291S

* >> Acessando a transação SE11 e a tabela /PWS/ZYCET291, acessar a opção "Utilitários -> Gerador de

*    atualização de tabelas" e gerar novamente a visão de atualização da tabela com as seguintes

*    opções:

MODIFICAR VISÃO DA TABELA /PWS/ZYCET291

INDICAÇÕES TÉCNICAS PARA DIÁLOGO

GRUPO DE AUTORIZAÇÃO: ZYCE

OBJETO AUTORIZAÇÃO:   S_TABU_DIS

GRUPO DE FUNÇÕES:     /PWS/ZYCEGF1

CL. DESENVOLVIMENTO:  /PWS/ZYCE

TELAS DE ATUALIZAÇÃO

CTG. ATUALIZAÇÃO:      (X) - NÍVEL ÚNICO

                       (_) - 2 NÍVEIS

Nº TELA AUTORIZAÇÃO:   TELA SÍNTESE:    291

                       TELA INDIVIDUAL: _______

INDICAÇÕES PARA TRASNPORTE DE DADOS DE DIÁLOGO

ROTINA DE REGISTRO:    (X) - ROTINA REG. STANDARD

                       (_) - ROTINA REG. INDIVIDUAL