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 declaration for Module pool prog

Former Member
0 Likes
645

Hi All,

I have a screen no 0201 wherein i have 3 radio-buttons with group defined as RAD and function code RD common for all the buttons named RAD1 , RAD2 & RAD3 .

Now if i try to do something as below in the PAI ..... it says RAD1 , RAD2 RAD3 not defined .....

Now then i try to define the same in the below in MZXXXXXXTOP global include

PARAMETERS: RAD1 RADIOBUTTON GROUP RAD,

RAD2 RADIOBUTTON GROUP RAD DEFAULT 'X', RAD3 RADIOBUTTON GROUP RAD.

It throws error saying PARAMETER cant be used with TYPE 1 program...

Even the below option doesnt work ....

DATA : RAD1 AS RADIOBUTTON GROUP RAD,

RAD2 AS RADIOBUTTON GROUP RAD DEFAULT 'X', RAD3 AS RADIOBUTTON GROUP RAD.

Any pointers to the said problem will be rewarded with point .....

&----


*& Module rad_group INPUT

&----


  • text

----


MODULE rad_group INPUT.

CASE sy-ucomm.

WHEN 'RD'.

IF RAD1 = 'X'.

INT1-Q_FLAG = 'U'.

ELSEIF RAD2 = 'X'.

INT1-Q_FLAG = 'Q'.

ELSEIF RAD3 = 'X'.

INT1-Q_FLAG = 'B'.

ENDIF.

ENDMODULE. " rad_group INPUT

Thanks

Jaman

1 ACCEPTED SOLUTION
Read only

harimanjesh_an
Active Participant
0 Likes
384

hi,

just declare like this in ur report program(TOP) or in global declaration....

Data : RAD1 type c value 'X',

RAD2 type c,

RAD3 type c.

&----


*& Module rad_group INPUT

&----


  • text

----


MODULE rad_group INPUT.

CASE sy-ucomm.

WHEN 'RD'.

IF RAD1 = 'X'.

INT1-Q_FLAG = 'U'.

ELSEIF RAD2 = 'X'.

INT1-Q_FLAG = 'Q'.

ELSEIF RAD3 = 'X'.

INT1-Q_FLAG = 'B'.

ENDIF.

ENDMODULE. " rad_group INPUT

variable names should be same as what u have declared in screen.....

reward me if useful...........

Harimanjesh AN

1 REPLY 1
Read only

harimanjesh_an
Active Participant
0 Likes
385

hi,

just declare like this in ur report program(TOP) or in global declaration....

Data : RAD1 type c value 'X',

RAD2 type c,

RAD3 type c.

&----


*& Module rad_group INPUT

&----


  • text

----


MODULE rad_group INPUT.

CASE sy-ucomm.

WHEN 'RD'.

IF RAD1 = 'X'.

INT1-Q_FLAG = 'U'.

ELSEIF RAD2 = 'X'.

INT1-Q_FLAG = 'Q'.

ELSEIF RAD3 = 'X'.

INT1-Q_FLAG = 'B'.

ENDIF.

ENDMODULE. " rad_group INPUT

variable names should be same as what u have declared in screen.....

reward me if useful...........

Harimanjesh AN