ABAP 文本写入详解编程语言

场景:以交货单行项目文本为例

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

(0)
上一篇 2021年7月19日
下一篇 2021年7月19日

相关推荐

发表回复

登录后才能评论