读取程序中的Text内容(根据语言)

REPORT  ZTEST16 LINE-SIZE 300.

PARAMETERS: PROG LIKE TRDIR-NAME .
PARAMETERS LANG LIKE SY-LANGU.

DATA: ITAB LIKE TEXTPOOL OCCURS 0 WITH HEADER LINE.

READ TEXTPOOL PROG INTO ITAB LANGUAGE LANG.

LOOP AT ITAB.
  WRITE : / ITAB-ID,ITAB-KEY,ITAB-ENTRY.
ENDLOOP.

你可能感兴趣的:(读取程序中的Text内容(根据语言))