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.
- ALV-Grid Tabelle direkt ändern - 3. März 2023
- Subscreen-Bereiche anzeigen - 23. Februar 2023
- Komplexe Datenobjekte editieren - 23. Januar 2023