ラジオボタンの処理 

選択画面の PAI イベントでは、ラジオボタングループの全項目の内容が選択画面から ABAP プログラムに渡されると、

AT SELECTION-SCREEN ON RADIOBUTTON GROUP <radi> イベント

がトリガされます。ラジオボタングループ <radi> を定義するには、対応する PARAMETERS 命令に RADIOBUTTON GROUP <radi> を追加します。このイベントブロックを使用して、ラジオボタングループ全体をチェックすることができます。このイベントブロック内でエラーメッセージが発生すると、選択画面のラジオボタングループが再び入力可能になります。ラジオボタングループの個々の項目は AT SELECTION-SCREEN ON <field> イベントをトリガしません。

REPORT EVENT_DEMO.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME.
  PARAMETERS: R1 RADIOBUTTON GROUP RAD1 DEFAULT 'X',
              R2 RADIOBUTTON GROUP RAD1,
              R3 RADIOBUTTON GROUP RAD1.
SELECTION-SCREEN END OF BLOCK B1.

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME.
  PARAMETERS: R4 RADIOBUTTON GROUP RAD2 DEFAULT 'X',
              R5 RADIOBUTTON GROUP RAD2,
              R6 RADIOBUTTON GROUP RAD2.
SELECTION-SCREEN END OF BLOCK B2.

AT SELECTION-SCREEN ON RADIOBUTTON GROUP RAD1.

  IF R1 = 'X'.
    MESSAGE W040(HB).
  ENDIF.

AT SELECTION-SCREEN ON RADIOBUTTON GROUP RAD2.

  IF R4 = 'X'.
    MESSAGE W040(HB).
   ENDIF.

ユーザがいずれかのラジオボタングループを変更しなかった場合、警告が表示されます。