Zum Zeitpunkt PAI des Selektionsbild wird nach der Übergabe sämtlicher Felder eines Blocks vom Selektionsbild an das ABAP-Programm das Ereignis
AT SELECTION-SCREEN ON BLOCK block
ausgelöst. Ein Block block wird mit den Anweisungen SELECTION-SCREEN BEGIN OF BLOCK block - END OF BLOCK block definiert. Im entsprechenden Ereignisblock kann die Konsistenz der Eingabefelder des Blocks überprüft werden. Wird dabei eine Fehler-Nachricht ausgegeben, werden auf dem Selektionsbild diese Eingabefelder wieder eingabebereit gemacht.
REPORT demo_at_selection_on_block.
SELECTION-SCREEN BEGIN OF BLOCK part1 WITH FRAME.
PARAMETERS: number1 TYPE i,
number2
TYPE i,
number3
TYPE i.
SELECTION-SCREEN END OF BLOCK part1.
SELECTION-SCREEN BEGIN OF BLOCK part2 WITH FRAME.
PARAMETERS: number4 TYPE i,
number5
TYPE i,
number6
TYPE i.
SELECTION-SCREEN END OF BLOCK part2.
AT SELECTION-SCREEN ON BLOCK part1.
IF number3 LT number2 OR
number3 LT number1 OR
number2 LT number1.
MESSAGE e888(sabapdocu) WITH text-001.
ENDIF.
AT SELECTION-SCREEN ON BLOCK part2.
IF number6 LT number5 OR
number6 LT number4 OR
number5 LT number4.
MESSAGE e888(sabapdocu)
WITH text-001.
ENDIF.
Gibt der Benutzer in einem Block keine aufsteigenden Zahlen ein, wird der gesamte entsprechende Block wieder eingabebereit gemacht.