Created by Jerry Wang, last modified on Apr 22, 2014

issue: 执行wiki 末尾的report,

该report 会生成一个新的IBASE，包含一个IBASE component，该component上维护了一个individual object, ID为JERRYOBJECT1. 该report会根据输入的Object Family和Object Category，首先创建出Object，再创建Object component，最后删除object component，并保存整个transaction。

report执行完毕后，通过transaction code SMW01能观察到IBASE和Individual object对应的BDOC。

问题是在product system上执行report后SMW01里没有生成对应的entry。

分析:

在CL_SMW_MFLOW~PROCESS_OUTBOUND上设断点，

发现原因在于IBASE和I Object对应的BDOC 被维护成了"not send":

该setting在此处维护:

*&---------------------------------------------------------------------*
*& Report ZIBASE_CREATE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT zibase_create_delete.

PARAMETERS: txt TYPE char40 OBLIGATORY DEFAULT 'description test',
            eid TYPE char30 OBLIGATORY DEFAULT 'PROGRAM',
            oid TYPE comm_product-product_id OBLIGATORY DEFAULT 'CHILDOBJ8',
            fam TYPE comm_product-object_family OBLIGATORY DEFAULT '0401',
            cat TYPE COMT_CATEGORY_ID OBLIGATORY DEFAULT 'OBJ_0401'.

DATA: lt_param  TYPE crmt_name_value_pair_tab,
      ls_param  TYPE crmt_name_value_pair,
      lr_core   TYPE REF TO cl_crm_bol_core,
      ls_object TYPE comm_product,
      lr_root   TYPE REF TO if_bol_entity_col,
      entity    TYPE REF TO cl_crm_bol_entity.

CHECK zcl_object_generator=>create_object( iv_id = oid iv_family = fam iv_catid = cat ) = abap_true.

ls_param-name = cl_crm_ibase_il_constant=>createparam.
ls_param-value = '01'.
APPEND ls_param TO lt_param.

lr_core = cl_crm_bol_core=>get_instance( ).
lr_core->load_component_set('IBASE_ONLY').

CALL METHOD lr_core->root_create
  EXPORTING
    iv_object_name  = cl_crm_ibase_il_constant=>root_object
    iv_create_param = lt_param
    iv_number       = 1
  RECEIVING
    rv_result       = lr_root.

CHECK lr_root IS BOUND.
entity ?= lr_root->get_current( ).

CHECK entity IS BOUND.
IF entity->lock( ) = abap_true.
entity->switch_to_change_mode( ).
ENDIF.

entity->set_property_as_string( iv_attr_name = 'DESCR' iv_value = CONV #( txt ) ).
entity->set_property_as_string( iv_attr_name = 'EXTID' iv_value = CONV #( eid ) ).
"entity->set_property_as_string( iv_attr_name = 'IBTYP' iv_value = '01' ).
lr_core->modify( ).
DATA(lv_ibase_id) = entity->get_property_as_string( 'IBASE' ).

DATA(component) = entity->create_related_entity( 'FirstLevelComponent' ).

CHECK component IS NOT INITIAL.

DATA(obj_comp) = component->create_related_entity( 'IBCompObj').

CHECK obj_comp IS NOT INITIAL.

obj_comp->set_property_as_string( iv_attr_name = 'OBJECT_ID' iv_value = CONV #( oid ) ).

SELECT SINGLE * INTO ls_object FROM comm_product WHERE product_id = oid.
ASSERT sy-subrc = 0.

obj_comp->set_property_as_string( iv_attr_name = 'OBJECT_GUID' iv_value = CONV #( ls_object-product_guid ) ).
obj_comp->set_property_as_string( iv_attr_name = 'OBJECT_FAMILY' iv_value = CONV #( ls_object-product_guid ) ).
lr_core->modify( ).

DATA(lo_message_container) = entity->get_message_container( ).
CALL METHOD lo_message_container->get_messages
  EXPORTING
    iv_message_type = if_genil_message_container=>mt_all
  IMPORTING
    et_messages     = DATA(lt_msg1).
LOOP AT lt_msg1 ASSIGNING FIELD-SYMBOL(<msg1>).
  WRITE:/ <msg1>-message COLOR COL_NEGATIVE.
ENDLOOP.

CHECK lt_msg1 IS INITIAL.

DATA: ls_header      TYPE ibap_head1,
      lt_struc_tab   TYPE ibap_struc1_tab,
      ls_comp TYPE IBAP_DAT1.
"delete component"

ls_header-ibase = lv_ibase_id.
CALL FUNCTION 'CRM_IBASE_GET_DETAIL'
  EXPORTING
    i_ibase_head      = ls_header
  IMPORTING
    e_struc_ibase_tab = lt_struc_tab
  EXCEPTIONS
    not_specified     = 1
    doesnt_exist      = 2
    no_authority      = 3.

CHECK sy-subrc = 0.

READ TABLE lt_struc_tab ASSIGNING FIELD-SYMBOL(<line>) INDEX 1.
ls_comp-instance = <line>-instance.

CALL FUNCTION 'CRM_IBASE_COMP_DELETE'
  EXPORTING
     i_comp = ls_comp
  EXCEPTIONS
      DATA_NOT_CONSISTENT = 1
      IBASE_LOCKED = 2
      NOT_SUCCESFUL = 3
      NO_AUTHORITY = 4.

CASE sy-subrc.
   WHEN 1.
      WRITE: / 'data not consistent' COLOR COL_NEGATIVE.
   WHEN 2.
      WRITE: / 'cannot delete locked component' COLOR COL_NEGATIVE.
   WHEN 3.
      WRITE: / 'deletion not successful' COLOR COL_NEGATIVE.
   WHEN 4.
      WRITE: / 'no deletion authorization' COLOR COL_NEGATIVE.
ENDCASE.

CHECK sy-subrc = 0.

BREAK-POINT.

DATA(lo_transaction) = lr_core->get_transaction( ).
DATA(lv_changed) = lo_transaction->check_save_needed( ).

CHECK lv_changed EQ abap_true.

DATA(lv_success) = lo_transaction->save( ).

DATA(lo_glb_msg_cont) = lr_core->get_global_message_cont( ).
CALL METHOD lo_glb_msg_cont->if_genil_message_container~get_messages
  EXPORTING
    iv_message_type = if_genil_message_container=>mt_all
  IMPORTING
    et_messages     = DATA(lt_msg).
LOOP AT lt_msg ASSIGNING FIELD-SYMBOL(<msg>).
  WRITE:/ <msg>-message.
ENDLOOP.

IF lv_success = abap_true.
  lo_transaction->commit( ).
  WRITE:/ 'IBASE Created Successfully: ', lv_ibase_id COLOR COL_NEGATIVE.
ELSE.
  lo_transaction->rollback( ).
ENDIF.

no BDOC found in SMW01相关推荐

利用SMW01分析BDOC错误
Created by Jerry Wang, last modified on Apr 17, 2014 例子: 如何分析下图BDOC error 点击"Show BDoc Msg Erro ...
why Material request downlaod get an empty BDOC in SMW01 - structure MGV_TLMNR
Created by Jerry Wang, last modified on Jan 06, 2015 Download request定义如下: 在ERP端debug,发现request里定义的m ...
why Material request download get an empty BDOC in SMW01 - inconsistent filter setting in R3AC1
Created by Jerry Wang, last modified on Jan 05, 2015 Debug ERP端抽取数据的代码: 但是在CRM inbound端,检查bapistruct ...
Equipment download - No data contained in BDoc
Created by Jerry Wang on Aug 09, 2014 在SMW01里查看BDOC发现没有任何equipment成功download下来: 尽管download request在R ...
由于Item category group customizing 缺失导致的BDOC error
Created by Jerry Wang, last modified on May 07, 2014 在tcode SMW01里观察到存在处于Error状态的BDOC: 查看发现错误是由于item ...
IBASE change related BDOC generation
Created by Jerry Wang, last modified on Jan 03, 2015 在UI上修改IBASE 信息save后: 后台SMW01里能观察到对应生成的BDOC: 通过如 ...
查找包含指定关键字的BDOC
Created by Jerry Wang, last modified on Apr 27, 2015 假设需要查找指定时间段内,包含指定关键字的BDOC列表. 执行report,指定时间间隔和关键 ...
BDOC generated after customer product id is changed in CRM - CUST_MAT_INF
Created by Wang, Jerry, last modified on Sep 18, 2016 要获取更多Jerry的原创文章,请关注公众号"汪子熙":
解决BDOC structure里header和data structure里数据格式不一致的问题
在BAdI definition PRODUCT_R3_ADAPTER的BAdI implementation里需要操作structure comt_prod_material_bdoc. 可以发现几 ...

no BDOC found in SMW01

Created by Jerry Wang, last modified on Apr 22, 2014

no BDOC found in SMW01相关推荐

最新文章

热门文章