Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

RADIO BUTTON

Former Member
0 Likes
462

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.

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
440

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.

3 REPLIES 3
Read only

JozsefSzikszai
Active Contributor
0 Likes
440

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

Read only

Former Member
0 Likes
440

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.

Read only

Former Member
0 Likes
441

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.