取消ECN更改的方法

最新推荐文章于 2023-04-27 11:29:13 发布

山旮旯hjz

最新推荐文章于 2023-04-27 11:29:13 发布

阅读量2.2k

点赞数

分类专栏： SAP ABAP 文章标签： object parameters table null

本文链接：https://blog.csdn.net/hjz419116185/article/details/7553159

版权

SAP ABAP 专栏收录该内容

41 篇文章 1 订阅

订阅专栏

1、使用标准事务ccundo可以取消ECN的更改

参照标准事务写了个简单的程序

PARAMETERS:P_AENNR TYPE AENNR OBLIGATORY MATCHCODE OBJECT AEN1.
DATA: BADI_ECM_UNDO      TYPE REF TO IF_EX_ECM_UNDO,
      LS_OBJECT TYPE CC01_UNDO_OBJECT,
      LT_MESSAGES   TYPE SEDEP_ERROR_TABLE,
      GS_AENR            TYPE AENR,
      lt_undo TYPE cc01_undo_object_tab.

SELECT SINGLE * FROM AENR INTO GS_AENR WHERE AENNR EQ P_AENNR.

CALL METHOD cl_exithandler=>get_instance
    EXPORTING
      exit_name              = 'ECM_UNDO'
      null_instance_accepted = space
    CHANGING
      instance               = badi_ecm_undo.

CALL METHOD BADI_ECM_UNDO->SELECT_OBJECTS
  EXPORTING
    I_AENNR    = P_AENNR
  CHANGING
    CT_OBJECTS = LT_UNDO.

LOOP AT LT_UNDO INTO LS_OBJECT.
***  ls_object-aenob = BOM/plant/Alternative BOM
    CALL METHOD BADI_ECM_UNDO->UNDO_OBJECT
            EXPORTING
              I_AENR      = GS_AENR
            CHANGING
              C_OBJECT    = LS_OBJECT
              CT_MESSAGES = LT_MESSAGES.
ENDLOOP.