需求: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行项目检查增强完成