topic RADIO BUTTON in Application Development and Automation Discussions

RADIO BUTTON

Former Member — Tue, 05 Feb 2008 16:50:00 GMT

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.

Re: RADIO BUTTON

JozsefSzikszai — Tue, 05 Feb 2008 16:58:50 GMT

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

Re: RADIO BUTTON

Former Member — Wed, 06 Feb 2008 02:37:37 GMT

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.

Re: RADIO BUTTON

Former Member — Wed, 06 Feb 2008 07:38:30 GMT

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.