SELECT-OPTIONS:S_TXT01 FOR vbak-vtweg.
PARAMETERS: r_button RADIOBUTTON GROUP rg1 USER-COMMAND com DEFAULT 'X' .
INITIALIZATION.
AT SELECTION-SCREEN.
************************************************************************
* AT SELECTION-SCREEN OUTPUT.
************************************************************************
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF r_button = 'X'.
IF screen-name CS 'S_TXT01' .
screen-active = '0'.
MODIFY SCREEN.
ENDIF.
ENDIF.
ENDLOOP