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

ADDING RADIOBUTTON AT RUNTIME IN MODULE POOL

Former Member
0 Likes
278

HI EVERYONE.

CAN ANYONE HELP ME OUT IN SOLVING THIS PROBLEM.I WANT TO ADD RADIOBUTTON TO MY SCREEN AT RUNTIME NOT BY DRAG AND DROP METHOD.HOW CAN WE ACHIEVE THIS.

1 REPLY 1
Read only

vallamuthu_madheswaran2
Active Contributor
0 Likes
240

Hi,

The following code is report program. u can use in module pool (PBO). cleck the check box and press enter.

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

BEGIN OF LINE.

PARAMETERS r1 RADIOBUTTON GROUP a DEFAULT 'X'.

SELECTION-SCREEN COMMENT 4(25) text-003. "test-003 = 'radio1'

SELECTION-SCREEN : END OF LINE.

SKIP.

SELECTION-SCREEN : BEGIN OF LINE.

PARAMETERS r2 RADIOBUTTON GROUP a.

SELECTION-SCREEN COMMENT 4(25) text-004.

SELECTION-SCREEN : END OF LINE.

SELECTION-SCREEN END OF BLOCK b2.

SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME.

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN: COMMENT 1(15) text-005 FOR FIELD check1.

PARAMETERS: check1 AS CHECKBOX." GROUP RB user-command USR DEFAULT 'X'.

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK b3.

*in PBO using the below code.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF check1 = 'X'.

IF screen-name = 'R1' or screen-name = '%C003003_1000'.

screen-invisible = 1.

MODIFY SCREEN.

ELSEIF screen-name = 'R2' or screen-name = '%C004007_1000'.

screen-invisible = 1.

MODIFY SCREEN.

ENDIF.

ENDIF.

ENDLOOP.

thanks & Regards,

Vallamuthu.M