Skip to Content

Archived discussions are read-only. Learn more about SAP Q&A

Module Pool Text Editor Problem

Hi

I have developed module pool program which has 3 tab strips. In the last (3rd) Tab Strip I need to input Long Text. I have the done the coding but when I go to the Last tab and then come back to any other tabs, the text editor is overwriting the other fields in the other tabs. Can any tell how to solve this problem

This is he code I have written

****90000******Screen

PROCESS BEFORE OUTPUT.

MODULE status_9000.

MODULE modify_screen9000.

  • module test_me.

LOOP AT t_operation INTO s_operation WITH CONTROL toperation.

MODULE move_data.

MODULE modiy_screentblctrl.

ENDLOOP.

CALL SUBSCREEN sub1 INCLUDING sy-repid '9001'.

CALL SUBSCREEN sub2 INCLUDING sy-repid '9002'.

CALL SUBSCREEN sub3 INCLUDING sy-repid '9003'.

PROCESS AFTER INPUT.

MODULE cancel AT EXIT-COMMAND.

CHAIN.

FIELD zaodheader-heatnum MODULE check_heatnumber.

ENDCHAIN.

LOOP AT t_operation.

MODULE update_itab.

ENDLOOP.

MODULE user_command_9000.

CALL SUBSCREEN sub1.

CALL SUBSCREEN sub2.

CALL SUBSCREEN sub3.

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

**************9003*****

PROCESS BEFORE OUTPUT.

  • MODULE STATUS_9003.

MODULE display_texteditor.

*

PROCESS AFTER INPUT.

  • MODULE USER_COMMAND_9003.

**************9003*****

DATA : ccont TYPE REF TO cl_gui_custom_container,

tedit TYPE REF TO cl_gui_textedit.

MODULE display_texteditor OUTPUT.

CREATE OBJECT ccont

EXPORTING

  • parent =

container_name = 'CC'

  • style =

  • lifetime = lifetime_default

  • repid =

  • dynnr =

  • no_autodef_progid_dynnr =

EXCEPTIONS

cntl_error = 1

cntl_system_error = 2

create_error = 3

lifetime_error = 4

lifetime_dynpro_dynpro_link = 5

OTHERS = 6 .

IF sy-subrc <> 0.

ENDIF.

CREATE OBJECT tedit

EXPORTING

  • max_number_chars =

  • style = 0

  • wordwrap_mode = wordwrap_at_windowborder

  • wordwrap_position = -1

  • wordwrap_to_linebreak_mode = false

  • filedrop_mode = dropfile_event_off

parent = ccont

  • lifetime =

  • name =

EXCEPTIONS

error_cntl_create = 1

error_cntl_init = 2

error_cntl_link = 3

error_dp_create = 4

gui_type_not_supported = 5

OTHERS = 6.

IF sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDMODULE. " DISPLAY_TEXTEDITOR OUTPUT

Edited by: kumar1819 on Apr 7, 2010 8:05 AM

Solved

Former Member
Former Member replied

Hi kumar,

**************9003*****

PROCESS AFTER INPUT.

  • MODULE USER_COMMAND_9003.

Case SY-UCOMM.

When 'TAB2'.

Call screen 9002.

**************9003*****

In 9001 and 9002 screen what code u r writing.

Regards,

Raj.

0 View this answer in context
Not what you were looking for? View more on this topic or Ask a question