topic Re: Purchase Order Description Text in Application Development and Automation Discussions

Purchase Order Description Text

Former Member — Thu, 25 Sep 2008 12:25:50 GMT

Hi All,

I am trying to display a POD text but it is cutting off, can anyone help to write the purchase order description text. Currently it can only display only 130 characters.

gv_repid = sy-repid.

SELECT SINGLE ebeln INTO i_tab-ebeln FROM ekpo WHERE matnr = i_tab-matnr.

line_id = 'BEST'.

line_name = i_tab-matnr.

line_lang = sy-langu.

line_object = 'MATERIAL'.

CALL FUNCTION 'READ_TEXT'

EXPORTING

id = line_id

language = line_lang

name = line_name

object = line_object

TABLES

lines = i_tabs

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.

ENDIF.

LOOP AT i_tabs.

CONDENSE i_tabs-tdline.

CONCATENATE i_tab-text i_tabs-tdline INTO i_tab-text SEPARATED BY space.

MODIFY i_tab TRANSPORTING text.

ENDLOOP.

Regards,

Fred

Re: Purchase Order Description Text

Former Member — Thu, 25 Sep 2008 12:38:12 GMT

What is the length of i_tab-text ??

Darren

Re: Purchase Order Description Text

Former Member — Thu, 25 Sep 2008 12:41:23 GMT

Hello Fred.

As you want to write to the existing one,

You need to Use "SAVE_TEXT" after the Loop-Endloop.

This will append to the existing text and if it has no text then use "insert" option in the Function module itself.

probably, for display how have you done the declarations?

Hope this solves your problem.

If you still have any query give feedback.

Good Luck & Regards.

Harsh Dave

Re: Purchase Order Description Text

Former Member — Fri, 26 Sep 2008 04:17:20 GMT

This is my code:

FORM reading_text.

Begin of i_tab occurs 0,

text(150) type c

end of i_tab.

gv_repid = sy-repid.

SELECT ebeln INTO i_tab-ebeln FROM ekpo WHERE matnr = i_tab-matnr.

EXIT.

ENDSELECT.

line_id = 'BEST'.

line_name = i_tab-matnr.

line_lang = sy-langu.

line_object = 'MATERIAL'.

ALL FUNCTION 'READ_TEXT'

EXPORTING

id = line_id

language = line_lang

name = line_name

object = line_object

TABLES

lines = i_tabs

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.

ENDIF.

LOOP AT i_tabs.

CONDENSE i_tabs-tdline.

CONCATENATE i_tab-text i_tabs-tdline INTO i_tab-text(150) SEPARATED BY space.

MODIFY i_tab TRANSPORTING text.

ENDLOOP.

CALL FUNCTION 'SAVE_TEXT'

EXPORTING

header = i_tab-text

TABLES

lines = i_tabs.

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

It's giving me a dump:call_function_conflict_leng

There are other fields in an internal table.

Regards,

Fred

Edited by: Fred Mogaadile on Sep 26, 2008 6:17 AM

Edited by: Fred Mogaadile on Sep 26, 2008 6:19 AM

Re: Purchase Order Description Text

Lakshmant1 — Fri, 26 Sep 2008 04:55:11 GMT

Hi Fred,

The max. length of the line you can read is 132 characters in the tables parameter.Infact it stores only 132 characters for each line when you save the text.

Thanks

Lakshman