Module pool

[Former Member]

Hi friends,

I got dump error while executing the module pool program.

There two screen 1000 and 200.

I got dump error after the creation of screen 200. If only 1000 screen it works well.

Pls find the below code and give me the solution.

Thanks.

Zprogram:-

*&----

---

*& Report Z_EX_MODPOOL

*&

*&----

---

*&

*&

*&----

---

REPORT Z_EX_MODPOOL .

TABLES : SFLIGHT.

DATA : OKCODE1 TYPE SY-UCOMM,

OKCODE TYPE SY-UCOMM.

DATA : ITAB LIKE SFLIGHT OCCURS 0.

CONTROLS TCONTROL TYPE TABLEVIEW USING SCREEN 200.

*

*&----

---

*

*& Module STATUS_0100 OUTPUT

*&----

---

*

• text

*----

---

*

MODULE STATUS_0100 OUTPUT.

SET PF-STATUS 'STATE'.

• SET TITLEBAR 'xxx'.

ENDMODULE.

MODULE USER_COMMAND_1000 INPUT.

OKCODE1 = OKCODE.

CASE OKCODE1.

WHEN 'DISP'.

SELECT * FROM SFLIGHT INTO TABLE ITAB

WHERE CARRID = SFLIGHT-CARRID AND

CONNID = SFLIGHT-CONNID.

• leave to screen 200.

WHEN 'EXIT'.

LEAVE TO SCREEN 0.

ENDCASE.

ENDMODULE.

MODULE USER_COMMAND_200 INPUT.

ENDMODULE.

Screen 200:

PROCESS BEFORE OUTPUT.

LOOP AT ITAB WITH CONTROL TCONTROL.

ENDLOOP.

*MODULE STATUS_100.

*

PROCESS AFTER INPUT.

LOOP AT ITAB.

ENDLOOP.

MODULE USER_COMMAND_200.

Screen 1000:

PROCESS BEFORE OUTPUT.

MODULE USER_COMMAND_1000.

*

PROCESS AFTER INPUT.

MODULE USER_COMMAND_1000.

With regards,

Murugan Arumugam

[Former Member]

Hi Murugan,

Give the short dump u got.it is better to identify the problem.

cheers

shibu

[former_member191735]

where are you calling your screen 200.

Is your screen 1000 selection screen or you created? if you created urself, try to use different number. Please explain clearly.

[Former Member]

Hi murugan,

I think there is a problem in the flow logic.

Screen 200:

PROCESS BEFORE OUTPUT.

LOOP AT ITAB WITH CONTROL TCONTROL.

ENDLOOP.

*<b>MODULE STATUS_100.</b> "instead use - MODULE STATUS_200

*

PROCESS AFTER INPUT.

LOOP AT ITAB.

ENDLOOP.

MODULE USER_COMMAND_200.

and in ur program include both pbo and pai for screen 200.

i think this will solve ur problem.

[Former Member]

Hi Murugan.

You can use "LEAVE SCREEN" or "Leave to screen 200" instead of "LEAVE TO SCREEN 0".

if you want leave from anyother screen.

to be reward all helpfull answers.

Regards,

Jay

Message was edited by:

Jay

[Former Member]

Hi,

This is your code, below i changed your code.

WHEN 'EXIT'.

LEAVE TO SCREEN 0.

ENDCASE.

CORRECT CODE

**********************

WHEN 'EXIT'.

LEAVE PROGRAM.

ENDCASE.

IF HELPFULL REWARD OTHER WISE AFTER GETTING DUMP ERROR YOU GO TO SOURCE CODE-> IT WILL POINT WHERE IS ERROR AND TELL TO ME.

[Former Member]

Thank u all.