关于对物料计量单位的维护

2024-01-03 17:38:43

1、业务背景

一般情况下,在设计产品时,明确了物料的计量单位,并在维护物料主数据时,维护完整单位数据。

但也有例外情况,例如当设计产品时,不明确未来的打包方式,不明确要维护哪些种计量单位,只有当生产完成之后,再确定通过包还是箱等方式包装产品,并将新的计量单位同步给外围系统方便运输。因此就需要在生产完成之后,再修改对应的物料主数据的计量单位。

前台操作,事务代码MM02,维护物料的量纲和附加数据里面的计量单位

?附加数据

2、代码参考

调用BAPI:BAPI_MATERIAL_SAVEDATA,增删改计量单位

"--------------------@斌将军--------------------
DATA:ls_head   TYPE bapimathead,
     ls_mara   TYPE bapi_mara,
     ls_marax  TYPE bapi_marax,
     lt_marm   TYPE TABLE OF bapi_marm,
     ls_marm   TYPE bapi_marm,
     lt_marmx  TYPE TABLE OF bapi_marmx,
     ls_marmx  TYPE bapi_marmx,
     ls_return TYPE bapiret2.

ls_head-material = '000000000002000076'.  "SAP物料编码

"修改量纲
ls_mara-net_weight = 1."净重
ls_marax-net_weight = 'X'."净重

CLEAR:ls_marm.
ls_marm-alt_unit = 'M'."基本单位
ls_marm-gross_wt = 3."毛重
ls_marm-unit_of_wt = 'KG'."重量单位
ls_marm-volume = 1."业务量
ls_marm-volumeunit = 'M3'."体积单位
APPEND ls_marm TO lt_marm.
CLEAR:ls_marmx.

ls_marmx-alt_unit = 'M'."基本单位
ls_marmx-gross_wt = 'X'."毛重
ls_marmx-unit_of_wt = 'X'."重量单位
ls_marmx-volume = 'X'."业务量
ls_marmx-volumeunit = 'X'."体积单位
APPEND ls_marmx TO lt_marmx.

"删除附加数据计量单位
CLEAR:ls_marm.
ls_marm-alt_unit = 'EA'."基本单位
ls_marm-del_flag = 'X'."删除
APPEND ls_marm TO lt_marm.

"维护多个单位
CLEAR:ls_marm.
ls_marm-alt_unit = 'EA'."基本单位
ls_marm-numerator = 23."分子
ls_marm-denominatr = 10."分母
APPEND ls_marm TO lt_marm.

CLEAR:ls_marmx.
ls_marmx-alt_unit = 'EA'."基本单位
ls_marmx-numerator = 'X'."分子
ls_marmx-denominatr = 'X'."分母
APPEND ls_marmx TO lt_marmx.

CALL FUNCTION 'BAPI_MATERIAL_SAVEDATA'
  EXPORTING
    headdata        = ls_head
    clientdata      = ls_mara
    clientdatax     = ls_marax
  IMPORTING
    return          = ls_return
  TABLES
    unitsofmeasure  = lt_marm
    unitsofmeasurex = lt_marmx.

IF ls_return-type = 'E'.
  CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
  MESSAGE ls_return-message TYPE 'S' DISPLAY LIKE 'E'.
ELSE.
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      wait = 'X'.
  MESSAGE '成功' TYPE 'S'.
ENDIF.
"--------------------@斌将军--------------------

定期更文,欢迎关注

文章来源:https://blog.csdn.net/BinGeneral/article/details/135367638
本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。