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://azwzsj.com/article/gosjh.html