How can I assign a hard coded value to a variable of type OBJECT.

Question

Hi,
   I have to call the following method
                                  lc_action_execute->get_ref_object(
                                                        exporting
                                                              io_appl_object = io_appl_object
                                                        importing
                                                               ev_guid_ref    = lv_guid_ref.
Now I have to hard code the io_appl_object variable (of type OBJECT) to test my application for the time being. How can I assign a value to the variable? Is there any way to do that?

Answer 1

I wouldn't use WDR_CONTEXT_ATTR_VALUE_LISTGEN.  Use wdr_context_attr_value_list instead:
data l_topics type zpm_main_topic_tbl.
  l_topics = wd_assist->read_all_topics( ).
  data lt_valueset type wdr_context_attr_value_list.
  field-symbols <wa_topic> like line of l_topics.
  field-symbols <wa_vs>  like line of lt_valueset.
  loop at l_topics assigning <wa_topic>.
    append initial line to lt_valueset assigning <wa_vs>.
    <wa_vs>-value = <wa_topic>-main_topic.
    <wa_vs>-text  = <wa_topic>-main_topic_desc.
  endloop.
  data lo_nd_meeting type ref to if_wd_context_node.
* navigate from <CONTEXT> to <MEETING> via lead selection
  lo_nd_meeting = wd_context->get_child_node( name = wd_this->wdctx_meeting ).
  data lo_node_info type ref to if_wd_context_node_info.
  lo_node_info = lo_nd_meeting->get_node_info( ).
  lo_node_info->set_attribute_value_set(
     name = 'MAIN_TOPIC'
     value_set = lt_valueset ).