REPORT ZSELECTION_SCREEN.
selection-screen :begin of block test with frame title text-001.
parameters:a radiobutton group one user-command test,
b radiobutton group one.
selection-screen:end of block test.
selection-screen:begin of block test2 with frame title text-002.
parameters:input1(10) TYPE C MODIF ID TL,
input2(10) TYPE C MODIF ID TT.
selection-screen:end of block test2.
AT SELECTION-SCREEN OUTPUT.
IF a = 'X'.
LOOP AT SCREEN.
CHECK SCREEN-GROUP1 = 'TT'.
SCREEN-INPUT = '0'.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
IF b = 'X'.
LOOP AT SCREEN.
CHECK SCREEN-GROUP1 = 'TL'.
SCREEN-INPUT = '0'.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
selection-screen :begin of block test with frame title text-001.
parameters:a radiobutton group one user-command test,
b radiobutton group one.
selection-screen:end of block test.
selection-screen:begin of block test2 with frame title text-002.
parameters:input1(10) TYPE C MODIF ID TL,
input2(10) TYPE C MODIF ID TT.
selection-screen:end of block test2.
AT SELECTION-SCREEN OUTPUT.
IF a = 'X'.
LOOP AT SCREEN.
CHECK SCREEN-GROUP1 = 'TT'.
SCREEN-INPUT = '0'.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
IF b = 'X'.
LOOP AT SCREEN.
CHECK SCREEN-GROUP1 = 'TL'.
SCREEN-INPUT = '0'.
MODIFY SCREEN.
ENDLOOP.
ENDIF.