ME28审批通过后传输外围系统
BADI:ME_PURCHDOC_POSTED
METHOD IF_EX_ME_PURCHDOC_POSTED~POSTED.
IF SY-TCODE EQ 'ME28' .
IF IM_EKKO-BSART EQ 'ZNB3' .
IF IM_EKKO-FRGRL EQ SPACE .
CALL FUNCTION 'ZFM_MM_WMS_OUTSOURCING'
EXPORTING
IV_EBELN = IM_EKKO-EBELN.
ENDIF .
ENDIF .
ENDIF .
ENDMETHOD.