MM06E005 --> EXIT_SAPMM06E_017 (PAI)
DATA: tmpafnam LIKE ekpo-afnam,
tmpmatnr LIKE mara-matnr,
tmpxchpf LIKE marc-xchpf.
SELECT SINGLE xchpf INTO tmpxchpf FROM marc
WHERE werks = i_ekpo-werks AND
matnr = i_ekpo-matnr .
IF tmpxchpf = 'X'.
IF i_ekpo-afnam = ''.
MESSAGE w000(z900) WITH '请填写色号' INTO gl_dummy.
mmpur_message 'W' 'Z900' '000' '请填写色号' '' '' ''.
ENDIF.
ENDIF.
附:VA01 行项目回车后检查出口:
MV45AFZZ
FORM userexit_move_field_to_vbap.
阅读(4961) | 评论(0) | 转发(0) |