How to add column to iHistResult View

Question

Hi,
I need to add a column to the iHistResult view. The column does not exist in BOL entity BTOrder attribute list. I am trying to add the Contact Person to the results list. ( Header Partner Function-Contact Person ). Any suggestions on how to proceed? We are using CRM 5 and I am new to CRM, so please provide as much step-by-step detail as your time permits.
Thanks,
John.

Answer 1

Hi Sreekanth,
I did try the code below in my GET_FULLNAME method. The code I used is below. I tried switching out the "DESCRIPTION_NAME" to the attribute name that I created "FULLNAME" but I still get the message 'BTOrder not Bound' in the FULLNAME column of the iHistResult view. The message appears for all rows in the view. Thanks for all your help and any more suggestions are greatly appreciated.
The code for my GET_FULLNAME method is below:
method GET_FULLNAME.
DATA: current TYPE REF TO if_bol_bo_property_access.
  DATA: dref TYPE REF TO data.
  value = 'BTOrder not bound'.                              "#EC NOTEXT
  if iterator is bound.
    current = iterator->get_current( ).
  else.
    current = collection_wrapper->get_current( ).
  endif.
  TRY.
      DATA: coll TYPE REF TO if_bol_entity_col.
      DATA: entity TYPE REF TO cl_crm_bol_entity.
      entity ?= current.
      coll = entity->get_related_entities( iv_relation_name = 'BTOrderHeader' ). "#EC NOTEXT
      current = coll->get_current( ).
      IF current IS NOT BOUND.
        RETURN.
      ENDIF.
      entity ?= current.
      coll = entity->get_related_entities( iv_relation_name = 'BTHeaderPartnerSet' ). "#EC NOTEXT
      current = coll->get_current( ).
      IF current IS NOT BOUND.
        RETURN.
      ENDIF.
      entity ?= current.
      coll = entity->get_related_entities( iv_relation_name = 'BTPartner_00000015' ). "#EC NOTEXT
      current = coll->get_current( ).
      IF current IS NOT BOUND.
        RETURN.
      ENDIF.
      TRY.
*dref = current->get_property( 'DESCRIPTION_NAME' ). "#EC NOTEXT
          dref = current->get_property( 'FULLNAME' ).       "#EC NOTEXT
        CATCH cx_crm_cic_parameter_error.
      ENDTRY.
      CATCH cx_sy_ref_is_initial cx_sy_move_cast_error cx_crm_genil_model_error.
      RETURN.
  ENDTRY.
  IF dref IS NOT BOUND.
    value = 'BTOrder/BTOrderHeader/BTHeaderPartnerSet/BTP... not bound'. "#EC NOTEXT
    RETURN.
  ENDIF.
  TRY.
      value = if_bsp_model_util~convert_to_string( data_ref = dref
                                                   attribute_path = attribute_path ).
    CATCH cx_bsp_conv_illegal_ref.
    FIELD-SYMBOLS: <l_data> type DATA.
    assign dref->* to <l_data>.
please implement here some BO specific handler coding
conversion of currency/quantity field failed caused by missing
unit relation
Coding sample:
provide currency, decimals, and reference type
value = cl_bsp_utility=>make_string(
value =
reference_value = c_currency
num_decimals = decimals
reference_type = reference_type * ).
      CONCATENATE <l_data> '-CURR/QUANT CONV FAILED-' INTO value SEPARATED BY space. "#EC NOTEXT
      CATCH cx_root.
      value = '-CONVERSION FAILED-'.                        "#EC NOTEXT
  ENDTRY.
endmethod.
Thanks,
John.