很多系统自带的F4特别麻烦,特别是工厂、物料等主数据,下面是一些重写F4的系统函数,仅供参考
RMMW1_ATTYP_HELP
RMMW1_EKORG_LIEFNR_HELPRMMW1_LGORT_HELPRMMW1_MATKL_HELPRMMW1_VARNR_HELPRMMW1_VKORG_HELPRMMW1_VRKME_HELPRMMW1_WERKS_HELP例如:
1 FORM SUB_SITE_HELP1 USING P_POS TYPE C. 2 DATA: L_WERKS LIKE T001W-WERKS. 3 4 CALL FUNCTION 'RMMW1_WERKS_HELP' 5 EXPORTING 6 KZ_ALL = 'X' 7 KZ_BEW_WERK = SPACE 8 MATNR = SPACE 9 DISPLAY = SPACE10 KZ_LISTUNG = 'X'11 CHANGING12 E_WERKS = L_WERKS13 EXCEPTIONS14 OTHERS = 1.15 IF SY-SUBRC = 0.16 17 IF P_POS = 'L'.18 S_STORE-LOW = L_WERKS.19 ELSEIF P_POS = 'H'.20 S_STORE-HIGH = L_WERKS.21 ENDIF.22 ENDIF.23 24 ENDFORM.