ADDING RADIOBUTTON AT RUNTIME IN MODULE POOL

Former Member — Thu, 25 Mar 2010 07:37:20 GMT

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.

Re: ADDING RADIOBUTTON AT RUNTIME IN MODULE POOL

vallamuthu_madheswaran2 — Thu, 25 Mar 2010 08:53:02 GMT

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.

ENDLOOP.

thanks & Regards,

Vallamuthu.M