场景:以交货单行项目文本为例
PARAMETERS:
"文本字段的编号
fid LIKE thead-tdid DEFAULT '0002',
"十位交货单号(1800000001)加6位行号(000010),如果是抬头文本,写交货单号就够了
fname LIKE thead-tdname DEFAULT '1800000001000010',
"抬头 VBBK,行项目VBBP
fobject LIKE thead-tdobject DEFAULT 'VBBP',
text TYPE string DEFAULT '测试'.
DATA: flines LIKE TABLE OF tline WITH HEADER LINE.
"文本内容
flines-tdline = text.
APPEND flines.
"修改文本
CALL FUNCTION 'CREATE_TEXT'
EXPORTING
fid = fid
flanguage = sy-langu
fname = fname
fobject = fobject
TABLES
flines = flines
EXCEPTIONS
no_init = 1
no_save = 2
OTHERS = 3.
原创文章,作者:Maggie-Hunter,如若转载,请注明出处:https://blog.ytso.com/19542.html