Sintoma

Para evitar a configuração e utilização incorreta dos parâmetros de Tipo de Ordem de Venda, se faz

necessário ocultar alguns campos obsoletos.

Solução

Criação da Visão ZYCEV020.

Informações Complementares

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

Nota Número 04979 Data: 11/10/2007 Hora: 15:11:11

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

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

Nota Número              : 04979

Categoria                : Melhoria

Prioridade               : Baixa

Versão PW.CE             : 7.0

Pacote                   : 00003

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

Referência às notas relacionadas:

Número - Ordem - Descrição Breve

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

Texto Rápido:

CRIAÇÃO DA VISÃO ZYCEV020.

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

Palavras Chave:

CRIADA A VISÃO ZYCEV020 NO LUGAR DA VISÃO ZYCET020.

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

Objetos da nota:

FUGR /PWS/ZYCEGF1

TABD /PWS/ZYCET020

TOBJ /PWS/ZYCET020S

TOBJ /PWS/ZYCEV020V

TRAN /PWS/ZYCET020

VIEW /PWS/ZYCEV020

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

Modificações efetuadas em FUGR /PWS/ZYCEGF1

O include /PWS/LZYCEGF1F01 foi criado com o seguinte código:

FORM preenche_data_zycev020.

  DATA: f_index LIKE sy-tabix.

  TYPES: BEGIN OF s_conteudo,

           zycev023  TYPE /pws/zycev020,

           action(1) TYPE c,

         END OF s_conteudo.

  FIELD-SYMBOLS: <fs_conteudo> TYPE s_conteudo.

  LOOP AT total.

    ASSIGN total TO <fs_conteudo> CASTING.

    IF <fs_conteudo>-action = aendern

        OR <fs_conteudo>-action = neuer_eintrag.

      READ TABLE extract WITH KEY total.

      IF sy-subrc EQ 0.

        f_index = sy-tabix.

      ELSE.

        CLEAR f_index.

      ENDIF.

      <fs_conteudo>-zycev020-usernamec = sy-uname.

      <fs_conteudo>-zycev020-dtuserc   = sy-datum.

      <fs_conteudo>-zycev020-hruserc   = sy-uzeit.

      MODIFY total.

      CHECK f_index GT 0.

      extract = total.

      MODIFY extract INDEX f_index.

    ENDIF.

  ENDLOOP.

  sy-subrc = 0.

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

Modificações efetuadas em TABD /PWS/ZYCET020

Classe de Entrega:

- De A para C.

Elemento de Dados:

- De SYUNAME para AS4USER,

- De SYDATUM para AS4DATE,

- De SYSTTIMLO para AS4TIME.

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

Modificações efetuadas em TOBJ /PWS/ZYCEV020V

Indicações técnicas para diálogo:

- Grupo de autorização: ZYCE.

- Grupo de funções: /PWS/ZYCEGF1.

- Cl.desenvolvimento: /PWS/ZYCE.

Telas de atualização:

- Ctg.atualização: Marcar "Nível Único".

- Nºtela atualização: Em "Tela de síntese" digitar "020".

Indicações para transporte de dados de diálogo:

- Rotina de registro: Marcar "Rotina de registro standard".

- Código de ajuste: Escolher a opção "Ajustável automaticamente"

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

Modificações efetuadas em TRAN /PWS/ZYCET020

- Transação: SM30; marque o flag "Omitir 1ª tela".

- Valores propost: "Nome do campo da tela" - VIEWNAME; "Valor" - /PWS/ZYCEV020.

                   "Nome do campo da tela" - SHOW    ; "Valor" - X.

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

Modificações efetuadas em VIEW /PWS/ZYCEV020

Criar a visão /PWS/ZYCEV020 espelhada nos parâmetros da tabela /PWS/ZYCET020 no ¿Dictionary: exibir

visão¿:

- Aba Caracts: classe de desevolvimento /PWS/ZYCE.

- Aba Tabelas/condições join: /PWS/ZYCET020.

- Aba Cpos visão:

Elemento de Dados:

MANDT

/PWS/ZYCEL443

BUKRS

/PWS/ZYCEL017

/PWS/ZYGLL719

AS4USER

AS4DATE

AS4TIME

Obs.: Para os elementos de dados: AS4USER, AS4DATE e AS4TIME marcar a coluna "P" como R, "Campo

visão só pode ser lido".

- Aba Status at.: Marcar a opção "Ler, modificar, eliminar e inserir", inserir a classe de entrega

"C".