ABAP ME5A增加字段项目文本

最新推荐文章于 2024-01-23 20:45:00 发布

kodyyu

最新推荐文章于 2024-01-23 20:45:00 发布

阅读量228

点赞数

分类专栏： SAP-MM SAP-ABAP 文章标签： sap sap abap

本文链接：https://blog.csdn.net/weixin_43176021/article/details/130198881

版权

SAP-ABAP 同时被 2 个专栏收录

89 篇文章 5 订阅

订阅专栏

SAP-MM

76 篇文章 4 订阅

订阅专栏

该段代码展示了在结构MEREP_OUTTAB_EBAN中增加字段的步骤，并在包含文件LMEREPI08中添加了取值逻辑。当TCode为ME5A时，代码读取特定对象的文本信息，存储到表格it_lines中，并通过循环处理将文本内容合并到输出表ls_outtab的ztext字段。

摘要由CSDN通过智能技术生成

1，在结构 MEREP_OUTTAB_EBAN 增加字段
在这里插入图片描述
2.在包含文件 LMEREPI08 增加取值逻辑

*{ INSERT S4DK903669 1
"20230417-yuchengyi-begin
IF sy-tcode = ‘ME5A’.
DATA: tdid TYPE thead-tdid.
DATA: object TYPE thead-tdobject.
DATA: tdobname TYPE thead-tdname.
DATA:it_lines TYPE TABLE OF tline.
DATA:is_lines TYPE tline.
REFRESH :it_lines.
tdobname = ls_eban-banfn && ls_eban-bnfpo.
tdid = ‘B01’.
object = ‘EBAN’.
CALL FUNCTION ‘READ_TEXT’
EXPORTING
id = tdid
language = ‘1’
name = tdobname
object = object
client = sy-mandt
TABLES
lines = it_lines
EXCEPTIONS
not_found = 1.

        LOOP AT it_lines INTO is_lines.
          IF sy-tabix = 1.
            ls_outtab-ztext = is_lines-tdline.
          ELSE.
            CONCATENATE ls_outtab-ztext cl_abap_char_utilities=>newline is_lines-tdline INTO ls_outtab-ztext.
          ENDIF.
        ENDLOOP.
 ENDIF.

"20230417-yuchengyi-end
*} INSERT