SAP MM ME21N采购订单检查增强

最新推荐文章于 2026-04-18 11:01:50 发布

原创最新推荐文章于 2026-04-18 11:01:50 发布 · 4.1k 阅读

14 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#sap #abap

MM 专栏收录该内容

27 篇文章

订阅专栏

博主提供ABAP远程开发服务，专注于采购订单的输入值校验。通过调用SE18并使用ME_PROCESS_PO_CUST，实现创建采购订单时的数据验证。博客中展示了代码示例，用于获取并校验采购订单行项目的输入，错误信息会加入到标准报错中。

本人诚心接ABAP远程开发任务，价格公道，有需要的联系我，欢迎个人，甲方爸爸，乙方私信联系。

根据客户要求，要求在创建采购订单时，对输入值进行校验

SE18-->ME_PROCESS_PO_CUST

 DATA:lv_msg   TYPE SYMSGV.
 DATA:lv_matnr TYPE matnr.
 DATA lt_items TYPE purchase_order_items.
 DATA ls_items TYPE purchase_order_item.
 DATA ls_items_data TYPE mepoitem.
 DATA lt_items_data TYPE STANDARD TABLE OF mepoitem.


"获取当前的行项目
 CALL METHOD im_header->get_items
      RECEIVING
        re_items = lt_items.
 LOOP AT lt_items INTO ls_items.
      CALL METHOD ls_items-item->get_data
        RECEIVING
          re_data = ls_items_data.

      APPEND ls_items_data TO lt_items_data.
      CLEAR ls_items_data.
 ENDLOOP.

"将报错信息添加到标准报错里面
cl_message_mm=>create(
           EXPORTING  im_msgid         = 'ZMM001'
                      im_msgty         = 'E'
                      im_msgno         = '000'
                      im_msgv1         = lv_msg
                      im_msgv2         = ''
                      im_msgv3         = ''
                      im_msgv4         = ''
                      im_force_collect = 'X'
           EXCEPTIONS failure          = 0
                      dialog           = 0 ).
                ch_failed = 'X' .