简单的长文本读取方式
1、函数方式(适合少量读取长文本使用)
// An highlighted block
data: lines TYPE STANDARD TABLE OF tline,
header TYPE thead.
CLEAR: header.
header-tdobject = ''."文本对象
header-tdname = ''."文本名
header-tdid = ''."文本标识
header-tdspras = ''.”语言
CLEAR: lines.
* 读取文本对象的文本
CALL FUNCTION 'READ_TEXT'
EXPORTING
id = header-tdid
language = header-tdspras
name = header-tdname
object = header-tdobject
TABLES
lines = lines
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.
Tip: 获取长文本信息,可通过单据查看(双击长文本,然后点击菜单 转到-表头)
2、命令方式(适合报表大批量取数时使用,效率大大提高, 本人亲测有效)
// An highlighted block
DATA: lt_line TYPE TABLE OF tline,
ls_line TYPE tline.
DATA:
BEGIN OF stxl_id,
tdobject LIKE stxl-tdobject,
tdname LIKE stxl-tdname,
tdid LIKE stxl-tdid,
tdspras LIKE stxl-tdspras,
END OF stxl_id.
CLEAR: stxl_id.
stxl_id-tdobject = ''."文本对象
stxl_id-tdname = ''."文本名
stxl_id-tdid = ''."文本标识
stxl_id-tdspras = sy-langu."语言
CLEAR: lt_line.
IMPORT tline TO lt_line FROM DATABASE stxl(tx) CLIENT sy-mandt ID stxl_id IGNORING CONVERSION ERRORS.
另外,长文本更多信息,可以参考@SAPmatinal的优秀文章:
SAP ABAP 创建、保存、删除长文本的方法