1. For eg : In business role sales pro à sales cycle à campaign à under new field tabà ( if user checked flag check box make’ name’ field is editable and if user unchecked flag check box means ‘custom name’ field is no editable)

STEPS:-

• ü Go to standard component ‘CPGOE_DETAILS’ and select the specific view where you want to do operation ‘CPGOE_DETAILS/OVEFDetails’.
• ü Add attribute flag 4 type as char 1 in the content node campaign implementation class level.
• ü Create get_p method for zz_flag3 attribute in campaign context node level.
• ü Copy and paste ‘IF_BSP_WD_MODEL_SETTER_GETTER~_GET_P_XYZ’ and rename it as get_p_zz_flag3 in the content node campaign implementation class level.
• ü Inside get_p_zz_flag3 method write below code for check box pick list and trigger corresponding event handler ‘ onmyevent’.

Code:-

method GET_P_ZZ_FLAG3.
CASE iv_property.
WHEN if_bsp_wd_model_setter_getter=>fp_fieldtype.
rv_value = cl_bsp_dlc_view_descriptor=>field_type_checkbox.
WHEN if_bsp_wd_model_setter_getter=>fp_onclick.
rv_value = ‘MYEVENT’.                                 “#EC NOTEXT
*    WHEN if_bsp_wd_model_setter_getter=>fp_tooltip.
*      rv_value = text-001.
endcase.
endmethod.

• When user click zz_flag3 attribute ‘onmyevent’ handler will trigger here we are passing flag4 = x if user check that zz_flag3 is checked or else flag4 = space.

METHOD eh_onmyevent.
* Added by wizard: Handler for event ‘MYEVENT’
DATA  : lr_entity TYPE REF TO cl_crm_bol_entity,
lr_msg TYPE REF TO cl_bsp_wd_message_service,
wa TYPE crms_mktpl_ib_cpg.

lr_entity ?= me->ztyped_context->campaign->collection_wrapper->get_current( ).

CALL METHOD lr_entity->if_bol_bo_property_access~get_properties
IMPORTING
es_attributes = wa.

IF wa-zz_flag3 IS INITIAL.
me->ztyped_context->zcampaign->flag4 = ‘X’.
ELSE.
me->ztyped_context->zcampaign->flag4 = ”.
ENDIF.

ENDMETHOD.

• ü Inside context implementation class level , inside ‘create campaign’ method we assign model to zcampaign.

• ü Create get_i method for zz_name attribute in campaign context node level.
• ü Copy and paste ‘IF_BSP_WD_MODEL_SETTER_GETTER~_GET_i_XYZ’ and rename it as get_i_zz_name in the content node campaign implementation class level.
• ü Inside get_p_zz_name method write below code for make the name field as editable if flag is checked.

Code:-

METHOD get_i_zz_name.
DATA: current TYPE REF TO if_bol_bo_property_access.
rv_disabled = ‘TRUE’.
if iterator is bound.
current = iterator->get_current( ).
else.
current = collection_wrapper->get_current( ).
endif.
IF flag4 IS NOT INITIAL.

TRY.

IF current->is_property_readonly(
‘ACTUALSTART’ ) = abap_false. “#EC NOTEXT
rv_disabled = ‘TRUE’.
ENDIF.

CATCH cx_sy_ref_is_initial cx_sy_move_cast_error
cx_crm_genil_model_error.
RETURN.
ENDTRY.
else.
TRY.

IF current->is_property_readonly(
‘ACTUALSTART’ ) = abap_false. “#EC NOTEXT
rv_disabled = ‘FALSE’.
ENDIF.

CATCH cx_sy_ref_is_initial cx_sy_move_cast_error
cx_crm_genil_model_error.
RETURN.
ENDTRY.

endif.

ENDMETHOD.

• ü Create get_i method for zz_custname attribute in campaign context node level.
• ü Copy and paste ‘IF_BSP_WD_MODEL_SETTER_GETTER~_GET_i_XYZ’ and rename it as get_i_zz_custname in the content node campaign implementation class level.
• ü Inside get_p_zz_custname method write below code for make the name field as non editable if flag is  un checked.

Code:-

method GET_I_ZZ_CUSTNAME.
DATA: current TYPE REF TO if_bol_bo_property_access.
rv_disabled = ‘TRUE’.
if iterator is bound.
current = iterator->get_current( ).
else.
current = collection_wrapper->get_current( ).
endif.
IF flag4 IS INITIAL.

TRY.

IF current->is_property_readonly(
‘ACTUALSTART’ ) = abap_false. “#EC NOTEXT
rv_disabled = ‘FALSE’.
ENDIF.

CATCH cx_sy_ref_is_initial cx_sy_move_cast_error
cx_crm_genil_model_error.
RETURN.
ENDTRY.
else.
TRY.

IF current->is_property_readonly(
‘ACTUALSTART’ ) = abap_false. “#EC NOTEXT
rv_disabled = ‘TRUE’.
ENDIF.

CATCH cx_sy_ref_is_initial cx_sy_move_cast_error
cx_crm_genil_model_error.
RETURN.
ENDTRY.

endif.
endmethod.

Check the o/p in web ui:-