topic Re: radio button infor needed? in Application Development and Automation Discussions

radio button infor needed?

Former Member — Fri, 03 Oct 2008 05:29:39 GMT

i had 2 RB GRP 1 & 3 RB in GRP2.

My req is if in GRP1 rad1 is clked than the none RB of GRP2 shd be hide,if in rad2 is clked than 3 RB of GRP2 shd be hide from the screen.

I am trying to to it but giving dupm:too many friled set in group.

LOOP AT SCREEN.

if y1 = 'X'.

clear:rb.

elseIF y2 = 'X'.

IF screen-name CS 'X1'.

screen-active = 0.

modify screen.

ENDIF.

if screen-name CS 'X3'.

screen-active = 0.

modify screen.

ENDIF.

if screen-name CS 'X4'.

screen-active = 0.

modify screen.

ENDIF.

ENDLOOP.

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 05:46:59 GMT

Hi Vipin,

try the below code for your requirement-


Parameters:
y1 radiobutton group grp1 user-command comm default 'X',
y2 radiobutton group grp1,
x1 radiobutton group grp2 user-command com1 default 'X',
x3 radiobutton group grp2,
x4 radiobutton group grp2.



At selection-screen output.

if y2 = 'X'.
LOOP AT SCREEN.
IF screen-name CS 'X1' or screen-name CS 'X3' or screen-name CS 'X4'.
screen-active = 0.
modify screen.
ENDIF.
Endloop.
endif.

Hope it will help you.

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 05:55:48 GMT

i had tried it earlier,its also giving same dump.

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 06:07:19 GMT

Hi,

What is the dump you are getting?

Better you show here the initial code you have written.

Because that code is not giving any dump in my system.

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 06:24:07 GMT

Hi,

Try this out,

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

PARAMETERS: p_out1 TYPE c RADIOBUTTON GROUP a DEFAULT 'X'

USER-COMMAND uc01,

p_out2 TYPE c RADIOBUTTON GROUP a.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.

SELECT-OPTIONS: s_ebeln FOR wa_ekko-ebeln MODIF ID 001,

s_bukrs FOR wa_ekko-bukrs MODIF ID 001,

s_aedat FOR wa_ekko-aedat MODIF ID 001,

s_matnr FOR wa_mard-matnr MODIF ID 002,

s_ersda FOR wa_mard-ersda MODIF ID 002,

s_werks FOR wa_mard-werks MODIF ID 002.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

CASE screen-group1.

WHEN '001'.

IF p_out1 EQ 'X'.

screen-active = '1'.

ELSE.

screen-active = '0'.

ENDIF.

MODIFY SCREEN.

WHEN '002'.

IF p_out2 EQ 'X'.

screen-active = '1'.

ELSE.

screen-active = '0'.

ENDIF.

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

Re: radio button infor needed?

former_member585060 — Fri, 03 Oct 2008 06:59:06 GMT

Try this code

TABLES : sscrfields.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

PARAMETERS : rd_p1 TYPE c RADIOBUTTON GROUP r1 USER-COMMAND abcd,

rd_p2 TYPE c RADIOBUTTON GROUP r1 .

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.

PARAMETERS : rd_r1 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc,

rd_r2 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc,

rd_r3 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

IF rd_p2 = 'X' .

LOOP AT SCREEN.

CASE screen-group1.

WHEN 'CCC'.

screen-input = 0. "Enable

screen-invisible = 1. "Disable

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

ENDIF.

START-OF-SELECTION.

Regards

Bala Krishna

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 08:15:07 GMT

If u still have the problem, then it will be helpfull for u...

MODULE STATUS_0100 OUTPUT.

SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.

if r_two = 'X'.

loop at screen .

case screen-group1.

when 'G2'.

screen-active = 0.

modify screen.

endcase.

endloop.

exit.

elseif r_two = 'X'.

loop at screen .

case screen-group1.

when 'G2'.

screen-active = 1.

modify screen.

endcase.

endloop.

exit.

endif.

ENDMODULE.

Re: radio button infor needed?

Former Member — Fri, 03 Oct 2008 08:43:12 GMT

Hi,

Try with this code:

parameters: p_rd1 radiobutton group grp1 user-command cmd1,

p_rd2 radiobutton group grp1,

p_rd3 radiobutton group grp2 modif id aaa,

p_rd4 radiobutton group grp2 modif id aaa,

p_rd5 radiobutton group grp2 modif id aaa.

at selection-screen output.

if p_rd2 = 'X'.

loop at screen.

if screen-group1 = 'AAA'.

screen-invisible = 0.

screen-active = 0.

endif.

modify screen.

endloop.

endif.

Regards,

Bhaskar