READ_TEXT

来源：互联网发布：抓取微信公众号文章php 编辑：程序博客网时间：2024/06/13 10:01

点击打开链接

SAP中所有的项目文本都存在两张数据表中

STXH 抬头项目文本透明表

STXL 明细项目文本透明表

在STXH和STXL中可以找到需要的文本对象。然后通过Read_Text函数来读取文本内容。

以读取Billing抬头文本为例。

1，先配置Billing抬头，建一个项目文本，ID：F001。

2，然后建立一张Billing，取得Billing号码，Billing抬头数据在VBRK数据表中。

3，建立一个Demo程序读取抬头项目文本。

REPORT ZZXLTEST005 .

TABLES: VBRK.DATA:

TEXTNAME(70) TYPE C.

DATA: T_READ LIKE TABLE OF TLINE WITH HEADER LINE.

SELECTION-SCREEN BEGIN OF BLOCK BLOC1 WITH FRAME TITLE TEXT-001.

PARAMETERS: PVBELN LIKE VBRK-VBELN.

SELECTION-SCREEN END OF BLOCK BLOC1.

START-OF-SELECTION.

TEXTNAME = PVBELN.*VBBK是从STXH中找到的。

PERFORM FRM_READ_TEXT USING 'F001' TEXTNAME 'VBBK'.

IF SY-SUBRC = 0.

READ TABLE T_READ INDEX 1.

WRITE T_READ-TDLINE.

ENDIF.

END-OF-SELECTION.

FORM FRM_READ_TEXT USING FID TEXTN OBJN.

CALL FUNCTION 'READ_TEXT'

EXPORTING

ID = FID

LANGUAGE = SY-LANGU

NAME = TEXTN

OBJECT = OBJN

TABLES LINES = T_READ

EXCEPTIONS

ID = 1

LANGUAGE = 2

NAME = 3

NOT_FOUND = 4

OBJECT = 5

REFERENCE_CHECK = 6

WRONG_ACCESS_TO_ARCHIVE = 7

OTHERS = 8.

ENDFORM.

0 0