AT SELECTION-SCREEN ON pa_carr.
SELECT SINGLE carrid
FROM scarr
INTO @DATA(lv_found)
WHERE carrid = @pa_carr.
IF sy-subrc <> 0.
MESSAGE |Fluggesellschaft { pa_carr } gibt es nicht.| TYPE 'E'.
ENDIF.

AT SELECTION-SCREEN OUTPUT.
* Wenn ein konkreter Gerichtstyp aktiv ist, so_meal sperren.
LOOP AT SCREEN INTO DATA(ls_screen).
IF ls_screen-name CP 'SO_MEAL*'.
IF pa_alle = abap_true.
ls_screen-input = 1.
ELSE.
CLEAR: so_meal, so_meal[].
ls_screen-input = 0.
ENDIF.
MODIFY SCREEN FROM ls_screen.
ENDIF.
ENDLOOP.