Displaying text in two columns in SAP Script

Moved to correct forum. Please use a meaningful subject in future - I've edited it for you this time.
Hello Everybody,
I have a text to be displayed in Scripts. I want to split the text into 2 columns.
Like in news paper.
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaaaaa   aaaaaaaaaaaaaaaaaaa
Like this.
Can someone tell me how to do that?
Thanks,
Edited by: Matt on Mar 11, 2009 4:31 PM

As far as I believe....
Always text flows out of the main window if it is completely filled.
So, create an instance of the main window.
Go to Page windows->Select the main window->Edit->Create
You will get one more main window and that will be of type with the name Main01
Go to Screen painter and adjust the window in the way that you required.
Just start printing the text by writing the code in main00.
Automatically main01 will have the same code assgined(you can check if you want) and the data gets displayed once the main 00 window is filled.
Hope it helps....

Similar Messages

Text is broken in two pages is sap script

hi all,
the text is broken in two pages is sap script also total is also breaking. how to fix the problem?
sanjay

Hi,
First in your window goto the text elements. There choose goto->change editor. Now you will be getting a line editor. Here you have to specify protect endprotect and write your code within it.
Regards,
Deepthi.

How to print the text in points wise in sap script

hi friends,
how to print the text in points wise in sap script.
ex: if suppose paragraph consists of 15 lines. then according to one sentence or one fullstop (.) it should give point 1. like that...
1. hai how ru.
2. what r u doing.
3.where r u.
like this i want numbering.. waiting for ur replys.
thanks,
kiran

declare a counter
data : cnt type char 4.
print :
cnt = cnt + 1.
&cnt& &text&
cnt = cnt + 1. and so on.
or.
if the data is in an internal table
loop at internal_table.
cnt = cnt + 1.
write form.
in script -&cnt& &text&
endloop.
Edited by: NIKHILKUMAR POOJARI on Nov 17, 2008 11:18 AM

Can anybody tell me how many text elements are there in sap scripts?

hi all,
can anybody tell me how many text elements are there in sap scripts?

Hi,
Do you mean that you want to know how many Text-elements are there in a specific Script or you want to know how many max Text-Elements a script can have?
I believe there is no limit on this......
To know all the Text Elements in a Script......goto SE71....press F4 Help on Script Name....Choose Last option for Custom developed Scripts.....and you can open the complete Script details & Code in a Line Editor...After that you can serach/look for the text elements

Display TextBox Merging two columns

hi
In a Form i want to display textbox merging two columns
when i increading the width of textbox , elements(textbox,selectlist) in the column 2 move right side

Edit your item and go to
Displayed > ColSpan
and increase it to two or three...
Denes Kubicek
http://deneskubicek.blogspot.com/
http://www.opal-consulting.de/training
http://apex.oracle.com/pls/otn/f?p=31517:1
-------------------------------------------------------------------

How to wrap text in two columns and display as one in WAD

Hi ,
I have the following columns in my ODS , they are not KF's
c1        c2    c3
100      AA      BB
200      CC      DD
I need this display format
100   AA
      BB
200   CC
      DD
I need to wrap the text in columns c2 and c3 and display them under one column.
Is it possible in webtemplate by using java scripting.

IN the Query , you could diplay Characteristics as a Hierarchy. Just above the Columns Box in Bex, do a write click.
Hope this helps

Gallery Display Thumbnails in Two Columns

Thanks to Mr. Booth for his excellent tutorial on setting up
a web gallery. This really gave me a great foundation.
My question has to do with controlling how thumbnail images
are displayed on the page. I would like to display two (or three)
columns ot thumbs along with a text title for each. If I were
programming this in C++, I would setup a "for loop" and simply
display the first column with an index of i/2, and the second
column with an index of i/2 + 1, but I can't seem to figure out how
to achieve a similar effect within the confines of HTML.
Here is my code snippet. What I get is two columns of
identical thumbs. How would you change this to make thumbs 1,3,5...
appear in column one, and thumbs 2,4,6... appear in column two? It
seemed to me that using a table was a good way to set this up, but
I'm very new to web programming.
<div class="NewThumbClass" spry:region="dsGallery" >
<table>
<tr spry:repeat="dsGallery" >
<td> {title} <br />
<img src ="thumbnails/{path}" /></td>
<td> {title}<br />
<img src ="thumbnails/{path}" /></td>
</tr>
</table>
</div>
Note that {title} and {path} are gotten from the XML database
file. Thanks in advance for your help.
Mike Whalen

Hi
No! It's not possible, but you can try to create an your own heading in TOP-OF-PAGE to write the first heading line, the second one will be the std line .
Max

Dynamic columns in SAP script

Hi,
I have asked to provide a matrix type layout in SAP Script.Also in this matrix, number of columns is not fixed. At runtime it will be decided that how many columns will be there on the layout depending on the data fetch by the program. Can we provide this using requirement using SAP script or smartforms.
Thanks & Regards
vatsa

Hi Vatsa,
Just before getting into the SAP-script, determine how many columns needs to be displayed in the output and pass that variable to the SAP-script.
In SAP-script, whereever you define the BOX for displaying the columns, use the following commands. Use the necessary size for the width of the column.
An example is given below.
Data: W_No_of_Columns&> type i.
/:           IF &<W_No_of_Columns&> EQ '4'
/:           BOX HEIGHT '22.20' LN WIDTH '59' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '6.5' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '15' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '25' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '36.5' CH FRAME 10 TW
                ENDIF.
/:           IF &<W_No_of_Columns& EQ '5'
/:           BOX HEIGHT '22.20' LN WIDTH '59' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '6.5' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '15' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '25' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '35' CH FRAME 10 TW
/:           BOX HEIGHT '22.20' LN WIDTH '45' CH FRAME 10 TW
                ENDIF.
Hope this helps.
<REMOVED BY MODERATOR>
Thanks,
-G
Edited by: Alvaro Tejada Galindo on Jul 8, 2008 10:57 AM

I need to find similar text in two columns: e.g. cell a1 has The Art of War and there is another similar cell in another column that has Art of War HD

I have text (list of items) on Column A
I want to find the the same word/number of characters on Column C and to place the formula on Column B and I want the matching result.
A1 the art of War
I know that somewhere in column b there is a term similar (start with the same characters) The Art of War HD in Spanish
So I want a match between these two columns so on the result on cell B1 it will give me "The Art of" (if I ask for 10 matching characters).
Thanks,

Hi,
Please try the following method:
Get the Column A and Column B the front 10 characters to Column C and Column D
Match the Column C and Column D
Formula:
C1: =LEFT(A1,10)
D1: =LEFT(B1,10)
E1: =IF(DELTA(C1,D1),"same","not same")
Regards,
George Zhao
TechNet Community Support

Flowing text from two column master pages

I'm trying to create a document with a two column master page using two separate text boxes rather than a text box with 2 columns. When I flow the text into page 1 of the document it autoflows and creates the rest of the pages automatically but uses a page wide single column rather than the 2 columns I have on my master page. How can I make it create the new pages with the two columns on them? This is CS4.

I need to know EXACTLY what you've set up and how you are flowing the text before I can tell you what's going wrong.
Do you have a master text frame or frames? Did you override the master frame before placing the text? Are there column guides on the master page? Some screen captures might help, too. You can embed them in a post by clciking on the camera icon on the web page:

How to comapare two clients in sap scripts

hi,
how to comapare two clients in sap scripts

Hi Anil,
Go to Tcode 'SE71' then choose menu Utilities->Compare Clients, then mention the Form name which u wish to compare, and give target client name and source client name, then execute.
Regards
Haritha

I am creating box for two coloums in sap script

hi,
i am creating box for two coloums
when i am creating box for this two coloums this box is displaying from the top.
when i am decreasing this hight it is decreasing from the buttom of the window
i want to decrease from the top of window
can u explan plz
this requirement
plzz

see this:
BOX Command
Syntax
/: BOX [XPOS] [YPOS] [WIDTH] [HEIGHT] [FRAME] [INTENSITY]
Effect: draws a box of the specified size at the specified position.
Parameters: For each of XPOS, YPOS, WIDTH, HEIGHT, and FRAME, you must specify both a measurement and a unit of measurement. Specify the INTENSITY parameter as a percentage between 0 and 100.
XPOS, YPOS
Upper left corner of the box, relative to the values of the POSITION command.
Default: Values specified in the POSITION command.
The following calculation is performed internally to determine the absolute output position of a box on the page:
X(abs) = XORIGIN + XPOS
Y(abs) = YORIGIN + YPOS
WIDTH
Width of the box. Default: WIDTH value of the SIZE command.
HEIGHT
Height of the box. Default: HEIGHT value of the SIZE command.
FRAME
Thickness of frame.
Default: 0 (no frame).
INTENSITY
Grayscale of box contents as %.
Default: 100 (full black)
Measurements: You must specify decimal numbers as literal values (like ABAP numeric constants) by enclosing them in inverted commas. Use the period as the decimal point character. See also the examples listed below.
Units of measurement: The following units of measurement may be used:
TW (twip)
PT (point)
IN (inch)
MM (millimeter)
CM (centimeter)
LN (line)
CH (character).
The following conversion factors apply:
1 TW = 1/20 PT
1 PT = 1/72 IN
1 IN = 2.54 CM
1 CM = 10 MM
1 CH = height of a character relative to the CPI specification in the form header
1 LN = height of a line relative to the LPI specification in the form header
/: BOX FRAME 10 TW
Draws a frame around the current window with a frame thickness of 10 TW (= 0.5 PT).
/: BOX INTENSITY 10
Fills the window background with shading having a gray scale of 10 %.
/: BOX HEIGHT 0 TW FRAME 10 TW
Draws a horizontal line across the complete top edge of the window.
/: BOX WIDTH 0 TW FRAME 10 TW
Draws a vertical line along the complete height of the left hand edge of the window.
/: BOX WIDTH '17.5' CM HEIGHT 1 CM FRAME 10 TW INTENSITY 15
/: BOX WIDTH '17.5' CM HEIGHT '13.5' CM FRAME 10 TW
/: BOX XPOS '10.0' CM WIDTH 0 TW HEIGHT '13.5' CM FRAME 10 TW
/: BOX XPOS '13.5' CM WIDTH 0 TW HEIGHT '13.5' CM FRAME 10 TW
Draws two rectangles and two lines to construct a table of three columns with a highlighted heading section.
POSITION Command
Syntax
/: POSITION [XORIGIN] [YORIGIN] [WINDOW] [PAGE]
Effect: Sets the origin for the coordinate system used by the XPOS and YPOS parameters of the BOX command. When a window is first started, the POSITION value is set to refer to the upper left corner of the window (default setting).
Parameters: If a parameter value does not have a leading sign, then its value is interpreted as an absolute value, in other words, as a value that specifies an offset from the upper left corner of the output page. If a parameter value is specified with a leading sign, then the new value of the parameter is calculated relative to the old value. If one of the parameter specifications is missing, then no change is made to this parameter.
XORIGIN, YORIGIN
Origin of the coordinate system.
WINDOW
Sets the values for the left and upper edges to match those of the current window (default setting).
PAGE
Sets the values for the left and upper edges to match those of the current output page (XORIGIN = 0 cm, YORIGIN = 0 cm).
/: POSITION WINDOW
Sets the origin for the coordinate system to the upper left corner of the window.
/: POSITION XORIGIN 2 CM YORIGIN '2.5 CM'
Sets the origin for the coordinate system to a point 2 cm from the left edge and 2.5 cm from the upper edge of the output page.
/: POSITION XORIGIN '-1.5' CM YORIGIN -1 CM
Shifts the origin for the coordinates 1.5 cm to the left and 1 cm up.
Pre-Setting BOX Position Arguments
You can use the POSITION and SIZE commands to preset some arguments in the BOX command. POSITION presets the start point (upper left corner) of a box or line. SIZE specifies the width and height of a box.
You can use POSITION and SIZE to preset arguments, but you can also set the start point and size arguments of a box or line directly in the BOX command.
By default, if no positioning is specified, the upper left corner of a box or halftone or the top of a line is aligned with current SAPscript window. That is, the upper left corner of the box, halftone, or line starts at the upper left corner of the current window in the active form. By default, the height and width of a box are set to the height and width of the current window.
Use POSITION and SIZE to preset the arguments in a BOX command in the following situations:
The BOX command exceeds the 132-character (1 line in SAPscript) length limitation if you specify all arguments directly in the command. You may exceed this length limit if, for example, you use symbols in a command.
By pre-setting arguments with POSITION and SIZE, you can work around the limitation on the length of a command. You do not need to specify the preset arguments in the BOX command.
You want to use the enhanced capabilities of POSITION for adjusting the starting point of a box or line.
With BOX, you can specify an offset for the starting point only as a whole number (non-negative integer). This command would print a box starting 1 CM to the right and 1 CM down from the left upper corner of a window:
/: BOX XPOS '1' CM YPOS '1' CM
With POSITION; you can adjust the position of a line or box relative to a window much more precisely. In the POSITION command, you can specify positive and negative offsets and use non-integer numbers.
Example: The commands shown below position a box slightly to the left and slightly above a window. This leaves a margin between the edge of the box and the text in the window.
/: POSITION XORIGIN '-.2' CM YORIGIN '-.2' CM
/: SIZE WIDTH '.2' CM HEIGHT '.2' CM
/: BOX FRAME 10 TW
(Note that the box must be enlarged to accommodate the shift. If it is not enlarged, then it will not cover all of the window.)
You can also use POSITION to set the starting point to the upper left corner of the active page format. Example: POSITION PAGE moves the starting point from the active window to the active page format.
You want to use the relative sizing capabilities of SIZE to adjust the size of a box, line, or halftone.
With BOX, you can make only absolute size specifications. BOX HEIGHT, for example, overrides the default height setting to the height of the current window.
With SIZE, you can adjust the size of a box or a line with respect to its previously-set dimensions. The following commands would, for example, draw a frame 1 CM in from the margins of the paper:
/: POSITION PAGE
/: POSITION XORIGIN 1 CM YORIGIN 1 CM
/: SIZE PAGE
/: SIZE HEIGHT '-2' CM WIDTH '-2' CM
REWARD IF HELPFUL

Saved layered .psd files display text in preview column

Hi,
I have layered files that I have saved. When I view my files in column format, in the preview area, text appears, not the image. I can't read the text as it is so tiny. Even when I magnified it I couldn't red it. It just seems to happen to files saved as .psd, not to jpegs.
Has this happened to other people? If you have a solution, other than flattening the file, as I wish to save the layers, please help me. Thank you in advance.

>When I view my files in column format, in the preview area, text appears, not the image. I can't read the text as it is so tiny.
Meaning you are previewing in the Finder?
That is possibly because you have an Alpha channel in the file.
If you learn to use Bridge CS4, instead of using the Finder, you won't have this problem.

Search keyword display dropdown list two columns

Sheet1:
Sheet2:
Question: Is it possible to create a searchable Dropdown list in Sheet1 A6 that displays a list of combined Sheet2’s ColA+ColB. And the ColB of the selected row will be the value of Sheet1
B2.
i.e. If type in a keyword ‘apple’ on Sheet1 A6, Sheet1 A6 cell will have a dropdown list of Sheet2 A2-B5. Then the user will select a row from this dropdown and Sheet1 B2 will display the price (ColB) of the selected value.
Please let me know if this makes sense. Thanks.

Some questions.
Why is the price going on a different row?
Do want a drop down at A6 and you will be selecting one item after another from this same place or do you want more DropDowns on the following rows.
The price is inserted at cell B2. Will the price always be in cell B2 or the next blank cell in that column?
What sort of DropDown are you looking for? Can we use a ComboBox or do you specifically want a Data Validation DropDown. (Can be done with a ComboBox but not sure how this could be done with Data Validation.)
Regards, OssieMac

Quotation item text how to call in sap script in footer

hi,
Please help me, i have been trying hard for this and also searches sdn for relevant posts but could not find any, I thank all people who can help me with some information on this.
Regards,
prashant

hi
I created driver program in se38 that is correct or not
*& Report ZP_QTEXT3
REPORT ZP_QTEXT3.
DECLARION OF TABLES ******
TABLES : VBAP,STXL.
*stxh, stxl, stxb - trans tables for text
*ttxit - text on text-ids
*ttxot - Short texts on text objects
*Transaction MD63
FORM TEXT1 TABLES IN_TAB STRUCTURE ITCSY
                  OUT_TAB STRUCTURE ITCSY.
     DATA : TDOBJECT1 LIKE STXL-TDOBJECT,
              TDNAME1 LIKE STXL-TDNAME,
              TDID1 LIKE STXL-TDID,
              TDSPRAS1 LIKE STXL-TDSPRAS.
*DATA : TDOBJECT1(10).
       TDNAME(70),
       TDID(4),
       TDSPRAS(1).
READ TABLE IN_TAB WITH KEY 'STXL-TDNAME1'.
TDNAME1 = IN_TAB-VALUE.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
    INPUT         = TDNAME1
IMPORTING
   OUTPUT        = TDNAME1.
SELECT SINGLE * FROM STXL WHERE = VBDPA-TDNAME1."MARA-MATNR."'000000000020000179' .
TDOBJECT1 = VBDPA-TDOBJECT1.
TDID1 = VBDPA-TDID1.
TDSPRAS1 = VBDPA-TDSPRAS1.
MOVE TDOBJECT TO TDOBJECT1.
READ TABLE OUT_TAB WITH KEY 'ATDOBJECT1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = TDOBJECT1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
MOVE TDID TO TDID1.
READ TABLE OUT_TAB WITH KEY 'ATDID1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = TDID1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
MOVE SPRAS TO SPRAS1.
READ TABLE OUT_TAB WITH KEY 'ASPRAS1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = SPRAS1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
DATA : TNAME LIKE THEAD-TDNAME.
DATA : W_STXL TYPE STXL.
*SELECT-OPTIONS: S_VBELN for VBAP-VBELN,
*S_POSNR FOR VBAP-POSNR.
DATA: BEGIN OF HTEXT.
INCLUDE STRUCTURE THEAD.
DATA: END OF HTEXT.
DATA: BEGIN OF LTEXT OCCURS 50.
INCLUDE STRUCTURE TLINE.
DATA: END OF LTEXT.
DATA: BEGIN OF DTEXT OCCURS 50.
DATA: VBELN LIKE VBAP-VBELN,
      POSNR LIKE VBAP-POSNR.
INCLUDE STRUCTURE TLINE.
DATA: END OF DTEXT.
PERFORM BODY_DISPLAY.
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
*MOVE VBAP-VBELN TO TNAME.
*MOVE VBAP-POSNR TO TNAME.
*&      Form BODY_DISPLAY
      text
--> p1        text
<-- p2        text
FORM BODY_DISPLAY .
PACKING DETQAILS TEXT ********
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0011' .
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
CLEAR : TNAME, HTEXT.
REFRESH : LTEXT.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
SEA FRIEGHT CHARGE TEXT **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0012'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
CLEAR : TNAME, HTEXT.
REFRESH : LTEXT.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
CLEAR : TNAME, HTEXT,DTEXT.
REFRESH : LTEXT.
ULINE.
LEAGALISATION FEES *********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0013'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
SEA FREIGHT CHARGES *************
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0014'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
AIR FREIGHT CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0015'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
COURIER CHARGE **************
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0016'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
INSURANCE CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0017'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
HANDLING CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0018'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
ENDFORM.                    " BODY_DISPLAY
best regards,
prashant

Displaying text in two columns in SAP Script

Similar Messages

Maybe you are looking for