Hi Ram,
I achieved as follows:
DATA: lr_objcon TYPE REF TO cl_crm_bol_entity.
lr_objcon ?= me->typed_context->BTPARTNERSET->collection_wrapper->get_current( ).
IF lr_objcon is bound.
TRY.
CALL METHOD lr_objcon->GET_RELATED_ENTITY
EXPORTING
IV_RELATION_NAME = 'BTPartner_PFT_0001_MAIN'
RECEIVING
RV_RESULT = lr_objcon.
CATCH CX_CRM_GENIL_MODEL_ERROR .
ENDTRY.
ENDIF.
********************************
Best Regards,
JMP.