Dropdown Button implematataion

Question

Hey folks,
              I have been implementing Drop functionality in application. I bound node with "SHSVALSTR2" . While running below mentioned code i get  error "ls_text_design"  is not internal table so <b>Component "Key</b>" does not exists.How to solve this one.
method SUPPLY_TEXT_PROVIDE .
data declaration
  data  ls_text_design  type IF_V_DEFAULT=>Element_Text_Designs .
  data lt_text_design   type IF_V_DEFAULT=>Element_Text_Designs .
@TODO compute values
<b>ls_text_design-key</b> = cl_wd_text_view=>e_design-emphasized.
ls_text_design-value ='Emphasied'.
append ls_text_design to lt_text_design.
ls_text_design-key = cl_wd_text_view=>e_design-header1.
ls_text_design-value ='Header'.
append ls_text_design to lt_text_design.
bind all the elements
  Node->Bind_Table( New_Items =  lt_text_design ).
endmethod.

Answer 1

Hi Nirad,
if you are trying to build a key value list for your dropdown node then use the table type WDY_KEY_VALUE_LIST and structure WDY_KEY_VALUE to do so. This is applicable if you are implementing a DROP DOWN BY KEY ui-element. You need to get a reference to the node and then its node_info and finally call the method set_attribute_value_set of the interface if_context_node_info.
eg code:
method VS_TEXT_PROVIDE .
data declaration
data ls_text_design type WDY_KEY_VALUE .
data lt_text_design typeWDY_KEY_VALUE_LIST .
@TODO compute values
ls_text_design-SHSVALSTR2 = cl_wd_text_view=>e_design-emphasized.
append ls_text_design to lt_text_design.
ls_text_design-SHSVALSTR2 = cl_wd_text_view=>e_design-header1.
append ls_text_design to lt_text_design.
data: node type ref to if_wd_context_node,
        node_info type ref to if_wd_context_node_info.
node = wd_context->get_child_node ( '' ).
node_info = node->get_node_info( ).
Node_info->set_attribute_value_set( NAME = 'SHSVALSTR2'  VALUE_SET = lt_text_design ).
endmethod.
If you are using DROP DOWN BY INDEX ui element then what you have done below is correct however with some changes as follows:
method VS_TEXT_PROVIDE .
data declaration
data ls_text_design type IF_V_DEFAULT=>Element_Text_Designs .
data lt_text_design type table of IF_V_DEFAULT=>Element_Text_Designs .
@TODO compute values
ls_text_design-SHSVALSTR2 = cl_wd_text_view=>e_design-emphasized.
append ls_text_design to lt_text_design.
ls_text_design-SHSVALSTR2 = cl_wd_text_view=>e_design-header1.
append ls_text_design to lt_text_design.
data: node type ref to if_wd_context_node,
node = wd_context->get_child_node ( '' ).
bind all the elements
Node->Bind_Table( New_Items = lt_text_design ).
endmethod.
call these methods within wddonint of your view.
Regards,
Shweta