Text elements in module pool

Hi,
How can we print Descriptions and other text as text lable in module pool????
Thx,
Shashi.

Hi,
IF you want text for box heading in moodule pool...
than just double click on that box and write for lable in text part of attribute window.
<REMOVED BY MODERATOR>
Gaurav J.
Edited by: Alvaro Tejada Galindo on Aug 15, 2008 3:46 PM

Similar Messages

Adding a screen element in Module pool

Hi Experts,
How to add a screen element in module pool programming?
Thanks,
Sudha...........

Hi sudha ,
To add screen elements in you module pool programming ,
i > Go the layout of the screen for which you want to have elements .
ii> Drag and drop the available elements from the left hand side .
iii> Be sure to have a name a name of the data elements that you have inserted .
iv>Check any dataelement is't showing red in color as red color signifies error .
v> Make sure to save and activate the layout.
Hope this would be clear .
Thanks
Lokesh

How to display LONG TEXT STRING in Module Pool Screen ?

Hi Experts,
I want to display long text string, on screen designed through module pool(SE51). I tried to display through input/output field , but it displays it in SINGLE LINE and i have to scroll all through to view all string.
I want to display it in rectangular format . It doesnt allow me to set HEIGHT of component.
Please provide solution.
Thanks in advance.
Regards
Deepak

This is the program where u can get the WA_THEAD from other program like report and trying to display and modifying that text. U can do instead of WA_THEAD u can generate here itself and use also
*& Module pool       ZMP_LTEXT                                         *
PROGRAM ZMP_LTEXT                               .
TABLES: STXL.
*&      Module STATUS_9000 OUTPUT
MODULE STATUS_9000 OUTPUT.
CONSTANTS:line_length type i value 132.
DATA:g_editor type ref to cl_gui_textedit,
     g_editor_container type ref to cl_gui_custom_container,
     CONT1 type scrfname value 'CONT1',
     g_repid like sy-repid,
     g_ok_code like sy-ucomm,
     g_mytable(132) type c occurs 0,
     g_mycontainer(30) type c ,
     v_result(256) type c,
     g_head like thead,
     it_line type table of tline with header line,
     wa_stxl type stxl.
DATA : BEGIN OF IT_THEAD1,
       ICON TYPE ICON-ID.
       INCLUDE STRUCTURE STXL.
DATA : END OF IT_THEAD1.
DATA : IT_THEAD LIKE TABLE OF IT_THEAD1,
       WA_THEAD LIKE LINE OF IT_THEAD.
IMPORT WA_THEAD FROM MEMORY ID 'ABCD'.
select SINGLE * from STXL into wa_stxl
                 where tdname = '00006000156500000002'.
SELECT SINGLE * from STXL into wa_stxl
                  where tdname = WA_THEAD-TDNAME
                  AND TDID = WA_THEAD-TDID
                  AND TDOBJECT = WA_THEAD-TDOBJECT
                  AND TDSPRAS = WA_THEAD-TDSPRAS.
IF SY-SUBRC NE 0.
MESSAGE 'NO RECORD EXIST' TYPE 'E'.
ENDIF.
MOVE-CORRESPONDING WA_STXL TO G_HEAD.
SET PF-STATUS 'STATUS'.
SET TITLEBAR '001'.
if g_editor is initial.
     CREATE OBJECT G_EDITOR_CONTAINER
       EXPORTING
        PARENT                      =
         CONTAINER_NAME              = CONT1
        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.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
     ENDIF.
     CREATE OBJECT G_EDITOR
       EXPORTING
        MAX_NUMBER_CHARS       =
        STYLE                  = 0
   WORDWRAP_MODE          = cl_gui_textedit=>wordwrap_at_fixed_position
for to fix number of characters in row to 132 characers
         WORDWRAP_POSITION      = line_length
         WORDWRAP_TO_LINEBREAK_MODE = cl_gui_textedit=>true
for the word to break to next line if it dont fit in line
        FILEDROP_MODE          = DROPFILE_EVENT_OFF
         PARENT                 = G_EDITOR_CONTAINER
        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.
REFRESH g_mytable.
     MOVE: WA_THEAD-TDNAME TO STXL-TDNAME,
           WA_THEAD-TDID TO STXL-TDID,
           WA_THEAD-TDOBJECT TO STXL-TDOBJECT,
           WA_THEAD-TDSPRAS TO STXL-TDSPRAS.
    CALL FUNCTION 'READ_TEXT'
    EXPORTING
    CLIENT                        = SY-MANDT
      ID                            = wa_stxl-tdid
      LANGUAGE                      = wa_stxl-tdspras
      NAME                          = wa_stxl-tdname
      OBJECT                        = wa_stxl-tdobject
    ARCHIVE_HANDLE                = 0
    LOCAL_CAT                     = ' '
IMPORTING
    HEADER                        =
    TABLES
      LINES                         = it_line
EXCEPTIONS
    ID                            = 1
    LANGUAGE                      = 2
    NAME                          = 3
    NOT_FOUND                     = 4
    OBJECT                        = 5
    REFERENCE_CHECK               = 6
    WRONG_ACCESS_TO_ARCHIVE       = 7
    OTHERS                        = 8
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT IT_LINE INTO V_RESULT.
   APPEND V_RESULT TO G_MYTABLE.
ENDLOOP.
CALL METHOD G_EDITOR->SET_TEXT_AS_R3TABLE
   EXPORTING
     TABLE           = G_MYTABLE
   EXCEPTIONS
     ERROR_DP        = 1
     ERROR_DP_CREATE = 2
     others          = 3.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
   endif.
ENDMODULE.                 " STATUS_9000 OUTPUT
*&      Module USER_COMMAND_9000 INPUT
MODULE USER_COMMAND_9000 INPUT.
CASE SY-UCOMM.
REFRESH G_MYTABLE[].
REFRESH IT_LINE[].
CLEAR V_RESULT.
WHEN 'SAVE'.
     CALL METHOD G_EDITOR->GET_TEXT_AS_R3TABLE
      EXPORTING
        ONLY_WHEN_MODIFIED     = FALSE
        IMPORTING
          TABLE                  = G_MYTABLE
        IS_MODIFIED            =
      EXCEPTIONS
        ERROR_DP               = 1
        ERROR_CNTL_CALL_METHOD = 2
        ERROR_DP_CREATE        = 3
        POTENTIAL_DATA_LOSS    = 4
        others                 = 5
     IF SY-SUBRC <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
     ENDIF.
LOOP AT G_MYTABLE INTO V_RESULT.
   APPEND V_RESULT TO IT_LINE.
ENDLOOP.
CLEAR V_RESULT.
    CALL FUNCTION 'SAVE_TEXT'
      EXPORTING
        CLIENT                = SY-MANDT
        HEADER                = G_HEAD
        INSERT                = ' '
        SAVEMODE_DIRECT       = 'X'
      OWNER_SPECIFIED       = ' '
      LOCAL_CAT             = ' '
    IMPORTING
      FUNCTION              =
      NEWHEADER             =
      TABLES
        LINES                 = IT_LINE
    EXCEPTIONS
      ID                    = 1
      LANGUAGE              = 2
      NAME                  = 3
      OBJECT                = 4
      OTHERS                = 5
   IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
   ENDIF.
REFRESH G_MYTABLE[].
REFRESH IT_LINE[].
CLEAR V_RESULT.
WHEN 'BACK' OR 'CANCEL' OR 'EXIT'.
LEAVE TO SCREEN '0'.
*CALL SCREEN '0'.
WHEN OTHERS.
ENDCASE.
*G_OK_CODE = SY-UCOMM.
*CLEAR SY-UCOMM.
ENDMODULE.                 " USER_COMMAND_9000 INPUT

How to bold/color text message in Module pool Programming ?

Hi All ,
I need to bold /color a message in module pool . this message will come when certain conditions satisfied , currently this text message is displaying through variable . I Refereed program DD_STYLE_TABLE , but still not getting desired output . .Is there any other way to achieve the same ?
Could you please help me ?
Thanks in advance !!!!
Regards ,
Mayank K

Hi Mayank,
You can give a try this.
Within the screen you are calling give keyword
Leave to list processing
and then you can give whatever colors which are there in SAP
For making the text bold you can set Format intensified on or off depending on your requirement.
For more details you can refer to programs
program1 : demo_leave_to_list_processing
program2: demo_call_screen_from_list
Regards,
Sandeep Katoch

Text box in module pool

How to create more than 10 lines in a single trext box...Anyone help me with the code

You can add an text button on the screen and call the following function module when the user clicks on the button.
data: i_objtxt like solisti1 occurs 10 with header line.
call function 'TERM_CONTROL_EDIT'
         exporting
              titel          = text-ttl
              langu          = sy-langu
         tables
              textlines      = i_objtxt
         exceptions
              user_cancelled = 1
              others         = 2.

How to modify screen element in module pool

Hii...
I have developed a screen with table control..my requirement is
I have one column (i.e) check box in edit mode..after it was checked and pressed 'enter' I want to go for display mode only..how can I solve this problem..
i tried like this but this is not working..
if checkbox = 'X'.
Loop at screen.
screen-active = 0.
screen-input = 0.
modify screen.
endloop.
regards
sugu

Hello,
Suppose your tablecontrol name is TCTRL.
Declare a work area WA_COLS.
Now in the PBO (in the table control loop) you can write a new module suppose its MODULE SET_SCR.
MODULE SET_SCR.
LOOP AT TCTRL-cols INTO WA_COLS.
WA_COLS-SCREEN-INPUT = 0.
MODIFY TCTRL-cols FROM WA_COLS INDEX SY-TABIX.
ENDLOOP.
ENDMODULE.
Hope this clears .
Neeraj

Can we submit the module pool code in background as a job.

Hi All,
Is there any possiblity that, we can capture the module pool program screen element, and run the process in background as a job using the same logic as module pool program.
In other words, can we have any feasible solution to have push button on the transaction screen of a module pool program, after clicking which, it will capture all the screen elements of module pool program and using the same logic of module pool program it will submit a job in background and process the data.
Any hep will be appreciated.
Thanks in adv.
Regard,
Vivek.

Hi Prasenjit,
Thanks for your reply.
My question is, can we use "SUBMIT" statement in module pool program so as it will submit job in backgroung.
The same logic of module pool we will write in executable statement and submit in background using SUBMIT. will this thing is feasible. I am trying the same. Anyways thanks.
Regards,
Vivek

Problem in Module Pool Programming

hello,
I am using module pool programming.
i want to assign the text to textbox during runtime
thanks!

Hi Raghvendra Bhanap,
declare the variable with the same name of text box(In module pool) and in the PAI even write the module by double clicking on that in your program just assign some text to that name then the text automatically come in that text box.
See this example programm.
*In Screen Painter PAI Event.*
moudle assigntext.
In your Program.
Data w_name(40). (*In the module pool also put this name only)
Module assigntext.
w_name = 'Raghvendra Bhanap'.
Endmodule.
Reward if it is useful,
Mahi.

How to create Long Text in Module Pool Program

Hi all,
I want to develop a new module pool program and I want to use Long text screen in this program and also want this text will store in table.I never develop such type of module pool before.This long text will like sales order long text.Please let me know the steps how I can develop such type of program and how I save long text huge data in table.
Thanks & Regards
Nirmal

Hai ,
here you have to use custom control, for this
DATA: line(256) TYPE c,
      text_tab LIKE STANDARD TABLE OF line,
      field LIKE line.
1) Create custom control in your screen
2)   CREATE OBJECT: container EXPORTING container_name = 'TEXTEDIT',   "--> (this is custom control name in screen)
                   editor    EXPORTING parent = container.
3) CALL METHOD editor->get_text_as_stream "This method reads data from custom control , inserts into itab 'text_tab'
         IMPORTING
          text = text_tab.                                       "
      READ TABLE text_tab INTO line INDEX 1. read the text into wa 'line'
if you want more clarity , see 'ABAPDOCU' >ABAP USER DIALOGS>    COMPLEXSCREEN ELEMENTS--> DEMO CUSTOM_CONTROL

Use of text element in function module

hi friends what is the use of text element i.e list headings, selection texts,text symbols in a function module. where a can see these things after giving some text into it and activated.
                                    kumar.

hi
<b>Text Symbols</b>
A text symbol is a named data object that is generated when you start the program from the texts in the text pool of the ABAP program. It always has the data type c. Its field length is that of the text in the text pool.
Text symbols, along with the program title, list headings, and selection texts, belong to the text elements of a program. Text elements allow you to create language-independent programs. Any text that the program sends to the screen can be stored as a text element in a text pool. Different text pools can be created for different languages. When a text element is changed or translated, there is no need to change the actual program code. Text elements in an ABAP program are stored in the ABAP Editor (see Text Element Maintenance).
In the text pool, each text symbol is identified by a three-character ID. Text symbols have a content, an occupied length, and a maximum length.
Examples for text symbols in an ABAP program:
ID
Contents
Occupied length
Maximum length
010
Text symbol 010
15
132
030
Text symbol 030
15
100
AAA
Text symbol AAA
15
15
In the program, you can address text symbols using the following form:
text-###
This data object contains the text of the text symbol with ID ### in the logon language of the user. Its field length is the same as the maximum length of the text symbol. Unfilled characters are filled up with spaces. You can address text symbols anywhere in a program where it is also possible to address a variable.
If there is no text symbol ### in the text pool for the logon language, the name text-### addresses the predefined data object space instead.
You can also address text symbols as follows:
... 'textliteral'(###) ...
If the text symbol ### exists in the text pool for the logon language, this is the same as using text-###. Otherwise, the literal 'textliteral' is used as the contents of the text symbol. This is only possible at positions in the program where a variable can occur. You can create a text symbol for any text literal by double-clicking the literal in the ABAP Editor and replacing the literal with the text symbol.
You should use text symbols in your program whenever they need to be language-specific - for example, in a WRITEstatement.
If you program a list whose layout depends on field lengths, you should be careful, since the field length of text symbols will be different in different languages. You should therefore set the maximum field length of the field symbol so that there is enough space to translate it into other languages. For example, the English word 'program' has seven letters, but its equivalent German translation 'Programm' has eight.
The following example shows the use of text symbols in WRITE statements.
SET BLANK LINES ON.
WRITE:   text-010,
       / text-aaa,
       / text-020,
       / 'Default Text 030'(030),
       / 'Default Text 040'(040).
If the text symbols of the above screen shots are linked to this program, the output looks as follows:
Text symbols 020 and 040 have no text symbols. For text symbol 020, the system displays a space. This is only displayed in this case because the blank line suppression has been turned off (see Creating Blank Lines).
regards
ravish
<b>plz reward if helpful</b>

Module pool-element list

can someone plz tell the steps to create element list in se51 and also the design of layout?
How to execute module pool program.
Thanks.

Alchemi,
Run SE51 and go into the Layout. This is where you paint the screen. Once you save and activate the screen in this Layout window, the Element List is built automatically for you. The Element list is the objects (elements) on the screen.
To run a module pool prog, run t-code SE93. Create a new t-code for the program ZABC, for example.
Make sure to select the radio button for "Dialog transaction"
and then add short text and the Program's name and first (start-up) screen of the program.
Save the new t-code and then enter that new t-code into the fastpath textbox and press ENTER

PUSH BUTTON text and tooltip dynamic in module pool

I want to change at runtime the text and tooltip of a push button which belongs to a screen of module pool (not a pf_status).
Is there anyone who can help me?

HEllo,
Check this report done by Rich,
Ok..here is my example. Most of the code was generated by screen painter via the tabstrip control wizard. Create screen 100, use the tabstrip control wizard to create your tabstrip, name it TABSTRIP. Double click on the tab text elements, rename them TABSTRIP_TEXT1 and TABSTRIP_TEXT2 for the tab text elements, make sure that the output only check box is checked.
REPORT ZRICH_0003 .
data: TABSTRIP_TEXT1(30) type c,
      TABSTRIP_TEXT2(30) type c.
start-of-selection.
call screen 100.
*&      Module STATUS_0100 OUTPUT
      text
module STATUS_0100 output.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
Fill the tabstrip text elements here!
TABSTRIP_TEXT1 = 'Text 1'.
TABSTRIP_TEXT2 = 'Text 2'.
endmodule.                 " STATUS_0100 OUTPUT
*&      Module USER_COMMAND_0100 INPUT
      text
module USER_COMMAND_0100 input.
endmodule.                 " USER_COMMAND_0100 INPUT
FUNCTION CODES FOR TABSTRIP 'TABSTRIP'
CONSTANTS: BEGIN OF C_TABSTRIP,
             TAB1 LIKE SY-UCOMM VALUE 'TABSTRIP_FC1',
             TAB2 LIKE SY-UCOMM VALUE 'TABSTRIP_FC2',
           END OF C_TABSTRIP.
DATA FOR TABSTRIP 'TABSTRIP'
CONTROLS: TABSTRIP TYPE TABSTRIP.
DATA:      BEGIN OF G_TABSTRIP,
             SUBSCREEN   LIKE SY-DYNNR,
             PROG        LIKE SY-REPID VALUE 'ZRICH_0003',
             PRESSED_TAB LIKE SY-UCOMM VALUE C_TABSTRIP-TAB1,
           END OF G_TABSTRIP.
DATA:      OK_CODE LIKE SY-UCOMM.
OUTPUT MODULE FOR TABSTRIP 'TABSTRIP': SETS ACTIVE TAB
MODULE TABSTRIP_ACTIVE_TAB_SET OUTPUT.
TABSTRIP-ACTIVETAB = G_TABSTRIP-PRESSED_TAB.
CASE G_TABSTRIP-PRESSED_TAB.
    WHEN C_TABSTRIP-TAB1.
      G_TABSTRIP-SUBSCREEN = '0101'.
    WHEN C_TABSTRIP-TAB2.
      G_TABSTRIP-SUBSCREEN = '0102'.
    WHEN OTHERS.
     DO NOTHING
ENDCASE.
ENDMODULE.
INPUT MODULE FOR TABSTRIP 'TABSTRIP': GETS ACTIVE TAB
MODULE TABSTRIP_ACTIVE_TAB_GET INPUT.
OK_CODE = SY-UCOMM.
CASE OK_CODE.
    WHEN C_TABSTRIP-TAB1.
      G_TABSTRIP-PRESSED_TAB = C_TABSTRIP-TAB1.
    WHEN C_TABSTRIP-TAB2.
      G_TABSTRIP-PRESSED_TAB = C_TABSTRIP-TAB2.
    WHEN OTHERS.
     DO NOTHING
ENDCASE.
ENDMODULE.
Screen Flow is ....
PROCESS BEFORE OUTPUT.
PBO FLOW LOGIC FOR TABSTRIP 'TABSTRIP'
MODULE TABSTRIP_ACTIVE_TAB_SET.
CALL SUBSCREEN TABSTRIP_SCA
    INCLUDING G_TABSTRIP-PROG G_TABSTRIP-SUBSCREEN.
MODULE STATUS_0100.
PROCESS AFTER INPUT.
PAI FLOW LOGIC FOR TABSTRIP 'TABSTRIP'
CALL SUBSCREEN TABSTRIP_SCA.
MODULE TABSTRIP_ACTIVE_TAB_GET.
MODULE USER_COMMAND_0100.
Vasanth

Module pool domain text display info req?

hi
i had an req to show a filed MATNR on a screen in module pool pgm,there shd be a i/p filed for material,user can select the material from the list of available materials,along with the test to be displayed for the filed next to material nos.
the list of mateiral is based on the login user name.
i am able to display the material list,but text is not coming.
pls tell me how to show the text next to matnr no. in list.
i had used the code:
loop at itab_carrid.
    clear:text.
    CALL FUNCTION 'ADS2KIPBRO_GET_DOMAIN_TEXT'
      EXPORTING
        E_TABLE          = 'MARA'
        E_FIELD          = 'MATNR'
        E_VALUE          = itab_carrid-matnr
      IMPORTING
        I_TEXT           = text
      EXCEPTIONS
        ILLEGAL_INPUT    = 1
        DOMAIN_NOT_FOUND = 2
        OTHERS           = 3.
    IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    move text to itab_carrid-text1.
    modify itab_carrid transporting text1.
endloop.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'MATNR'
      value_org       = 'S'
    TABLES
      value_tab       = itab_carrid
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc <> 0.
ENDIF.

hi
tell me,if i made a i/p field on screen from the data variable declared in my program
like :data:actvt(3) type c.
than on layout of screen:I/P filed-actvt.
now i want to provide the f4 to this.i had written the POV for the filed,the data is there in itab,but not poping out.
code:PROCESS ON VALUE-REQUEST.
FIELD ACTVT MODULE create_dropdown_box.
TYPES: BEGIN OF type_carrid,
         actvt(3) type c,
         text1(40) type c,
       END OF type_carrid.
DATA: itab_carrid type Type_carrid occurs 0 with header line.
   itab_carrid-actvt = '001'.
    append itab_carrid.
    itab_carrid-actvt = '002'.
    append itab_carrid.
    itab_carrid-actvt = '003'.
    append itab_carrid.
    itab_carrid-actvt = '004'.
    append itab_carrid.
    itab_carrid-actvt = '005'.
    append itab_carrid.
    itab_carrid-actvt = '006'.
    append itab_carrid.
    itab_carrid-actvt = '007'.
    append itab_carrid.
endif.
clear:itab_carrid.
loop at itab_carrid.
    clear:text.
    CALL FUNCTION 'ADS2KIPBRO_GET_DOMAIN_TEXT'
      EXPORTING
        E_TABLE          = 'YLOGON1'
        E_FIELD          = 'ACTVT'
        E_VALUE          = itab_carrid-actvt
      IMPORTING
        I_TEXT           = text
      EXCEPTIONS
        ILLEGAL_INPUT    = 1
        DOMAIN_NOT_FOUND = 2
        OTHERS           = 3.
    IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    move text to itab_carrid-text1.
    modify itab_carrid transporting actvt text1.
endloop.
clear:itab_carrid.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'ACTVT'
      DYNPNR          = SY-DYNNR
      DYNPPROG        = SY-REPID
      value_org       = 'S'
    TABLES
      value_tab       = itab_carrid
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc <> 0.
ENDIF.
plz tell me how to pop out this help in screen.

Use of text elements in wirte_form function module.

Hi guru's,
Could any one tell me what is the use of text elements in write_form functional module SAP SCRIPTS. As per my knowledge text elements are used for multi language purpose is there any other advantage other than that.
Thanks in advance.
Vardhan.

Hello.
A text element is a block in script that can be written several times in your document. You can put fixed texts, variables, include texts, images, etc etc
When you see WRITE_FORM, element 'X', you know that everything that is inside element /E X of your script is writen. It's very usefful to organize your script, and it eases to construct a very complex script.
It's also usefull to translations in SE63.
Best regards.
Valter Oliveira.
Edited by: Valter Oliveira on May 27, 2008 10:05 AM

Module Pool Programming - Calling SAP Standard Text Screen

Hi Gurus
I am working on Module Pool Programming...In the one of the screen there is a column named "Description" where I need to keep a Button to call a SAP standard text editing screen and what ever information I enter in the field should be downloadable
is this option possible?If so...Plz send me the Sample code
Thanks
Ganesh

Hi Gani,
I can help you till getting the text editor in your module pool program.
TOP
PROGRAM ZREDDY_TEXT.
constants: line_length type i value 132.
   data:
reference to wrapper class of control
   g_editor type ref to cl_gui_textedit,
reference to custom container: necessary to bind TextEdit Control
   g_editor_container type ref to cl_gui_custom_container,
   g_repid like sy-repid,                        " getting program name
   g_ok_code like sy-ucomm,                " return code from screen
   g_mytable(132) type c occurs 0,        " getting the text of table
   g_mycontainer(30) type c,                " string for the containers
   v_result(256) type c,                        " getting the text of table control
   gw_thead like thead,                        " for header information
   it_line type table of tline with header line. " internal table of type tline
PBO
MODULE STATUS_0900 OUTPUT.
SET PF-STATUS 'ZTEXT'.
SET TITLEBAR 'xxx'.
if g_editor is initial.
create control container
   create object g_editor_container
   exporting
   container_name = 'CUSTOM_CONTROL' " Make sure when you create custom container in layout give name as Custom container
   exceptions
   cntl_error = 1
   cntl_system_error = 2
   create_error = 3
   lifetime_error = 4
   lifetime_dynpro_dynpro_link = 5.
   g_mycontainer = 'CUSTOM_CONTROL'.
create calls constructor, which initializes, creates and links
TextEdit Control
create object g_editor
   exporting
   parent = g_editor_container
   wordwrap_mode =
cl_gui_textedit=>wordwrap_off
   cl_gui_textedit=>wordwrap_at_fixed_position
cl_gui_textedit=>WORDWRAP_AT_WINDOWBORDER
   wordwrap_position                      = line_length
   wordwrap_to_linebreak_mode     = cl_gui_textedit=>true.
   refresh g_mytable. " to initialize table upon OK_CODE 'BACK' at PAI
   endif.
ENDMODULE.                 " STATUS_0900 OUTPUT
Cheers!!
Balu
Edited by: Balu CH on Oct 22, 2008 8:55 PM

Text elements in module pool

Similar Messages

Maybe you are looking for