Link to Segment

Question

Dear Experts,
i`ve got a z-assignmentblock (configTable) with SEGMENT_DESCR entries. Now i want to create a Link to the OVELSegments View. I already made this with Partner to get to Partner Overview, which works fine! Therefore i defined the
getter - get_p_partnerid,
event handler - eh_ontopartner,
view outbound plug - op_partner and
window outbound plug - op_partner.
In event handler i got a method cl_crm_uiu_bt_partner => get_partner_navigation_advs to create my navigation collection.
Is there something like for segments? Do you have an Idea how to create this link.
Thanks and best regards,
Tobias Meisersick

Answer 1

Hi Masood,
thanks for your answer. Now i used your mentioned method. But it doesen`t take any effect. Here is my EH method:
METHOD eh_ontosegment.
  DATA:     lr_desc_object      TYPE REF TO if_bol_bo_property_access,
            lr_data_collection  TYPE REF TO if_bol_bo_col,
            lr_nav              TYPE REF TO if_crm_ui_navigation_service,
            lr_entity           TYPE REF TO cl_crm_bol_entity,
            lr_listent          TYPE REF TO if_bol_bo_property_access,
            lr_core             TYPE REF TO cl_crm_bol_core,
            lv_desc             TYPE string,
            lv_guid             TYPE crmt_targetgrp_guid,
            lv_index            TYPE i.
* Get the index of result list
  cl_thtmlb_util=>get_event_info(
    EXPORTING
      iv_event = htmlb_event_ex
    IMPORTING
      ev_index = lv_index ).
*     Get entity of result list
  lr_listent ?= me->typed_context->zphkolfull->get_bo_by_index( iv_index = lv_index iv_change_focus = abap_false ).
  CHECK lr_listent IS BOUND.
*     Get Targetgroup Description
  lv_desc = lr_listent->get_property_as_string( 'TARGETGROUPID' ).
*     Get GUID of Segment
  SELECT SINGLE guid FROM crmd_mkttg_tg_t INTO lv_guid WHERE tg_descr = lv_desc.
*     Get the BOL Core Instance
  lr_core ?= cl_crm_bol_core=>get_instance( ).
*     Get the Root entity
  lr_entity ?= lr_core->get_root_entity( iv_object_name = 'SEGTg' iv_object_guid = lv_guid  ).
  CHECK lr_entity IS BOUND.
*    Create UI based Entity
  CALL METHOD cl_crm_ui_descriptor_obj_srv=>create_entity_based
    EXPORTING
      ir_entity           = lr_entity
      iv_ui_object_type   = 'SEG_TARGETGROUP'
      iv_ui_object_action = 'B'            "display
    RECEIVING
      rr_result           = lr_desc_object.
*      Create a BOL collection to be passed to the inbound plug of
*      the Called component
  CREATE OBJECT lr_data_collection
    TYPE
      cl_crm_bol_bo_col.
*    Add the UI Descriptor the BOL Collection
  lr_data_collection->add( lr_desc_object ).
*    Get Instance of Navigation Service
  lr_nav = cl_crm_ui_navigation_service=>get_instance( ).
*    Navigate to Target Component
  IF lr_nav->is_dynamic_nav_supported( lr_desc_object ) = abap_true.
    lr_nav->navigate_dynamically( lr_data_collection ).
  ENDIF.
ENDMETHOD.
While debugging I saw that this code is runnint to end with no exception!
Is it right that i only have to code the get_p method of the attribute + my event handler!
Thanks,
Tobias Meisersick