Radiobutton

[Former Member]

Hi,

Can you please tell me how to capture the radio button value in selection screen event.

My requirement is to keep search help based on the radio button selected by the user.

Thanks in advance.

Regards,

Arunsri.

[Former Member]

Hi,

Check the below code.

PARAMETER : R1 RADIOBUTTON GROUP RAD1 default 'X' USER-COMMAND UCOMM,

R2 RADIOBUTTON GROUP RAD1.

PARAMETER : p_file LIKE rlgrap-filename MODIF ID ABC.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF R1 = 'X'.

IF SCREEN-GROUP1 = 'ABC'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ENDIF.

ELSE.

IF SCREEN-GROUP1 = 'ABC'.

SCREEN-INPUT = 1.

MODIFY SCREEN.

ENDIF.

ENDIF.

ENDLOOP.

[Former Member]

Hi,

1.Declaring the radio buttons:

SELECTION-SCREEN: BEGIN OF BLOCK b4 WITH FRAME TITLE text-003 .

PARAMETERS : p_sal RADIOBUTTON GROUP r1 USER-COMMAND fct DEFAULT 'X',

IF p_inv EQ c_x.

code f4if_int_table_value_request

ENDIF.

Regards,

Raj.

[Former Member]

Hi,

maitain selection-screen using parameters statement .

then at selection-screen output.

if p_radio eq 'x'.

use search help here.

loop at screen.

modify screen .

or

if p_radio eq 'x'.

write your code here.

[Former Member]

Hi,

Try changing your code as follows and it should work fine:

REPORT ZUSER_LABEL.

tables:zus_label,ltak.

DATA: itab TYPE zus_label.

PARAMETERS: rad_tc RADIOBUTTON GROUP rad1 DEFAULT 'X' USER-COMMAND rad.

PARAMETERS: rad_pr RADIOBUTTON GROUP rad1.

SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN COMMENT 1(20) text-001.

PARAMETERS : p_tanum LIKE ltak-tanum MODIF ID bl1."OBLIGATORY.

PARAMETERS : p_tapos LIKE ltap-tapos MODIF ID bl1."OBLIGATORY.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN COMMENT 1(20) text-002.

PARAMETERS : p_user LIKE sy-uname MODIF ID bl1.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK blk1.

SELECTION-SCREEN BEGIN OF BLOCK blk3 WITH FRAME.

SELECTION-SCREEN COMMENT 1(20) text-001.

SELECT-OPTIONS : s_tanum FOR ltak-tanum MODIF ID bl2.

PARAMETERS : zp_user LIKE sy-uname MODIF ID bl2.

SELECTION-SCREEN END OF BLOCK blk3.

INITIALIZATION.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

CHECK screen-name = 'P_TCODE' OR screen-name = 'P_PROG'.

IF rad_tc = 'X'.

IF screen-group1 = 'BL1'.

screen-input = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

IF rad_pr = 'X'.

IF screen-group1 = 'BL2'.

screen-input = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

ENDLOOP.

p_user = sy-uname.

zp_user = sy-uname.

Regards,

Shiva

[Former Member]

hi check this...

i thought that it will be possible line this..

if rad1 = 'X'.

parameters:p_pernr like pa0002-pernr .

else.

parameters:p_pernr like pa0002-pernr MATCHCODE OBJECT 'PREM'.

endif.

chech this example and you will understand every thing..

regards,

venkat

[Former Member]

Hi,

1.Declaring the radio buttons:

SELECTION-SCREEN: BEGIN OF BLOCK sat.

PARAMETERS : p_sal RADIOBUTTON GROUP r1 USER-COMMAND fct DEFAULT 'X',

IF p_sal EQ "X'.

required code

ENDIF.

Regards,

sANDESH