Categorias

Implementação de mensagens com o comando MESSAGE

Muitas vezes a utilização de mensagens em nossos programas Abap torna-se necessária como, por exemplo, para avisar que o usuário não tem permissão para executar aquela transação, ou que deu erro em determinado arquivo, entre outros casos. O objetivo desse artigo é demonstrar alguns usos do comando MESSAGE.

Uma mensagem pode ser dos tipos “A”, “E”, “I”, “S”, “W” ou “X”. Informações detalhadas sobre esses tipos são encontradas apertando a tecla “F1” em cima do comando MESSAGE no código. Pode-se utilizar mensagens com textos de classe de mengens (SE91), por elementos de textos ou variáveis com texto em seu valor.

Segue código fonte básico exemplificando.

REPORT  ZMSGS.

* As linhas comentadas também são mensagens válidas.

DATA: v_text TYPE char45.
PARAMETERS: p_nome TYPE CHAR20.

IF p_nome NE 'ALEX' AND p_nome NE 'ADMIN'.
   v_text = 'Não autorizado.'.
   MESSAGE v_text TYPE 'A'.
ELSE.
   v_text = 'Permitido'.
*   MESSAGE 'Usuário Autorizado!' TYPE 'I'.
*   MESSAGE ID 'ZEXERCISE' TYPE 'W' number '000' WITH v_text.
    MESSAGE s000(ZEXERCISE) WITH 'Autorizado'.

ENDIF.