How to poputale a node within a node using WD Abap?

Question

Hi Experts.
I have a context structure resembling something similar to this:
node-FAMILY  (1..1)
  --attribute-MOTHER
  --attribute-FATHER
    --node-CHILDREN  (0..n) 
      --attribute-NAME
      --attribute-AGE
I use the following code to populate MOTHER and FATHER:
DATA lo_el_family TYPE REF TO if_wd_context_element.
  lo_el_family->set_attribute(name =  `MOTHER`value = ls_text-mother ).
  lo_el_family->set_attribute(name =  `FATHER` value = ls_text-father ).
I now need to add 3 children's names and ages to the node CHILDREN of cardinality (0..n)
I tried using something like this, but it doesn't work:
  LOOP AT lt_children INTO ls_children.
      ls_children-name = ls_data-name.
      ls_children-age = ls_data-age.
      Append ls_children TO lt_children.
  ENDLOOP.
      lo_nd_children->bind_table( new_items = lt_children set_initial_elements = abap_true ).
Any suggestions on how to create multiple entries for node CHILDREN for each node FAMILY?
Thanks in Advance
Anton Kruse
Edited by: Anton Kruse on Jun 15, 2009 11:46 AM

Answer 1

You need to ask for the element set of the parent and then loop through this element set and do a bind_table for each one to add its appropriate children:
****Loop Through all the Items
  data element_set type wdr_context_element_set.
  field-symbols <wa_set> like line of element_set.
  field-symbols <wa_item> type sdemo_so_item_all.
  data l_tabix type sytabix.
  element_set = lo_nd_sales_items->get_elements( ).
  loop at element_set assigning <wa_set>.
    l_tabix = sy-tabix.
    read table <wa_so>-t_item assigning <wa_item> index l_tabix.
*****Load WDCTX_SALES_ITEM_TEXT
    data lo_nd_sales_item_text type ref to if_wd_context_node.
    lo_nd_sales_item_text = <wa_set>->get_child_node( name = if_componentcontroller=>wdctx_sales_item_text ).
    lo_nd_sales_item_text->bind_table( new_items = <wa_item>-lt_sales_item_text set_initial_elements = abap_true ).
endloop.