貌似用PP生产入库的增强更好(区别在那个操作动作检查)
SE19
METHOD if_ex_mb_migo_badi~post_document.
DATA: xx TYPE mkpf-mblnr .
**
* EXPORT p1 from gv_mblnr to MEMORY id 'dd' .
IMPORT p1 TO xx FROM MEMORY ID 'dd' .
DATA: lv_budat TYPE mkpf-budat . "原单的过账日期
DATA: lv_budat2 TYPE mkpf-budat .
SELECT SINGLE budat
INTO lv_budat
FROM mkpf
WHERE vgart = 'WE' "采购订单据收货
AND mblnr = xx .
lv_budat2 = is_mkpf-budat ."当前单据的物料过账日期
DATA: lv_bwart TYPE mseg-bwart .
DATA: is_mseg TYPE