on 01-25-2011 6:24 PM
Hello collegues,
I have a fact sheet Z, in the BSP_DLC_fs component.
This Block has the service request of the BP.
My customer need that exists a hyperlink to service request detail.
I`ve implemented the GET_P_XX.. Method, and I`ve implemented an event relationed.
In the code of the event, I indentified the guid of the service request, but I don´t have certeid about the component that need call (BTQRSrvReq, BTAdminH,SRQM_INCIDENT_H,BT311_CSR I´m confused with this elements)
Also, I don´t know how call the view.
Thanks a lot,
Roberto
Hi,
we have realized exactly the same.
Here the coding from our eventhandler:
DATA: lv_index TYPE int4,
lr_entity TYPE REF TO cl_crm_bol_entity,
lv_event TYPE REF TO cl_htmlb_event_tableview,
lr_msg_srv TYPE REF TO cl_bsp_wd_message_service.
data: lr_data_collection TYPE REF TO if_bol_bo_col.
DATA lr_nav_srv TYPE REF TO if_crm_ui_navigation_service.
DATA: lr_property TYPE REF TO if_bol_bo_property_access,
lv_id TYPE CRMT_OBJECT_ID.
* get index of result list selected
CALL METHOD cl_thtmlb_util=>get_event_info
EXPORTING
iv_event = htmlb_event_ex
IMPORTING
ev_index = lv_index.
* set entity as current one
lr_entity ?= me->typed_context->btqrsrvreq->collection_wrapper->find( iv_index = lv_index ).
lv_id = lr_entity->get_property_as_string( iv_attr_name = 'OBJECT_ID' ).
DATA: query TYPE REF TO cl_crm_bol_query_service,
result TYPE REF TO if_bol_bo_col.
* get Query service
query = cl_crm_bol_query_service=>get_instance( 'BTQuery1O' ).
query->set_property( iv_attr_name = 'OBJECT_ID'
iv_value = lv_id ).
* execute query
result ?= query->get_query_result( ).
lr_entity ?= result->get_first( ).
CHECK lr_entity IS BOUND.
CALL METHOD cl_crm_ui_descriptor_obj_srv=>create_entity_based
EXPORTING
ir_entity = lr_entity
iv_ui_object_type = 'CRM_SRQM_INCIDENT'
iv_ui_object_action = 'B'
RECEIVING
rr_result = lr_property.
CREATE OBJECT lr_data_collection TYPE cl_crm_bol_bo_col.
lr_data_collection->add( lr_property ).
lr_data_collection->add( lr_entity ).
lr_nav_srv = cl_crm_ui_navigation_service=>get_instance( me ).
IF lr_nav_srv IS BOUND.
lr_nav_srv->navigate_dynamically( lr_data_collection ).
ENDIF.
Good Luck.
Kind regards
Manfred
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
3 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.