Module pool

[Former Member]

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.

endif.

[Former Member]

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

[dev_parbutteea]

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

[Former Member]

Hai Niyas,

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

[Former Member]

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

[Former Member]

Check this program

DEMO_DYNPRO_CHECK_RADIO

Reward points if useful,

Regards,

Niyaz

[Former Member]

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

[Former Member]

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.

[Former Member]

Hai Niyas,

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