matinal：SAP ABAP CO02生产工单重读主数据BAPI

本文链接：https://blog.youkuaiyun.com/SAPmatinal/article/details/133314492

文章描述了一个过程，通过BAPI_PRODORD_CHANGE函数处理生产订单变更，检查主数据并进行事务操作。如果主数据读取失败，会回滚交易并显示错误消息；成功则提交事务并更新状态。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

DATA:ls_orderdata TYPE bapi_pp_order_change,
　　   ls_orderdatax TYPE bapi_pp_order_changex,
　　   ls_return TYPE bapiret2,
　　   ls_read TYPE bapiflag-bapiflag.

LOOP AT gt_data ASSIGNING FIELD-SYMBOL(<fs_add>) WHERE checkbox = 'X' .

　　CLEAR ls_orderdata .
　　CLEAR ls_orderdatax .
　　CLEAR ls_return .
　　CLEAR ls_read .

　　"afpo~verid
　　ls_orderdata-prod_version = <fs_add>-verid1 . "生产版本
　　ls_orderdata-explosion_date = sy-datum .
　　ls_orderdata-explode_new = 'X' .

　　ls_orderdatax-prod_version = 'X' .
　　ls_orderdatax-explosion_date = 'X' .
　　ls_orderdatax-routing = 'X' .

　　CALL FUNCTION 'BAPI_PRODORD_CHANGE'
　　　　EXPORTING
　　　　　　"aufk~aufnr
　　　　　　number = <fs_add>-aufnr "生产订单号
　　　　　　orderdata = ls_orderdata
　　　　　　orderdatax = ls_orderdatax
　　　　IMPORTING
　　　　　　return = ls_return
* 　　　　　 ORDER_TYPE =
* 　　　　　 ORDER_STATUS =
　　　　　　"重读主数据成功就会返回X，否则为空
　　　　　　master_data_read = ls_read
* 　　　 TABLES
* 　　　　　 FSH_BUNDLES =
　　　　.
　　IF ls_return-type = 'E' AND ls_read = '' .

　　　　<fs_add>-type = icon_red_light .
　　　　<fs_add>-message = '读取主数据失败，请检查订单状态及投料报工入库记录。' && ls_return-message .
　　　　CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.

　　ELSE .

　　　　<fs_add>-verid = <fs_add>-verid1 .
　　　　<fs_add>-type = icon_green_light .
　　　　<fs_add>-message = '读取主数据成功' .
　　　　CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
　　　　　　EXPORTING
　　　　　　　　wait = 'X'.

　　ENDIF .

ENDLOOP .