cancel
Showing results for 
Search instead for 
Did you mean: 

standard text prblm

Former Member
0 Kudos

hi experts !

i created a standard text !

and am call it through READ_TEXT function module in my print program.

rather than insert->standard text.

but my prob's is in that Function module

am passing all the id, lang,text, name

but it also having parameter tables

here am passing the internal table of tline (tdformat,tdlines) structre .!

but in my script text editor when am using symbol (&it_tline-tline&)

its not printing.

its printing blannk.

can any one suggest me how to over come this prob.

i hav to print the standard text using READ_TEXT function module

is it possible to print.!

(can any one send sample code if possible )

Regards,

Rajesh.

Accepted Solutions (0)

Answers (2)

Answers (2)

Former Member
0 Kudos

Hi

U can use below thing,

In script level,

Call the subroutine in Script whatever window u want print standard text:

Perform sub1 from the driver progr

Changing g_street

G_street1

G_street2

G_street3.

Endperform.

&g_street&

&g_street1&

&g_street2&

In driver program level,

FORM sub1 TABLES in_par STRUCTURE itcsy

out_par STRUCTURE itcsy.

U have data in internal table:

Pass the same internal table in the fm: FORMAT_TEXTLINES

CALL FUNCTION 'FORMAT_TEXTLINES'

EXPORTING

cursor_column = 0

cursor_line = 0

endline = 99999

formatwidth = 45 ( u r window size or less than)

linewidth = 45 ( u r window size or less than)

startline = 1

language = sy-langu

  • IMPORTING

  • NEW_CURSOR_COLUMN =

  • NEW_CURSOR_LINE =

TABLES

lines = it_tlines

  • EXCEPTIONS

  • BOUND_ERROR = 1

  • OTHERS = 2

.

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 the it_tlines.

IF sy-tabix = 1.

g_street = g_tline-tdline.

ENDIF.

IF sy-tabix = 2.

g_street1 = g_tline-tdline.

ENDIF.

IF sy-tabix = 3.

g_street2 = g_tline-tdline.

ENDIF.

IF sy-tabix = 4.

g_street3 = g_tline-tdline.

ENDIF.

Endloop.

READ TABLE out_par WITH KEY name = 'G_STREET'.

out_par-value = g_street .

CONDENSE out_par-value.

MODIFY out_par INDEX sy-tabix .

CLEAR: out_par.

READ TABLE out_par WITH KEY name = 'G_STREET1'.

out_par-value = g_street1 .

CONDENSE out_par-value.

MODIFY out_par INDEX sy-tabix .

CLEAR: out_par.

READ TABLE out_par WITH KEY name = 'G_STREET2'.

out_par-value = g_street2 .

CONDENSE out_par-value.

MODIFY out_par INDEX sy-tabix .

CLEAR: out_par.

READ TABLE out_par WITH KEY name = 'G_STREET3'.

out_par-value = g_street3 .

CONDENSE out_par-value.

MODIFY out_par INDEX sy-tabix .

CLEAR: out_par.

Endform.

If it helpful rewards points

Regards

Pratap.M

Former Member
0 Kudos

we are passing table data to script from a subroutine thru standard text but at the layout we wanted in table format with dynamically changing length of columns and fixed rows..how is it possible?pls help its very urgent.can we have a paragraph format in standard text which supports table format.?if so how to assign it to data which is printing?

Former Member
0 Kudos

hi,

Just check whether u r passing the object value to that function module, if not then u have to pass it.

Regards.

Praveen

Former Member
0 Kudos

hi ..!

thanks for ur reply..!

am passing all parameters..

when am debugging i can see the text in the internal table it_tlines,

but its is in body only ...

the text what it is in the body is not passing to work area..!

how can i move it to work area.

but am using like this

call function module 'READ_TEXT'

exporting

--

--

--

--

tables

tlines = it_tlines

-

-

exceptions

-

-

-

if sy-subc <> 0.

msg . . . . . . . .. . . . . . !

else.

loop at it_tlines.

append itab_lines.

endloop.

endif.

when am doing like this is running infinite loop.!

how can i pass the standard text to work area ..!

and i hav to print it in the formm!

pls tell me... any expert !

Regards,

Rajesh k.