CS01、CS02保存时增强的BADI(BOM_UPDATE)

1、需求背景：LC项目中，在保存BOM时，需要给BOM以Y开头的物料组件的展开类型字段赋默认值,查了一些资料，找到一个BADI增强，分享一下，希望对用到的兄弟有帮助。

2、BADI增强

step1:执行事务码SE19,在BAdI Name里输入BOM_UPDATE,然后点击“Create Impl”按钮

setp2:在Implementation Name处输入ZBOM_UPDATE,然后点OK按钮。

step3:返回到se19事务码界面,在Implementation中输入"ZBOM_UPDATE",点击"Change"按钮.

step4:双击CHANGE_AT_SAVE

step5:写入代码，保存，激活。当用CS01 CS02创建或修改BOM时，就能看到默认值D2

代码如下：

DATA: STPOB TYPE STPOB.

DATA: FIELD_NAME(30) VALUE ‘(SAPLCSBT)O1-STPOB[]‘.

FIELD-SYMBOLS: <TABLE> TYPE TABLE.

ASSIGN (FIELD_NAME) TO <TABLE>.

LOOP AT <TABLE> INTO STPOB.

IF STPOB-IDNRK+0(1) = ‘Y‘.

CLEAR STPOB-SORTF.

STPOB-DSPST = ‘D2‘.

MODIFY <TABLE> FROM STPOB.

ENDIF.

ENDLOOP.

COMMIT WORK AND WAIT.