How to access entities from badi using CL_CRM_BOL_CORE

Question

Hi experts
I'm implementing a  badi which will get called from sapgui and web ui  where I have to use the infromation from web ui . From badi we can use cl_crm_bol_core to access message container but in the same way how can I use get related entities etc.
  Those methods are avialable in the class  cl_crm_bol_core but I dont know how to get the reference to some mandatory importing parameters.
kindly let me know how can I get the values in badi. below is my code. for   lv_parent ?= lr_core->get_entity( ). I have to pass some mandatory import parametes, I'm not having any idea how to get the reference to those import parameters.
lr_core = cl_crm_bol_core=>get_instance( ).
        IF lr_core IS BOUND.
          DATA : lv_entity_coll TYPE REF TO if_bol_entity_col,
                 lv_parent TYPE REF TO cl_crm_bol_entity.
          lv_parent ?= lr_core->get_entity( ).
          lv_entity_coll ?= lr_core->get_related_entities( iv_entity = lv_parent ).
Thanks & Regards
Madhu

Answer 1

Hi,
you can use each BOL query object in your ABAP coding.
The BOL queries are listet in transaction GENIL_MODEL_BROWSER.
Here a short example where i read the address_guid for a businesspartner:
METHOD GET_BUPA_ADDRESS_NO.
  DATA: core TYPE REF TO cl_crm_bol_core.
  core = cl_crm_bol_core=>get_instance( ).
  core->start_up( 'ALL' ).
  DATA:   ent TYPE REF TO cl_crm_bol_entity,
          ent_addr TYPE REF TO cl_crm_bol_entity,
          query   TYPE REF TO cl_crm_bol_query_service,
          result  TYPE REF TO if_bol_bo_col.
* Geschäftspartner Kopf holen:
  query = cl_crm_bol_query_service=>get_instance( 'BuilHeaderSearch' ).
  query->set_property( iv_attr_name = 'PARTNER'
                       iv_value = im_partner_no ).
  result ?= query->get_query_result( ).
  ent ?= result->get_first( ).
  IF ent IS BOUND.
    ent_addr = ent->get_related_entity( iv_relation_name ='BuilAddressRel' ).
    IF ent_addr IS BOUND.
      CALL METHOD ent_addr->get_property_as_value
        EXPORTING
          iv_attr_name = 'ADDRESS_NUMBER'
        IMPORTING
          ev_result    = ev_bp_addrno.
    ENDIF.
  ENDIF.
ENDMETHOD.
I hope this example helps to understand. Feel free to ask if there are questions.
Kind regards
Manfred