Chinaunix首页 | 论坛 | 博客
  • 博客访问: 367204
  • 博文数量: 199
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 1891
  • 用 户 组: 普通用户
  • 注册时间: 2020-05-14 13:25
个人简介

代码5S

文章分类

全部博文(199)

文章存档

2021年(5)

2020年(194)

我的朋友

分类: 其他平台

2021-04-15 16:18:31

FUNCTION zpm006_get_erro_msg.
*"----------------------------------------------------------------------
*"*"局部接口:
*"  EXPORTING
*"     VALUE(EV_MSG) TYPE  BAPI_MSG
*"  TABLES
*"      IT_RETURN STRUCTURE  BAPIRET2
*"----------------------------------------------------------------------



  DATA:lv_msga TYPE bapi_msg,
       lv_msgb TYPE bapi_msg,
       ls_return LIKE bapiret2.

  CLEAR ev_msg.

  "汇总错误消息
  LOOP AT it_return INTO ls_return
    WHERE type CA 'AEX'.

    CALL FUNCTION 'MESSAGE_TEXT_BUILD'
      EXPORTING
        msgid               ls_return-id
        msgnr               ls_return-number
        msgv1               ls_return-message_v1
        msgv2               ls_return-message_v2
        msgv3               ls_return-message_v3
        msgv4               ls_return-message_v4
      IMPORTING
        message_text_output lv_msga.

    IF lv_msgb IS INITIAL.
      lv_msgb lv_msga.
    ELSE.
      lv_msgb lv_msgb && '/' && lv_msga.
    ENDIF.
  ENDLOOP.

  ev_msg lv_msgb.

ENDFUNCTION.
阅读(774) | 评论(0) | 转发(0) |
0

上一篇:日期输入SAP转换

下一篇:没有了

给主人留下些什么吧!~~