method GET_P_PARTNER. CASE iv_property. WHEN if_bsp_wd_model_setter_getter=>fp_fieldtype. rv_value = cl_bsp_dlc_view_descriptor=>field_type_input. ENDCASE.
endmethod.
method GET_V_PARTNER.
create object rv_valuehelp_descriptor Type CL_BSP_WD_VALUEHELP_NAVDESCR
EXPORTING iv_outbound_plug = 'OP_SEARCHPARTNER'.
endmethod.
CREATE AN EVENT WITH NAME “PARTNERSELECTED”
Create an attribute in the controller class (IMPL CLASS).
GV_INDEX INSTANCE PRIVATE TYPE SY-TABIX
method EH_ONPARTNERSELECTED. data: lr_cn type ref to cl_bsp_wd_context_node, lr_target type ref to if_bol_bo_property_access, lr_col type ref to cl_bsp_wd_collection_wrapper, v_bp type string.
check gr_partner_popup->get_fired_outbound_plug( ) is not initial. lr_cn = gr_partner_popup->get_context_node('EMPLOYEE'). lr_target ?= lr_cn->collection_wrapper->get_current( ).
CALL METHOD lr_target->GET_PROPERTY_AS_STRING EXPORTING IV_ATTR_NAME = 'BP_NUMBER' RECEIVING RV_RESULT = v_bp.
lr_col = me->typed_context->zlead->collection_wrapper. CALL METHOD LR_COL->FIND EXPORTING IV_INDEX = gv_index
* IV_BO = RECEIVING RV_RESULT = lr_target.
TRY.
CALL METHOD LR_TARGET->SET_PROPERTY_AS_STRING EXPORTING IV_ATTR_NAME = 'Partner' IV_VALUE = v_bp . CATCH CX_SY_CONVERSION_ERROR .
ENDTRY.
endmethod.
*Read User Value from Source View DATA lr_ite TYPE REF TO if_bol_bo_col_iterator. DATA lr_bo TYPE REF TO if_bol_bo_property_access.
lr_ite = me->typed_context->BTADMINH->collection_wrapper->get_iterator( ). IF lr_ite IS BOUND. lr_bo = lr_ite->get_first( ). IF lr_bo IS BOUND. lr_bo->set_property_as_string(