需求:migo行项目增强,检查行项目输入的内容
在MIGO前台F1,进入程序SAPLMIGO
在这里插入图片描述
全局搜索
CALL METHOD CL_EXITHANDLER=>GET_INSTANCE
在这里插入图片描述
找到相关badi,根据名称应该是MB_MIGO_ITEM_BADI,我们进入SE18,查询,发现功能不符合
在这里插入图片描述
我们再查询MB_MIGO_BADI,发现条件符合,包含了行项目的修改删除,保存之类的操作
在这里插入图片描述
创建实施类ZSY_CL_EX_MB_MIGO_BADI
需要创建全局变量GT_GOITEM
在这里插入图片描述
在方法LINE_MODIFY中,将行项目赋值到全局变量中,需要注意的是, MIGO行项目每次输入值的时候都会重复保存,导致有多条重复数据,且数据的值不全,所以我们需要进行合并重复的item
在这里插入图片描述
如下代码:

  IF GT_GOITEM[] IS NOT INITIAL. 
    READ TABLE GT_GOITEM INTO DATA(GS_GOITEM) WITH KEY ZEILE = CS_GOITEM-ZEILE.
    IF SY-SUBRC <> 0.
      APPEND CS_GOITEM TO GT_GOITEM.
    ELSE.
      MODIFY GT_GOITEM FROM CS_GOITEM INDEX SY-TABIX.
    ENDIF.
  ELSE.
    APPEND CS_GOITEM TO GT_GOITEM.
  ENDIF.

在CHECK_ITEM中对行项目进行检查,需要注意的是,行项目每输入一次,就会进入这个方法一次,如果不根据i_line_id进行循环检查,一条item会重复报错多次
在这里插入图片描述

在POST_DOCUMENT方法中删除全局变量
在这里插入图片描述
配置完成,MIGO行项目检查增强完成

Logo

有“AI”的1024 = 2048,欢迎大家加入2048 AI社区

更多推荐