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_member734916
Participant
0 Likes
437

Hi friends,

just see this code.

tables : t001, bsid, tgsb, zbaero.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.

SELECT-OPTIONS so_bukrs FOR t001-bukrs NO-EXTENSION NO

INTERVALS.

SELECT-OPTIONS so_gjahr FOR bsid-gjahr NO-EXTENSION NO

INTERVALS .

SELECT-OPTIONS so_gsber FOR tgsb-gsber . " NO-EXTENSION NO

*INTERVALS.

SELECT-OPTIONS so_monat FOR bsid-monat NO-EXTENSION NO

INTERVALS.

SELECTION-SCREEN END OF BLOCK b1.

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

PARAMETERS: r1 RADIOBUTTON GROUP rad1,

r2 RADIOBUTTON GROUP rad1,

r3 RADIOBUTTON GROUP rad1,

r4 RADIOBUTTON GROUP rad1,

r5 RADIOBUTTON GROUP rad1,

r6 RADIOBUTTON GROUP rad1.

SELECTION-SCREEN END OF BLOCK b4.

SELECTION-SCREEN BEGIN OF BLOCK b5 WITH FRAME TITLE text-103.

PARAMETERS: r7 RADIOBUTTON GROUP rad2 USER-COMMAND cond1 DEFAULT 'X',

r8 RADIOBUTTON GROUP rad2,

r9 RADIOBUTTON GROUP rad2 .

SELECTION-SCREEN END OF BLOCK b5.

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

SELECT-OPTIONS : so_ero FOR zbaero-zznewdimen.

SELECTION-SCREEN END OF BLOCK b2.

SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-101.

SELECT-OPTIONS : so_sec FOR zbaero-zzsec matchcode object ZTEST.

SELECTION-SCREEN END OF BLOCK b3.

SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.

SELECT-OPTIONS : so_ero_s FOR zbaero-zznewdimen.

SELECTION-SCREEN END OF BLOCK b10.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF screen-name CS 'so_ero' .

IF r7 <> 'X' .

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

IF screen-name CS 'so_sec'.

IF r8 <> 'X'.

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

IF screen-name CS 'so_ero_s'.

IF r9 <> 'X'.

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

******************************************

please execute and see this code.

When I am clicking on radio button r7 it is showing select-options so_ero.

When I am clicking on radio button r8 it is showing select-options so_sec.

but when I clicked on radio button r9 it should show select-options so_ero_s, but it is not showing anything.

I want to display so_ero_e selection screen when i click on r9 button.

thanks and regards.

Krishna

1 ACCEPTED SOLUTION
Read only

naimesh_patel
Active Contributor
0 Likes
394

Hello,

Change your so_ero_s to so_era_s.

SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.

SELECT-OPTIONS : <b>so_era_s</b> FOR zbaero-zznewdimen.

SELECTION-SCREEN END OF BLOCK b10.

and also change it in at selection screen output, like :

IF screen-name CS <b>'so_era_s'.</b>

IF r9 <> 'X'.

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

Regards,

Naimesh

2 REPLIES 2
Read only

naimesh_patel
Active Contributor
0 Likes
395

Hello,

Change your so_ero_s to so_era_s.

SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.

SELECT-OPTIONS : <b>so_era_s</b> FOR zbaero-zznewdimen.

SELECTION-SCREEN END OF BLOCK b10.

and also change it in at selection screen output, like :

IF screen-name CS <b>'so_era_s'.</b>

IF r9 <> 'X'.

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

Regards,

Naimesh

Read only

Former Member
0 Likes
394

hi

Change your so_ero_s to so_era_s.

SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.

SELECT-OPTIONS : so_era_s FOR zbaero-zznewdimen.

SELECTION-SCREEN END OF BLOCK b10.

and also change it in at selection screen output, like :

IF screen-name CS 'so_era_s'.

IF r9 <> 'X'.

screen-input = 0.

screen-output = 0.

screen-active = 0.

MODIFY SCREEN.

ENDIF.

ENDIF.

Regards,

chetan