data:
lo_core type ref to cl_crm_bol_core,
lo_col type ref to if_bol_bo_col,
lo_comp_controller type ref to zl_zgvr_adm_bspwdcomponen_impl,
lo_acc_line type ref to cl_crm_bol_entity,
lo_iterator type ref to if_bol_bo_col_iterator,
lr_msg_service type ref to cl_bsp_wd_message_service,
lr_global_message type ref to cl_crm_genil_global_mess_cont.

lo_core = cl_crm_bol_core=>get_instance( ).
lo_col = me->typed_context->searchresultnode->collection_wrapper->if_bol_bo_col~get_copy( ).

lo_iterator = lo_col->get_iterator( ).
lo_entity ?= lo_iterator->get_first( ).
..............
"o_marked = me->typed_context->searchresultnode->collection_wrapper->get_marked( ).
lo_entity = lo_marked->get_first( ).
..............

while lo_entity is bound.
lo_comp_controller->get_customer_context( )->add_tx_context( lo_acc_line->get_transaction( ) ).
lo_acc_line ?= lo_iterator->get_next( ).

try.
partner = lo_entity->get_property( 'PARTNER' ).
catch cx_sy_ref_is_initial.
return.
endtry.
..........
" lo_entity = lo_marked->get_next( ).
endwhile.

lr_global_message->add_message( iv_msg_type = 'S' iv_msg_id = 'ZRIGHTS' iv_msg_number = '152' iv_show_only_once = abap_true ).