1. Aufruf eines selbst definierten Meldungsfenster als Popup

CALL FUNCTION ‚Z_POPUP_RETURN_PARAM‘
TABLES
RETURN = SD_RETURN.

2. Funktionsdefinition:

FUNCTION Z_POPUP_RETURN_PARAM.
*“———————————————————————-
*“*“Lokale Schnittstelle:
*“ TABLES
*“ RETURN STRUCTURE BAPIRET2 OPTIONAL
*“———————————————————————-

RETURN = RETURN.
CLEAR I_RETURN[].
LOOP AT RETURN INTO I_RETURN.
* IF I_RETURN-TYPE EQ ‚E‘.
APPEND I_RETURN.
* ENDIF.
ENDLOOP.

CALL SCREEN 201 STARTING AT 1 3
ENDING AT 120 16.
ENDFUNCTION.

3. DYNPRO Ablauflogik

PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL ‚CTL_RET‘
MODULE CTL_RET_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE CTL_RET_CHANGE_COL_ATTR.
LOOP AT I_RETURN
WITH CONTROL CTL_RET
CURSOR CTL_RET–CURRENT_LINE.
MODULE CTL_RET_GET_LINES.
*&SPWIZARD: MODULE CTL_RET_CHANGE_FIELD_ATTR
ENDLOOP.

* MODULE STATUS_0201.
*
PROCESS AFTER INPUT.
*&SPWIZARD: PAI FLOW LOGIC FOR TABLECONTROL ‚CTL_RET‘
LOOP AT I_RETURN.
CHAIN.
FIELD I_RETURN–TYPE.
FIELD I_RETURN–ID.
FIELD I_RETURN–NUMBER.
FIELD I_RETURN–MESSAGE.
FIELD I_RETURN–LOG_NO.
FIELD I_RETURN–LOG_MSG_NO.
FIELD I_RETURN–MESSAGE_V1.
FIELD I_RETURN–MESSAGE_V2.
FIELD I_RETURN–MESSAGE_V3.
FIELD I_RETURN–MESSAGE_V4.
FIELD I_RETURN–PARAMETER.
FIELD I_RETURN–ROW.
FIELD I_RETURN–FIELD.
FIELD I_RETURN–SYSTEM.
ENDCHAIN.
ENDLOOP.
* LOOP WITH CONTROL CTL_RET.
* CURSOR CTL_RET-CURRENT_LINE.
* MODULE 201_GET_MARK.
* ENDLOOP.
MODULE CTL_RET_USER_COMMAND.
*&SPWIZARD: MODULE CTL_RET_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE CTL_RET_CHANGE_COL_ATTR.

* MODULE USER_COMMAND_0201.