以下代码用于物料在多单位下数量的换算。
PERFORM FRM_CONVERT_MATNR_UNIT USING LS_HEAD-MATNR
LS_HEAD-DW
LS_HEAD-MEINS
LS_HEAD-MENGE
CHANGING LV_MENGE.
FORM FRM_CONVERT_MATNR_UNIT USING PV_MATNR
PV_IN_ME
PV_OUT_ME
PV_I_MENGE
CHANGING PV_E_MENGE.
DATA: LV_MENGE TYPE STPO-MENGE.
CLEAR: LV_MENGE,PV_E_MENGE.
IF PV_I_MENGE NE 0.
CALL FUNCTION 'MD_CONVERT_MATERIAL_UNIT'
EXPORTING
I_MATNR = PV_MATNR
I_IN_ME = PV_IN_ME
I_OUT_ME = PV_OUT_ME
I_MENGE = PV_I_MENGE
IMPORTING
E_MENGE = LV_MENGE
EXCEPTIONS
ERROR_IN_APPLICATION = 1
ERROR = 2
OTHERS = 3.
PV_E_MENGE = LV_MENGE.
ENDIF.
ENDFORM. " FRM_CONVERT_MATNR_UNIT