ALV  双击CALL 标准事务

前几天接到一个需求，在ALV上双击采购凭证，可以跳转到ME23N显示单证明细。

本来想直接CALL ME23N的，但是不好传值进去，所以就换了个方案，录屏。呵呵

用SHDB录ME23N,只要录到选择其他单证，输入单证号，回车就OK了。

在ALV双击事件了加：

IF RS_SELFIELD-FIELDNAME CS 'EBELN'."单证明细

REFRESH IT_BDCDATA.

PERFORM BDC_DYNPRO USING 'SAPLMEGUI' '0014'.

PERFORM BDC_FIELD USING 'BDC_OKCODE' '=MECHOB'.

PERFORM BDC_DYNPRO USING 'SAPLMEGUI' '0002'.

PERFORM BDC_FIELD USING 'BDC_OKCODE' '=MEOK'.

PERFORM BDC_FIELD USING 'BDC_SUBSCR' 'SAPLMEGUI 0003SUB0'.

PERFORM BDC_FIELD USING 'BDC_CURSOR' 'MEPO_Select-EBELN'.

PERFORM BDC_FIELD USING 'MEPO_Select-EBELN' LWA_ALV-EBELN.

PERFORM BDC_FIELD USING 'MEPO_Select-BSTYP_F' 'X'.

REFRESH IT_BDCMSG.

CALL TRANSACTION 'ME23N' USING IT_BDCDATA 

                                                            MODE 'E'   "此处一定要用E,报错弹出消息，也就是跳出ME23N

                                                            Update 'C'. “此处用C，不然不会跳出ME23N的，呵呵。在此吃亏多次

CLEAR LWA_ALV.

 

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: