topic Re: module pool program in Application Development and Automation Discussions

module pool program

Former Member — Thu, 13 Jul 2006 06:38:21 GMT

hi friends,

i am using 3 radiobuttons in a screen, i select first button then display the two fields company code, customer, when i select the 2 radiobutton then display the vendor in place of customer same screen, how to over write vendor in place of customer, give me solution, where its write code in PBO or PAI,

thanks,

santha

Re: module pool program

Former Member — Thu, 13 Jul 2006 06:40:14 GMT

make the two parameter one for vendor and another for customer.

when u click radio button activate customer parameter and deactivate vendor vise versa...

Re: module pool program

naimesh_patel — Thu, 13 Jul 2006 06:43:08 GMT

Hello,

You have to write a code in PBO.

Take separated fields for the customer and vendor. Give different screen groups for both.

In pbo, code like.

loop at screen.

if screen-group1 = 'GP1' and r_1 = 'X'.

screen-active = 0.

elseif screen-group1 = 'GP2' and r_2 = 'X'.

screen-active = 0.

endif.

modify screen.

endloop.

regards,

Naimesh

Re: module pool program

pradiptakumar_mishra — Thu, 13 Jul 2006 08:33:45 GMT

U can do it by 2 ways.

Either declare a field(F1) of type char and say length 15.Put it on your screen.

After choosing 1st button evaluate the fcode in pai and according to that code your select stmt.

For Customer :

select name1

from kna1

into f1

where <condn>.

For vendor :

select name1

from lfa1

into F1

where <condn>.

This is one way for solving this issue. Otherwise declare 2 different fields on screen from LFA1/kna1 if you're taing it from dictionary.

then in PBO loop at screen and modify as per requirement.

Hope this will help u.

With Rgds

Pradipta Ku Mishra

Re: module pool program

Former Member — Thu, 13 Jul 2006 08:38:32 GMT

Hello,

U have a write a module in the PBO event.

PBO

Module disp_field.

In the report

Module disp_field.

CAse 'X'.

when 'R1'.

Loop at screen.

if screen-name = 'VENDOR'

screen-invisible = '1'.

screen-visible = '0'.

Modify screen.

endloop.

when 'R2'.

if screen-name = 'CUST'

screen-invisible = '1'.

screen-visible = '0'.

Modify screen.

endloop.

ENDMODULE.

Try with this code.

If useful reward points.

Regards,

Vasanth