测试如下:
测试结果
程序中封装
FORM frm_convert_unit USING pv_matnr
pv_kwmeng
CHANGING cv_cans.
DATA: lv_in_menge TYPE ekpo-menge,
lv_out_menge TYPE ekpo-menge.
lv_in_menge = pv_kwmeng.
CALL FUNCTION 'MD_CONVERT_MATERIAL_UNIT'
EXPORTING
i_matnr = pv_matnr
i_in_me = 'CS' "CV内码 CS
i_out_me = 'KAN' "CAN 内码KAN
i_menge = lv_in_menge
IMPORTING
e_menge = lv_out_menge
EXCEPTIONS
error_in_application = 1
error = 2
OTHERS = 3.
IF sy-subrc = 0.
cv_cans = lv_out_menge.
ENDIF.
ENDFORM.