‎2008 Feb 05 4:50 PM
Hi,
Can some one help in this issue.. I have a requirement as follows:
I have 2 radio buttons(r1,r2 and both belong to radio button group rg1) and 2 select-options (s1, s2).
i can select either r1 or r2.
now if i select r1, the program should not allow user to enter value in s2 and vice versa.
Please tell me how to control this?
Thanks,
Bhaskar.
‎2008 Feb 06 7:38 AM
hi,
hope this will help..reward if useful.
PARAMETER: r1 RADIOBUTTON GROUP rg DEFAULT 'X' USER-COMMAND chx,
r2 RADIOBUTTON GROUP rg .
PARAMETER: p_matnr TYPE eban-matnr MODIF ID g1,
str_loc TYPE eban-lgort MODIF ID g2 .
INITIALIZATION .
if r1 Eq 'X' .
screen-group1 = 'G1'.
screen-active = 1.
MODIFY SCREEN.
endif.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CASE screen-group1 .
WHEN 'G1'.
IF r1 EQ 'X'.
screen-active = 1.
ELSE.
screen-active = 0.
ENDIF.
WHEN 'G2'.
IF r2 EQ 'X'.
screen-active = 1.
ELSE.
screen-active = 0.
ENDIF.
WHEN OTHERS.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
‎2008 Feb 05 4:58 PM
hi Challa,
PARAMETERS : r1 RADIOBUTTON GROUP 1 USER COMMAND uc01,
r2 RADIOBUTTON GROUP 1.
SELECT-OPTIONS : s1 FOR ... MODIF ID 001,
s2 FOR ... MODIF ID 002.
AT SELECTION-SCREEN.
LOOP AT screen.
CASE 'X'.
WHEN r1.
IF screen-group1 EQ '002'.
screen-invisible = '1'.
MODIFY screen.
ENDIF.
WHEN r2.
IF screen-group1 EQ '001'.
screen-invisible = '1'.
MODIFY screen.
ENDIF.
ENDCASE.
ENDLOOP.
hope this helps
ec
‎2008 Feb 06 2:37 AM
Hi, This is a bit of code which you want,just have a look.
if kunnr1 = 'X'.
p_matnr = ' '.
loop at screen.
if screen-group1 = 'ONE'.
screen-input = '1'.
modify screen.
endif.
if screen-group1 = 'TWO'.
screen-input = '0'.
modify screen.
endif.
endloop.
elseif matnr1 = 'X'.
p_kunnr = ' '.
loop at screen.
if screen-group1 = 'TWO'.
screen-input = '1'.
modify screen.
endif.
if screen-group1 = 'ONE'.
screen-input = '0'.
modify screen.
endif.
endloop.
endif.
Reward points,if it is helpful.
Thanks,
chandu.
‎2008 Feb 06 7:38 AM
hi,
hope this will help..reward if useful.
PARAMETER: r1 RADIOBUTTON GROUP rg DEFAULT 'X' USER-COMMAND chx,
r2 RADIOBUTTON GROUP rg .
PARAMETER: p_matnr TYPE eban-matnr MODIF ID g1,
str_loc TYPE eban-lgort MODIF ID g2 .
INITIALIZATION .
if r1 Eq 'X' .
screen-group1 = 'G1'.
screen-active = 1.
MODIFY SCREEN.
endif.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CASE screen-group1 .
WHEN 'G1'.
IF r1 EQ 'X'.
screen-active = 1.
ELSE.
screen-active = 0.
ENDIF.
WHEN 'G2'.
IF r2 EQ 'X'.
screen-active = 1.
ELSE.
screen-active = 0.
ENDIF.
WHEN OTHERS.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.