Getting header text from PO.

[Former Member]

Hi,

I want to get the Header Text for particular PO, and pass it to Form for printing..

Pls tell me exactly what is to be exported and imported in the following module.

CALL FUNCTION 'READ_TEXT'

EXPORTING

• CLIENT = SY-MANDT

ID =

LANGUAGE =

NAME =

OBJECT =

• ARCHIVE_HANDLE = 0

• LOCAL_CAT = ' '

• IMPORTING

• HEADER =

TABLES

LINES =

• 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.

Regards,

Dhananjay.

[Former Member]

Hi,

I want to get the Header Text for particular PO, and pass it to Form for printing..

Pls tell me exactly what is to be exported and imported in the following module.

CALL FUNCTION 'READ_TEXT'

EXPORTING

• CLIENT = SY-MANDT

ID =

LANGUAGE =

NAME =

OBJECT =

• ARCHIVE_HANDLE = 0

• LOCAL_CAT = ' '

• IMPORTING

• HEADER =

TABLES

LINES =

• 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.

Regards,

Dhananjay.

[Former Member]

Hi,

Imports:-

Language 'EN'.

ID - Check with TTXID

Object - TTXOB

Name will be the PO number.

import :-

Table like THEAD.

Reward points ,

if useful.

Regards,

Murugan Arumugam.

[Former Member]

Hi,

do as below

DATA: BEGIN OF w_lines OCCURS 0.

INCLUDE STRUCTURE tline.

DATA: END OF w_lines.

CALL FUNCTION 'READ_TEXT'

EXPORTING

CLIENT = SY-MANDT

ID = 'F01'.

LANGUAGE = 'E'

NAME = <PO Number>

OBJECT = 'EKKO'

• ARCHIVE_HANDLE = 0

• LOCAL_CAT = ' '

• IMPORTING

• HEADER =

TABLES

LINES = w_lines

• 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.

Regards,

Satish

[Former Member]

Hi Satish,

how did u get the the ID = 'F01' and OBJECT = 'EKKO'...??

My problem is solved but just wanted to know