创建返工工单,添加组件,删除组件,CO02打开工单

最新推荐文章于 2025-09-12 15:30:52 发布

原创

最新推荐文章于 2025-09-12 15:30:52 发布 · 1.5k 阅读

11 ·

CC 4.0 BY-SA版权

文章标签：

#sap #abap

这篇博客介绍了如何在SAP ABAP环境中使用BAPI和特定函数来创建返工工单、添加和删除组件，并通过CO02事务码打开工单。主要涉及的BAPI包括BAPI_PRODORD_CREATE、CO_XT_COMPONENT_ADD和CO_XT_COMPONENTS_DELETE。

SE37创建FM,copy代码调试.

本代码实现的功能为: 创建返工工单,添加组件,删除组件,CO02打开工单

对应的BAPI分别是:

BAPI_PRODORD_CREATE
CO_XT_COMPONENT_ADD
CO_XT_COMPONENTS_DELETE
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     REFERENCE(CAUFVD) TYPE  CAUFVD
*"----------------------------------------------------------------------
  CHECK caufvd-auart = 'F001' AND sy-tcode = 'CO01'. "返工工单

  DATA: zflag TYPE c.
  IMPORT zflag FROM MEMORY ID 'ZFLAG'.

  CHECK zflag IS INITIAL .
  zflag = 'X' .
  EXPORT zflag TO MEMORY ID 'ZFLAG'.

  DATA: lv_answer .
  CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      titlebar              = '提示'
      text_question         = |返工工单,物料:{ caufvd-matnr ALPHA = OUT }将添加到工单组件中,并自动保存|
      text_button_1         = '添加'
      text_button_2         = '跳过'
      display_cancel_button = ''
    IMPORTING
      answer                = lv_answer
    EXCEPTIONS
      text_not_found        = 1
      OTHERS                = 2.

  CHECK lv_answer = 1 .

*  BREAK guoxiongjie .
  DATA:caufvd_tmp TYPE caufvd .
  caufvd_tmp = caufvd .
  "创建返工生产工单
  DATA:lw_orderdata TYPE bapi_pp_order_create,
       lw_return    TYPE bapiret2,
       lv_order     TYPE bapi_order_key-order_number.
  CLEAR: lw_orderdata,lw_return .
  lw_orderdata-material           = caufvd-matnr ."订单的物料编号
  lw_orderdata-plant              = caufvd-werks