topic Re: Module pool in Application Development and Automation Discussions

Module pool

Former Member — Thu, 17 Jan 2008 08:45:05 GMT

Hai,

I developed this code in selection screen, but i need same output in module pool, how i can do it, which event i should use in module pool. If any one know tell me.

PARAMETERs: male RADIOBUTTON GROUP grp1 USER-COMMAND SHOWTEXT,

female RADIOBUTTON GROUP grp1,

text type text30.

AT SELECTION-SCREEN.

if sy-ucomm eq 'SHOWTEXT'. "check the user-command

if male eq 'X'.

text = 'Male option was selected.'.

elseif female eq 'X'.

text = 'Female option was selected.'.

endif.

Re: Module pool

Former Member — Thu, 17 Jan 2008 08:55:56 GMT

Hi,

Create 2 radio buttons(male & female) and one txt field(text)in the screen. Declare a global variable g_Text.

In PBO do the following,

text = g_text.

IN PAI do the follwoing.

if male = 'X'.

g_Text = 'u have selected male'.

else

g_Text = 'u have selected Female'.

endif.

Regards,

Niyaz

Re: Module pool

dev_parbutteea — Thu, 17 Jan 2008 08:58:15 GMT

Hi,

In PAI event , create a module for e.g as shown below.

process after input.

*checking the Ok_code.

module user_command_9001.

then double click on this module, to create it and within it, write:

case 9001_okcode.

when case1.

when others.

endcase.

9001_okcode will replace your sy-ucomm. and is declare in the Element list tab of the screen.

Regards,

Sooness

Re: Module pool

Former Member — Thu, 17 Jan 2008 09:03:39 GMT

Hai Niyas,

I don't like to enter after select radio button, with out enter i should display what i select in the screen.

Re: Module pool

Former Member — Thu, 17 Jan 2008 09:20:19 GMT

Hi,

try like this,

PROCESS AFTER INPUT.

Chain.

FIELD:

male,

female

MODULE change_display ON CHAIN-INPUT

endchain.

You may also try ON REQUEST instead of INPUT

Regards,

Niyaz

Re: Module pool

Former Member — Thu, 17 Jan 2008 09:24:28 GMT

Check this program

DEMO_DYNPRO_CHECK_RADIO

Reward points if useful,

Regards,

Niyaz

Re: Module pool

Former Member — Thu, 17 Jan 2008 09:38:29 GMT

Hai Niyas,

I tried your code but it's also not working fine, tell me any other way, here i mentioned my code

here G_TEXT is the global declaration.

PROCESS BEFORE OUTPUT.

MODULE STATUS_1000.

PROCESS AFTER INPUT.

Chain.

FIELD:m,f

MODULE change_display ON REQUEST.

endchain.

----

***INCLUDE ZRADIO_CHANGE_DISPLAYI01 .

----

&----

*& Module change_display INPUT

&----

text

----

module change_display input.

IF M = 'X'.

g_text = 'MALE'.

ELSEIF F = 'X'.

G_TEXT = 'FEMALE'.

ENDIF.

endmodule. " change_display INPUT

----

***INCLUDE ZRADIO_STATUS_1000O01 .

----

&----

*& Module STATUS_1000 OUTPUT

&----

text

----

module STATUS_1000 output.

SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.

T1 = G_TEXT.

endmodule. " STATUS_1000 OUTPUT

Re: Module pool

Former Member — Thu, 17 Jan 2008 09:45:55 GMT

ITS WORKING...CHK IT OUT...

data:out(25) type c.

OUT IS NAME OF INPUT/OUTPUT FIELD IN SCREEN 9000.

(MAKE THIS FIELD O/P ONLY).

DATA:RAD1(10) TYPE C,

RAD2(10) TYPE C.

CALL SCREEN 9000.

MODULE STATUS_9000 OUTPUT.

OUT = 'MALE'.

IF RAD1 ='X'.

OUT = 'MALE'.

ELSEIF RAD2 = 'X'.

OUT = 'FEMALE'.

ENDIF.

ENDMODULE.

Re: Module pool

Former Member — Thu, 17 Jan 2008 10:34:17 GMT

Hai Niyas,

Thanks for your help, now my program is working fine, can you give your gmail id