radio button in selection screen

[Former Member]

hi,

i have an ALV Report, in the selection screen there are 2 radio buttons.

RB1 default 'X'.

and

RB2

and there are 5 select-options.

the issue is , the radio button RB1 IS default when RB1 is there one of the select option should be disabled.

and when we click on RB2 the select option should be enabled.

the selec option is

select - option : s_bukrs for bseg-bukrs.

please help with the code.

thanks in advance

[Former Member]

Hello Sree,

You need to assign modif id to select-options and then in LOOP AT SCREEN you can check for modif id and change that control.

SELECTION-SCREEN BEGIN OF BLOCK 001. 
PARAMETERS: P_R1  RADIOBUTTON GROUP SEL DEFAULT 'X' USER-COMMAND AC, 
                         P_R2 RADIOBUTTON GROUP SEL. 
    SELECT-OPTIONS S1 FOR <field> MODIF ID M1. 
    SELECT-OPTIONS S1 FOR <field>  MODIF ID M2. 
SELECTION-SCREEN END OF BLOCK 001. 

AT SELECTION-SCREEN OUTPUT. 
LOOP AT SCREEN. 
  IF P_R1 = 'X'. 
      IF SCREEN-GROUP1 = 'M1'. 
        SCREEN-INPUT = '0'.  
      ENDIF. 
      IF SCREEN-GROUP1 = 'M2'. 
        SCREEN-INPUT = '1'. 
      ENDIF. 
  ELSEIF P_R2 = 'X'. 
     IF SCREEN-GROUP1 = 'M2'. 
       SCREEN-INPUT = '0'. 
     ENDIF. 
     IF SCREEN-GROUP1 = 'M1'. 
       SCREEN-INPUT = '1'. 
     ENDIF. 
  ENDIF. 
  MODIFY SCREEN. 
ENDLOOP. 

Hope this helps!

Thanks,

Augustin.

[Former Member]

Please SEARCH in SCN before posting

[Former Member]

TRY SOMETHING LIKE FOLLOWING

PARAMETERS : RB1 RADIOBUTTON GROUP R1 USER-COMMAND R00,
                          RB2 RADIOBUTTON GROUP R1.
SELECT-OPTION : S_BUKRS FOR BSEG-BUKRS.
AT SELECTION-SCREEN OUTPUT.
   LOOP AT SCREEN.
      IF RB1 = 'X' AND SCREEN-NAME  CS 'S_BUKRS'.
            SCREEN-INPUT = 0.
      ENDIF.
      IF RB2 = 'X' AND SCREEN-NAME  CS 'S_BUKRS'.
            SCREEN-INPUT = 1.
      ENDIF.
     MODIFY SCREEN.
   ENDLOOP.

[Former Member]

Hi Sree,

Try this link, I hope it will help you.

[Link|;

Regards,

Nidhi Kothiyal

[sridhar_meesala]

Hi,

In AT SELECTION SCREEN OUTPUT

IF screen-name = 'select_option'.
 screen-input = 0.
 MODIFY SCREEN.
ENDIF.

IF R2 = 'X'.
LOOP AT SCREEN.
if screen-name = 'select_option'.
Screen-Input = 0.
Modify Screen.
ENDIF.
ENDLOOP.

Thanks,

Sri.

[Former Member]

Hi,

Try this code,

TABLES : KNA1,EKKO.

PARAMETERS : C1 RADIOBUTTON GROUP VIJJ USER-COMMAND VJY ,

C2 RADIOBUTTON GROUP VIJJ .

SELECT-OPTIONS : S_CUSTNO FOR KNA1-KUNNR MODIF ID AKP DEFAULT 1000 TO 1033.

INITIALIZATION.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF C1 = 'X'.

IF SCREEN-GROUP1 = 'VKP'.

SCREEN-INPUT = 0.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

IF SCREEN-GROUP1 = 'PKP'.

SCREEN-INPUT = 0.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

ELSEIF C2 = 'X'.

IF SCREEN-GROUP1 = 'PKP'.

SCREEN-INPUT = 0.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

IF SCREEN-GROUP1 = 'AKP'.

SCREEN-INPUT = 0.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

ENDLOOP.

Regards,

Vijay

[Former Member]

Check the below sample code

TABLES: mara, kna1.

SELECT-OPTIONS: s_matnr FOR mara-matnr MODIF ID gr,

s_kunnr FOR kna1-kunnr MODIF ID gr1.

PARAMETERS: p_matnr RADIOBUTTON GROUP rad USER-COMMAND tst DEFAULT 'X',

p_kunnr RADIOBUTTON GROUP rad.

AT SELECTION-SCREEN OUTPUT.

IF p_matnr = 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'GR1'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ELSE.

LOOP AT SCREEN.

IF screen-group1 = 'GR'.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

Hope this will help you.

[Former Member]

Hello Sree,

You need to assign modif id to select-options and then in LOOP AT SCREEN you can check for modif id and change that control.

SELECTION-SCREEN BEGIN OF BLOCK 001. 
PARAMETERS: P_R1  RADIOBUTTON GROUP SEL DEFAULT 'X' USER-COMMAND AC, 
                         P_R2 RADIOBUTTON GROUP SEL. 
    SELECT-OPTIONS S1 FOR <field> MODIF ID M1. 
    SELECT-OPTIONS S1 FOR <field>  MODIF ID M2. 
SELECTION-SCREEN END OF BLOCK 001. 

AT SELECTION-SCREEN OUTPUT. 
LOOP AT SCREEN. 
  IF P_R1 = 'X'. 
      IF SCREEN-GROUP1 = 'M1'. 
        SCREEN-INPUT = '0'.  
      ENDIF. 
      IF SCREEN-GROUP1 = 'M2'. 
        SCREEN-INPUT = '1'. 
      ENDIF. 
  ELSEIF P_R2 = 'X'. 
     IF SCREEN-GROUP1 = 'M2'. 
       SCREEN-INPUT = '0'. 
     ENDIF. 
     IF SCREEN-GROUP1 = 'M1'. 
       SCREEN-INPUT = '1'. 
     ENDIF. 
  ENDIF. 
  MODIFY SCREEN. 
ENDLOOP. 

Hope this helps!

Thanks,

Augustin.