ABAP MIGO保存后更新物料凭证行项目数据增强实战指南

1次阅读

没有评论

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

在 SAP 标准系统中，MIGO（物料移动）事务码执行后，系统会自动生成物料凭证（Material Document）。但实际业务中常遇到以下痛点：

标准系统不会自动更新某些自定义字段（如成本中心扩展字段）
需要根据移动类型动态修改行项目文本说明
需与外围系统实时同步凭证状态
特殊业务场景要求追加校验逻辑（如项目库存的特殊规则）

适用场景：
– SAP ECC 早期版本（4.6C 以下）
– 简单字段修改需求
– 不需要复杂业务逻辑的场景

局限性：
– 修改范围受限
– 缺乏标准异常处理机制
– 升级时易出现冲突

优势：
– 支持 S /4HANA 全版本
– 完整的控制接口（BEFORE_SAVE/AFTER_SAVE）
– 可访问全部凭证数据
– 标准异常处理框架

推荐选择：

" 激活 BADI 实现步骤
1. SE18 创建增强点 MB_MIGO_BADI
2. SE19 创建实现类 ZCL_IM_MB_MIGO_BADI
3. 实现 IF_EX_MB_MIGO_BADI 接口

CLASS zcl_im_mb_migo_badi DEFINITION
  PUBLIC
  FINAL
  CREATE PUBLIC .

  PUBLIC SECTION.
    INTERFACES if_ex_mb_migo_badi .

  PRIVATE SECTION.
    METHODS:
      " 更新行项目数据
      update_item_data
        IMPORTING
          is_mseg TYPE mseg,
          iv_vbeln TYPE vbeln_va OPTIONAL,
        EXPORTING
          ev_success TYPE abap_bool,
          ev_message TYPE bapi_msg,
      " 记录处理日志
      write_log
        IMPORTING
          iv_mblnr TYPE mblnr,
          iv_mjahr TYPE mjahr.
ENDCLASS.

METHOD if_ex_mb_migo_badi~after_save.
  DATA:
    lt_mseg TYPE STANDARD TABLE OF mseg,
    lv_success TYPE abap_bool,
    lv_message TYPE bapi_msg.

  " 获取当前凭证行项目
  SELECT * FROM mseg
    INTO TABLE lt_mseg
    WHERE mblnr = im_mseg-mblnr
      AND mjahr = im_mseg-mjahr.

  " 循环处理每个行项目
  LOOP AT lt_mseg ASSIGNING FIELD-SYMBOL(<fs_mseg>).
    " 调用更新函数
    me->update_item_data(
      EXPORTING
        is_mseg  = <fs_mseg>
      IMPORTING
        ev_success = lv_success
        ev_message = lv_message
    ).

    " 错误处理
    IF lv_success = abap_false.
      MESSAGE lv_message TYPE 'E'.
    ENDIF.
  ENDLOOP.

  " 写入处理日志
  me->write_log(
    iv_mblnr = im_mseg-mblnr
    iv_mjahr = im_mseg-mjahr
  ).
ENDMETHOD.

字段名	描述	更新注意事项
MBLNR	物料凭证编号	不可修改
MJAHR	会计年度	不可修改
ZEILE	行项目号	不可修改
WERKS	工厂	需检查库存地点有效性
MATNR	物料编号	需检查主数据状态
CHARG	批次	批次管理工厂需特殊处理
BWART	移动类型	决定业务逻辑分支

批量操作处理：
使用 FOR ALL ENTRIES 替代单条 SELECT
避免在循环中提交更新（使用批量更新）

数据锁定策略：

" 推荐锁定方式
CALL FUNCTION 'ENQUEUE_EMMATDOC'
  EXPORTING
    mandt          = sy-mandt
    mblnr          = lv_mblnr
    mjahr          = lv_mjahr
  EXCEPTIONS
    foreign_lock   = 1
    system_failure = 2.