天天看点

abap代码获取采购订单po中的抬头文本

如下图所示,事务码ME23N查看一张具体的采购订单的内容:

abap代码获取采购订单po中的抬头文本

在采购订单PO的抬头部分,有一个tab名为【文本】,这里面如图所示的抬头文本,里面的内容,我们要写abap代码提取出来,然后在alv中显示出来。

去哪里找?

我们双击右侧那个大框,如下所示

abap代码获取采购订单po中的抬头文本
点击转到、表头
abap代码获取采购订单po中的抬头文本
abap代码获取采购订单po中的抬头文本
如何提取上述内容,我们需要调用名为READ_TEXT的FM
abap代码获取采购订单po中的抬头文本
执行调用
abap代码获取采购订单po中的抬头文本
abap代码获取采购订单po中的抬头文本
abap代码获取采购订单po中的抬头文本
abap代码获取采购订单po中的抬头文本

上述内容,找到了前台事务码ME23N操作与READ_TEXT之间的关系。

下面,我们在report中调用READ_TEXT

DATA: RT_DATA    LIKE TLINE OCCURS 0 WITH HEADER LINE.  “返回值
      DATA: T_EBELN    TYPE TDOBNAME. "采购订单号(输入参数)

      CLEAR RT_DATA.
      REFRESH RT_DATA.
      CALL FUNCTION 'READ_TEXT'
      EXPORTING
        CLIENT                  = SY-MANDT
        ID                      = 'F01'
        LANGUAGE                = SY-LANGU
        NAME                    = T_EBELN "采购订单编号
        OBJECT                  = 'EKKO'
      TABLES
        LINES                   = RT_DATA
      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.
*      MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*                WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
           

调试

abap代码获取采购订单po中的抬头文本

结果

继续阅读