业务提到了一个需求:在sap标准的功能中,会对已交货(包括部分交货)的订单,做删除管控,删除的时候是不允许删除的,但是退货订单(订单类型:ZNB2)没有,是可以删除的,业务想要把这个也管控起来。
我最开始的想法是,如果这个订单是退货订单,并且是有交货了的,就把这个按钮给隐藏掉,或者置灰,但是找了很多的增强点,只要 set pf-status 就报错,提示用户接口 xxx 的状态 NORMAL丢失,但是我debug看了点删除按钮的时候sy-pfkey这个值,确实是NORMAL,而且我也去代码中看了GUI状态,是有这个NORMAL的。不过,为了尽快搞定,我就换了思路,不搞屏幕了,点击按钮让他报错吧。
此篇为点击按钮报错的增强:
类:CL_SCREEN_VIEW_MM
方法:PAI
在方法中做了增强:
效果图:
代码如下:
IF ( sy-tcode = 'ME21N' OR sy-tcode = 'ME22N' OR sy-tcode = 'ME23N' ) AND sy-ucomm = 'MEPO1211DELETE'.
ASSIGN ('(SAPLMEGUI)MEPO_TOPLINE-EBELN') TO FIELD-SYMBOL(<ebeln>).
ASSIGN ('(SAPLMEGUI)MEPO_TOPLINE-BSART') TO FIELD-SYMBOL(<bsart>).
CHECK <bsart> IS ASSIGNED AND <bsart> = 'ZNB2'.
SELECT COUNT(*) FROM ekpo WHERE ebeln = <ebeln> AND elikz = 'X'.
IF sy-subrc EQ 0.
MESSAGE '此退货订单已有交货,不可以删除!' TYPE 'E'.
ENDIF.
ENDIF.