ABAP物料主数据保存增强实战：从BAdI到批量处理的完整解决方案

1次阅读

共计 2163 个字符，预计需要花费 6 分钟才能阅读完成。

在 SAP 系统中，物料主数据的维护是企业日常运营中的关键任务。标准事务码 MM01/MM02 提供了基本功能，但在实际业务场景中，我们常常需要扩展这些标准功能，以满足特定的业务需求。本文将详细介绍如何通过增强 MM06E005 BAdI 来实现高性能的物料主数据保存逻辑，并解决批量处理中的常见问题。

在标准的物料主数据维护流程中，开发者通常会遇到以下几个主要问题：

BAdI 在批量导入时性能不佳，特别是在处理大量数据时
现有的用户出口 (User Exit) 难以维护，特别是在系统升级时
在处理大批量数据时，系统响应时间显著增加
错误消息处理不够友好，难以在批量操作中准确定位问题

针对上述问题，我们可以通过增强 MM06E005 BAdI 来实现更高效的物料主数据保存逻辑。这个 BAdI 是 SAP 专门为物料主数据保存提供的增强点，相比传统的用户出口，它提供了更好的维护性和扩展性。

使用事务码 SE19 创建 BAdI 实现
选择 MM06E005 作为 BAdI 定义
创建实现类 ZCL_MM_MATERIAL_SAVE
实现 IF_EX_MM_MATERIAL_SAVE 接口

[图：SE19 创建 BAdI 实现的截图]

下面是核心增强类的实现代码，重点关注性能优化部分：

CLASS zcl_mm_material_save DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    INTERFACES if_ex_mm_material_save.
  PRIVATE SECTION.
    TYPES: BEGIN OF ty_material_buffer,
             matnr TYPE matnr,
             data  TYPE mara,
           END OF ty_material_buffer.

    CLASS-DATA: gt_material_buffer TYPE HASHED TABLE OF ty_material_buffer
                WITH UNIQUE KEY matnr.
ENDCLASS.

CLASS zcl_mm_material_save IMPLEMENTATION.
  METHOD if_ex_mm_material_save~save_data_prepare.
    " 使用内存表缓存物料数据，减少数据库访问
    IF gt_material_buffer IS INITIAL.
      SELECT matnr, * FROM mara
        INTO CORRESPONDING FIELDS OF TABLE @gt_material_buffer
        FOR ALL ENTRIES IN @material_numbers
        WHERE matnr = @material_numbers-matnr.
    ENDIF.

    " 字段校验逻辑
    LOOP AT material_numbers ASSIGNING FIELD-SYMBOL(<mat>).
      " 检查物料描述是否为空
      IF <mat>-maktx IS INITIAL.
        APPEND VALUE #(msgty = 'E' msgid = 'ZMM' msgno = '001') TO messages.
      ENDIF.

      " 从缓存中读取数据
      READ TABLE gt_material_buffer ASSIGNING FIELD-SYMBOL(<buffer>)
        WITH TABLE KEY matnr = <mat>-matnr.
      IF sy-subrc = 0.
        " 执行特定的业务逻辑校验
      ENDIF.
    ENDLOOP.
  ENDMETHOD.

  METHOD if_ex_mm_material_save~save_data_end.
    " 批量模式下优化 COMMIT 策略
    IF is_batch = abap_true.
      " 每 100 条记录执行一次 COMMIT
      IF lines(material_numbers) MOD 100 = 0.
        COMMIT WORK.
      ENDIF.
    ENDIF.
  ENDMETHOD.
ENDCLASS.

我们对单条处理和批量处理进行了性能测试，结果如下：