SAP获取采购订单表头长文本-创新互联

SAP 获取采购订单表头长文本

主要从事网页设计、PC网站建设（电脑版网站建设）、wap网站建设（手机版网站建设）、成都响应式网站建设公司、程序开发、微网站、微信小程序定制开发等，凭借多年来在互联网的打拼，我们在互联网网站建设行业积累了丰富的成都做网站、网站制作、网络营销经验，集策划、开发、设计、营销、管理等多方位专业化运作于一体，具备承接不同规模与类型的建设项目的能力。

长文本不是直接存在某个table中，你在（me23n）可以双击该文本，然后选择菜单goto->header，查看该文本的技术信息，然后通过function module 'read_text'，输入相关的技术信息，取得该文本。

DATA: BEGIN OF T_LINES OCCURS 50.

  INCLUDE STRUCTURE TLINE.

DATA: END OF T_LINES.

DATA: BEGIN OF HTEXT.

        INCLUDE STRUCTURE THEAD.

DATA: END OF HTEXT.

DATA: TNAME LIKE THEAD-TDNAME.

DATA: S_LINE(100) TYPE C.

   TNAME = open_po-ebeln.    " 将采购单号码付给变量

   S_LINE = ''.

   CLEAR T_LINES.

   REFRESH T_LINES.

*-- 采购表头长文本

 CALL FUNCTION 'READ_TEXT'

       EXPORTING

          CLIENT                     = SY-MANDT

          ID                               = 'F01'

          LANGUAGE             = '1'

          NAME                        = TNAME

          OBJECT                   = 'EKKO'

         ARCHIVE_HANDLE          = 0

     IMPORTING

          HEADER                  = HTEXT

     TABLES

          LINES                       = T_LINES

     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.

      LOOP AT T_LINES.

        IF T_LINES-TDLINE NE ''.

          CONCATENATE S_LINE T_LINES-TDLINE INTO S_LINE.

        ENDIF.

        ENDLOOP.

       open_po-LTEXT =  S_LINE.

    ENDIF.

/tupian/20230522/p
标题名称：SAP获取采购订单表头长文本-创新互联
文章转载：http://shouzuofang.com/article/gosjh.html