Meldungen anzeigen
Meldungen lassen sich komfortabel und einfach mit drei Funktionsbausteinen anzeigen. Das Beispielprogramm zeigt die Verwendung.
REPORT zzenno26.
DATA:
l_corr_wanted,
l_exit_command TYPE bal_s_excm,
l_posnr TYPE posnr.
START-OF-SELECTION.
CALL FUNCTION ‘MESSAGES_INITIALIZE’.
l_posnr = 1.
PERFORM add_message USING ‘S’ ‘030’ space space space space.
PERFORM add_message USING ‘W’ ‘041’ ‘TZTS1’ space space space.
l_posnr = 2.
PERFORM add_message USING ‘I’ ‘102’ ‘TXT’ ‘X1’ ‘TAB3’ space.
PERFORM add_message USING ‘W’ ‘042’ space space space space.
PERFORM add_message USING ‘S’ ‘035’ space space space space.
PERFORM add_message USING ‘E’ ‘033’ space space space space.
CALL FUNCTION ‘MESSAGES_SHOW’
EXPORTING
corrections_option = ‘X’
corrections_func_text = ‘Bearbeiten’
show_linno = ‘X’
show_linno_text_len = ‘3’
i_use_grid = ‘X’
i_amodal_window = ‘ ‘
IMPORTING
corrections_wanted = l_corr_wanted
e_exit_command = l_exit_command
EXCEPTIONS
no_messages = 2
OTHERS = 3.
*———————————————————————*
* FORM add_message *
*———————————————————————*
FORM add_message USING value(msgty)
value(msgno)
value(msgv1)
value(msgv2)
value(msgv3)
value(msgv4).
CALL FUNCTION ‘MESSAGE_STORE’
EXPORTING
arbgb = ‘V0’
msgty = msgty
msgv1 = msgv1
msgv2 = msgv2
msgv3 = msgv3
msgv4 = msgv4
txtnr = msgno
zeile = l_posnr
EXCEPTIONS
OTHERS = 3.
ENDFORM.
- Meine Eclipse-Plugins - 22. November 2024
- Interview mit Björn Schulz (Software-Heroes.com) - 3. September 2024
- Daten aus ALV ermitteln - 3. September 2024