Sintoma

1) O bloqueio do cabeçalho do Transporte era realizado com funções criadas incorretamente: Não havia

objeto de bloqueio associado à tabela.

2) Código do programa apresentando mensagens de erros e alertas ao executar a verificação ampliada e

o Code Inspector.

Solução

1) Criação do objeto de bloqueio para a tabela /pws/zycet101 e procedida a substituição das funções

utilizadas pelas funções geradas automaticamente ao se criar o objeto de bloqueio.

2) Alteração do programa para eliminação de mensagens de erros ou alertas ao executar verificação.

Informações Complementares

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

Nota Número 05740 Data: 24/01/2008 Hora: 10:06:35

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

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

Nota Número              : 05740

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00004

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

Texto Rápido:

OBJETO DE BLOQUEIO DO TRANSPORTE /PWS/ZYCET050 E PADRONIZAÇÃO DE CÓDIGO

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

Palavras Chave:

OBJETO, BLOQUEIO, /PWS/ZYCET050, CÓDIGO, PARÂMETROS, RFC

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

Objetos da nota:

DOCU NA/PWS/ZYCIM013

DOCU NA/PWS/ZYCIM104

DYNP /PWS/SAPMZYCR000                        0100

ENQU /PWS/EZYCET050

REPS /PWS/MZYCR000F01

REPS /PWS/MZYCR000I01

REPT /PWS/SAPMZYCR000

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

Modificações efetuadas em DOCU NA/PWS/ZYCIM013

CLASSE DE MENSAGEM: /PWS/ZYCIM

MENSAGEM: 013

MODIFICAÇÃO:

- MARCAR OPÇÃO "AUTO-EXPLICAT.":

Mensagem:    Txt.Breve Mensagem:                  Auto-Explicat.:

013          &1 &2 &3                             (X)

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

Modificações efetuadas em DOCU NA/PWS/ZYCIM104

CLASSE DE MENSAGEM: /PWS/ZYCIM

MENSAGEM: 104

MODIFICAÇÃO:

- MARCAR OPÇÃO "AUTO-EXPLICAT.":

Mensagem:    Txt.Breve Mensagem:                  Auto-Explicat.:

104          &1 &2.                               (X)

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

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

Modificar campos da tela:

CAMPO                           TIPO DE ELEMENTO TELA

/PWS/ZYCEE050-USERNAME          I/O

/PWS/ZYCEE050-APPSVR            I/O

/PWS/ZYCEE050-SYSNR             I/O

/PWS/ZYCEE050-ROUTER            I/O

/PWS/ZYCEE050-GRPNAME           I/O

/PWS/ZYCEE050-LOGONBSRV         I/O

/PWS/ZYCEE050-TPLOGONB          I/O

/PWS/ZYCEE050-PATH_SISC_IMP     I/O

/PWS/ZYCEE050-PATH_SISC_PLI     I/O

MODIFICAÇÃO:

EM ATRIBUTOS \ PROGRAMA:

- DESMARCAR A OPÇÃO "CAMPO DE ENTRADA".

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

Modificações efetuadas em ENQU /PWS/EZYCET050

Criar o objeto de bloqueio /PWS/EZYCET050

Descrição: Bloqueio para tabela /pws/zycet050

Classe de desenvolvimento: /PWS/ZYCE

Tabela primária: /PWS/ZYCET050

Modo de bloqueio: E - Bloqueio de escrita

Parâmetros de bloqueio: (marcar todos)

- USERNAME /PWS/ZYCET050-USERNAME

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

Modificações efetuadas em REPS /PWS/MZYCR000F01

...

    message i013 with text-026.

  else.

    modify /pws/zycet050.

    message i013 with text-027.

  endif.

endform.

form atualiza_dados.

  data: v_lines type p.

  clear itab_zycet050.

  refresh itab_zycet050.

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

  select * from /pws/zycet050 into table itab_zycet050.

* << Fim da exclusão

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

  SELECT *

      FROM /pws/zycet050

      INTO TABLE itab_zycet050.                         "#EC CI_NOWHERE

* << Fim da inclusão

  describe table itab_zycet050 lines v_lines.

  tc_zycet050-lines = v_lines.

endform.

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

Modificações efetuadas em REPS /PWS/MZYCR000I01

module user_command_exit input.

  case sy-ucomm.

    when 'BACK'.

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

      call function '/PWS/ZYCE_DEQUEUE_ZYCET050'.

* << Fim da exclusão

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

      CALL FUNCTION 'DEQUEUE_/PWS/EZYCET050'

           EXPORTING

                username = v_usuario.

* << Fim da inclusão

      leave to screen '0100'.

    when 'EXIT' or 'CANC'.

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

      call function '/PWS/ZYCE_DEQUEUE_ZYCET050'.

* << Fim da exclusão

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

      CASE sy-dynnr.

        WHEN '0200'.

          CALL FUNCTION 'DEQUEUE_/PWS/EZYCET050'

               EXPORTING

                    username = v_usuario.

        WHEN OTHERS.

      ENDCASE.

* << Fim da inclusão

      leave program.

  endcase.

endmodule.

module user_command_0100 input.

  read table itab_zycet050 with key mark = 'X'.

  if not sy-subrc = 0 and ( sy-ucomm ne 'BT_CRIAR' and

                            sy-ucomm ne 'ATUA'     ) .

    message i013 with text-020.

    exit.

  else.

    move itab_zycet050-username to v_usuario.

  endif.

  case sy-ucomm.

    when 'BT_CRIAR' or 'BT_ALT'.

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

      call function '/PWS/ZYCE_ENQUEUE_ZYCET050'

* << Fim da exclusão

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

      CALL FUNCTION 'ENQUEUE_/PWS/EZYCET050'

           EXPORTING

                username       = v_usuario

* << Fim da inclusão

           exceptions

                foreign_lock   = 1

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

                system_failure = 2

                others         = 3.

* << Fim da exclusão

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

                system_failure = 2.

* << Fim da inclusão

      if sy-subrc <> 0.

...

...

      endif.

      if sy-ucomm = 'BT_CRIAR'.

        clear: v_usuario,

               /pws/zycee050.

        v_oper = 'INC'.

      else.

        v_oper = 'ALT'.

      endif.

      call screen '0200'.

    when 'BT_DEL'.

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

      call function '/PWS/ZYCE_ENQUEUE_ZYCET050'

* << Fim da exclusão

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

      CALL FUNCTION 'ENQUEUE_/PWS/EZYCET050'

           EXPORTING

                username       = v_usuario

* << Fim da inclusão

           exceptions

                foreign_lock   = 1

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

                system_failure = 2

                others         = 3.

* << Fim da exclusão

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

                system_failure = 2.

* << Fim da inclusão

      if sy-subrc <> 0.

...

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

Modificações efetuadas em REPT /PWS/SAPMZYCR000

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 001

Texto: (29 caracteres)

"Dados inseridos com sucesso!!"

Comprimento máximo: 29

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 002

Texto: (17 caracteres)

"Subtituir dados:."

Comprimento máximo: 17

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 003

Texto: (19 caracteres)

"Application Server:"

Comprimento máximo: 19

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 004

Texto: (14 caracteres)

"System Number:"

Comprimento máximo: 14

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 006

Texto: (17 caracteres)

"Deseja continuar?"

Comprimento máximo: 17

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 007

Texto: (24 caracteres)

"Confirmação de alteração"

Comprimento máximo: 24

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 008

Texto: (32 caracteres)

"Operação cancelada pelo usuário."

Comprimento máximo: 32

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 009

Texto: (14 caracteres)

"Tipos de logon"

Comprimento máximo: 14

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 010

Texto: (19 caracteres)

"Application Server:"

Comprimento máximo: 19

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 011

Texto: (14 caracteres)

"System Number:"

Comprimento máximo: 14

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 012

Texto: (11 caracteres)

"SAP Router:"

Comprimento máximo: 11

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 013

Texto: (14 caracteres)

"Nome do Grupo:"

Comprimento máximo: 14

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 014

Texto: (15 caracteres)

"Message Server:"

Comprimento máximo: 15

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 015

Texto: (23 caracteres)

"é a configuração atual."

Comprimento máximo: 23

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 017

Texto: (23 caracteres)

"Confirmação de exclusão"

Comprimento máximo: 23

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 018

Texto: (22 caracteres)

"Usuário já cadastrado!"

Comprimento máximo: 22

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

Excluído símbolo de texto:

Idioma: PT

Símbolo: 019

Texto: (29 caracteres)

"Usuário ainda não cadastrado!"

Comprimento máximo: 29