源码:
* 数据声明
DATA: headdata LIKE bapimathead,
return LIKE bapiret2,
valuationdata TYPE bapi_mbew,
valuationdatax TYPE bapi_mbewx,
returnmes LIKE bapi_matreturn2 OCCURS 0 WITH HEADER LINE.
* 抬头数据:物料编码成本视图
headdata-material = ''."物料编码
headdata-cost_view = 'X'."成本视图
"成本明细
CLEAR valuationdata.
valuationdata-plndprice1 = '2129.42'."计划价格
valuationdata-plndprdate1 = '20201215'."计划日期
valuationdata-val_area = '2003' ."评估范围
CLEAR valuationdatax.
valuationdatax-plndprice1 = 'X'."计划价格
valuationdatax-plndprdate1 = 'X'."计划日期
valuationdatax-val_area = '2003' ."评估范围
*调用BAPI
CALL FUNCTION 'BAPI_MATERIAL_SAVEDATA