ABAP 使用函数读取文本

1314lay_1007

已于 2024-05-17 16:51:55 修改

阅读量181

点赞数 1

分类专栏： ABAP SAP 文章标签： ABAP

于 2024-05-17 16:49:39 首次发布

本文链接：https://blog.csdn.net/weixin_44686958/article/details/139008718

版权

ABAP 同时被 2 个专栏收录

90 篇文章 2 订阅

订阅专栏

SAP

89 篇文章 0 订阅

订阅专栏

文章目录

ABAP 使用函数读取文本

ABAP 使用函数读取文本

程序

*&---------------------------------------------------------------------*
*& Report Z_TEXT_GET_TEXT
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_TEXT_GET_TEXT.

DATA il_line LIKE TABLE OF tline.
CALL FUNCTION 'READ_TEXT'
        EXPORTING
          client                  = sy-mandt    "当前集团号
          id                      = '0001'  "文本的ID
          language                = '1' "1代表ZH，即中文
          name                    = '0040000025000010'  "文本名
          object                  = 'VBBP'  "文本对象
*         ARCHIVE_HANDLE          = 0
*         LOCAL_CAT               = ' '
*       IMPORTING
*         HEADER                  =
*         OLD_LINE_COUNTER        =
        TABLES
          lines                   = il_line "取到的行
        EXCEPTIONS
          id                      = 1
          language                = 2
          name                    = 3
          not_found               = 4
          object                  = 5
          reference_check         = 6
          wrong_access_to_archive = 7
          OTHERS                  = 8.

      IF sy-subrc = 0.
        READ TABLE il_line INTO DATA(ls1_line) INDEX 1.
        IF sy-subrc = 0.
          WRITE ls1_line-tdline.
        ENDIF.
      ENDIF.