ABAP 抬头文本操作

1.例如查找采购订单抬头文本等

2.首先根据采购凭证或用户查询STXH表,销售订单查找相同道理

3.根据函数READ_TEXT读取文本进行拼接

CLIENT:客户端

ID:标识

LANGUAGE:语言

NAME:文本名

OBJECT:对象

4.将返回的表进行拼接得到长文本

5.创建文本

  DATA:LT_TLINE TYPE STANDARD TABLE OF TLINE,
       LS_TLINE LIKE TLINE,
       LV_11 TYPE tdobname.

CALL FUNCTION 'CREATE_TEXT'
        EXPORTING
          FID         = 'XX'   "在STXH代表标识
          FLANGUAGE   = sy-langu
          FNAME       = LV_11  "文本名 正常抬头放凭证,行项目放凭证+行项目号
          FOBJECT     = 'XX'   "对象 销售订单抬头 VBAK 行项目 VBBP
          SAVE_DIRECT = 'X'
*          FFORMAT     = '*'
        TABLES
          FLINES      = LT_TLINE    "文本内容
        EXCEPTIONS
          NO_INIT     = 1
          NO_SAVE     = 2
          OTHERS      = 3.
      IF SY-SUBRC <> 0.
      ENDIF.

6.修改文本

使用SAVE_TEXT

猜你喜欢

转载自blog.csdn.net/wx774891/article/details/112221651