How to make a tree with more information in one line

Question

Hi
I have seached this forum, and haven't find any information that I can use.
I need a tree structure with following informations:
arbpl
_____aufnr________material_____ text
_______extra informations
  |_____aufnr________material_____ text
  ....................................................... |_______extra informations
My problem is that I can't get more than one information each line.
Can anybody give me some input, and better good advice/examples hot to do.
My code looks like this:
*& Report  my report
REPORT  myreport.
type-pools : stree.
data : wa_node type snodetext.
data : node_table like wa_node occurs 0 with header line.
TABLES: caufv, caufvd, IOOPER, marc, mara, resb, jest, tj02t.
data: BEGIN OF gt_status_tab occurs 0,
      aufnr like caufv-aufnr,
      stat like jest-stat,
      txt04 like tj02t-txt04,
      end of gt_status_tab.
data: g_objnr like jest-objnr.
data: BEGIN OF gt_sele_tab OCCURS 0,
      werks like caufv-werks,
      fevor like marc-fevor,
      arbpl like IOOPER-arbpl,
      aufnr like caufv-aufnr,
      aufplA like caufv-aufpl,
      matnr like caufvd-matnr,
      gstrp like CAUFV-GSTRP,
      GLTRP LIKE CAUFV-GLTRP,
      rmatnr like resb-matnr,
      bdmng like resb-bdmng,
      GAMNG like caufv-GAMNG,
      aufpl like resb-aufpl,
      auart like caufv-auart,
      matkl like mara-matkl,
      istat like tj02t-istat,
     inact  like jest-inact,
END OF gt_sele_tab.
select-options:
s_werks for CAUFV-werks,
s_arbpl for iooper-arbpl,
s_fevor for marc-fevor,
s_aufnr for caufv-aufnr,
s_sttxt for CAUFVD-STTXT,
s_auart for caufv-auart,
s_matnr for caufvd-matnr,
s_matkl for mara-matkl,
s_rmatnr for resb-matnr,
s_gstrp for caufv-gstrp,
s_gltrp for caufv-gltrp.
start-of-SELECTION.
  SELECT  a~werks
          a~fevor
          a~aufnr
          a~PLNBEZ
          a~gstrp
          a~gltrp
          a~aufpl
          b~matnr
          b~bdmng
          a~gamng
          b~aufpl
          a~auart
          d~matkl
    into "CORRESPONDING FIELDS OF TABLE gt_sele_tab
    (gt_sele_tab-werks,
    gt_sele_tab-fevor,
    gt_sele_tab-aufnr,
     gt_sele_tab-matnr,
     gt_sele_tab-gstrp,
     gt_sele_tab-gltrp,
     gt_sele_tab-aufplA,
    gt_sele_tab-rmatnr,
    gt_sele_tab-bdmng,
    gt_sele_tab-GAMNG,
    gt_sele_tab-aufpl,
    gt_sele_tab-auart,
    gt_sele_tab-matkl)
     FROM  CAUFV as a
    join resb as b
    on b~rsnum = a~rsnum
    and b~rspos = b~rspos
    join afvc as C
    on c~aufpl = b~aufpl
    and c~aplzl = b~aplzl
    join mara as d
    on d~matnr = b~matnr
         WHERE  a~AUFNR  in s_aufnr
         AND    a~AUART  in s_auart
         AND    a~GLTRP  in s_gltrp
         AND    a~GSTRP  in s_gstrp
         AND    a~FEVOR  in s_fevor.
    append gt_sele_tab.
  ENDSELECT.
  loop at gt_sele_tab.
    clear g_objnr.
    concatenate 'OR' gt_sele_tab-aufnr into g_objnr.
*append
    select *  from jest
      where objnr = g_objnr
      and   inact ne 'X'.
      gt_status_tab-aufnr = gt_sele_tab-aufnr.
      gt_status_tab-stat = jest-stat.
      append gt_status_tab.
    ENDSELECT.
    SELECT single arbpl into gt_sele_tab-arbpl
             FROM  CRHD
           WHERE  OBJTY  = 'A'
           AND    OBJID  = gt_sele_tab-aufpl.
    gt_sele_tab-arbpl = '200'.
    MODIFY gt_sele_tab.
  endloop.
  perform fill_nodes.
  perform tree_display.
**& Form FILL_NODES
**text
**--> p1 text
**<-- p2 text
form fill_nodes .
  DATA: L_ARBPL type arbpl.
  node_table-type = 'T'.
  node_table-name = 'Arbejdsplads'.
  node_table-tlevel = '01'.
  node_table-nlength = '15'.
*  node_table-color = '4'.
  node_table-text = ''.
  node_table-tlength = '20'.
  node_table-tcolor = '3'.
  append node_table.
  clear node_table.
  loop at gt_sele_tab.
    at new arbpl.
      node_table-type = 'P'.
      node_table-name = gt_sele_tab-arbpl.
      node_table-tlevel = '02'.
      node_table-nlength = '20'.
*      node_table-color = '4'.
      node_table-text = ''.
      node_table-tlength = '30'.
      node_table-tcolor = '3'.
      append node_table.
      clear node_table.
      L_ARBPL = gt_sele_tab-arbpl.
*node_table-type = 'P'.
*node_table-name = 'ITEM DATA'.
*node_table-tlevel = '03'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = ''.
*node_table-tlength = '30'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
break g-lmn.
      loop at gt_sele_tab where arbpl = l_arbpl.
        node_table-type = 'P'.
        node_table-name = gt_sele_tab-aufnr.
        node_table-tlevel = '04'.
        node_table-nlength = '20'.
*        node_table-color = '4'.
node_table-parent = '04'.
        node_table-text = ''.
        node_table-tlength = '30'.
        node_table-tcolor = '3'.
        node_table-TPOS2 = '2'.
        node_table-text2 = 'halløj'.
        node_table-TPOS3 = '3'.
        node_table-text3 = 'igen'.
        append node_table.
        clear node_table.
*        break g-lmn.
        node_table-type = 'P'.
*        node_table-name = 'Materiale'.
*        node_table-tlevel = '04'.
node_table-parent = '04'.
        node_table-nlength = '20'.
*        node_table-color = '4'.
        node_table-text1 = gt_sele_tab-matnr.
        node_table-TPOS2 = '2'.
        node_table-text2 = 'halløj'.
        node_table-TPOS3 = '3'.
        node_table-text3 = 'igen'.
        node_table-tlength1 = '40'.
        node_table-tcolor1 = '3'.
        append node_table.
        clear node_table.
*        node_table-type = 'P'.
*        node_table-name = 'UNIT'.
*        node_table-tlevel = '05'.
*        node_table-nlength = '20'.
**        node_table-color = '4'.
*        node_table-text2 = 'test'.
*        node_table-tlength2 = '30'.
*        node_table-tcolor2 = '3'.
*        append node_table.
*        clear node_table.
*node_table-type = 'P'.
*node_table-name = 'QUANTITY'.
*node_table-tlevel = '05'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = i_vbap-kwmeng.
*node_table-tlength = '40'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*node_table-type = 'P'.
*node_table-name = 'DESCRIPTION'.
*node_table-tlevel = '05'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = i_vbap-arktx.
*node_table-tlength = '30'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*endloop.
      endloop.
    endat.
*loop at i_likp where vbelv = i_vbak-vbeln.
*node_table-type = 'P'.
*node_table-name = 'DELIVERY'.
*node_table-tlevel = '03'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = ''.
*node_table-tlength = '30'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*node_table-type = 'P'.
*node_table-name = i_likp-vbeln.
*node_table-tlevel = '04'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = ''.
*node_table-tlength = '30'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*endloop.
*loop at i_vbrk where vbelv = i_vbak-vbeln.
*node_table-type = 'P'.
*node_table-name = 'INVOICE'.
*node_table-tlevel = '03'.
*node_table-nlength = '15'.
*node_table-color = '4'.
*node_table-text = ''.
*node_table-tlength = '20'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*node_table-type = 'P'.
*node_table-name = i_vbrk-vbeln.
*node_table-tlevel = '04'.
*node_table-nlength = '20'.
*node_table-color = '4'.
*node_table-text = ''.
*node_table-tlength = '30'.
*node_table-tcolor = '3'.
*append node_table.
*clear node_table.
*endloop.
  endloop.
endform. " FILL_NODES
**& Form TREE_DISPLAY
**text
**--> p1 text
**<-- p2 text
form tree_display .
  call function 'RS_TREE_CONSTRUCT'
  exporting
  insert_id = '000000'
  relationship = ' '
*LOG =
  tables
  nodetab = node_table
  exceptions
  tree_failure = 1
  id_not_found = 2
  wrong_relationship = 3
  others = 4
*if sy-subrc = 0.
*message id sy-msgid type sy-msgty number sy-msgno
*with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
*endif.
  call function 'RS_TREE_LIST_DISPLAY'
  exporting
*CALLBACK_PROGRAM =
  callback_user_command = 'USER_COMMAND'
*CALLBACK_TEXT_DISPLAY =
*CALLBACK_MOREINFO_DISPLAY =
*CALLBACK_COLOR_DISPLAY =
*CALLBACK_TOP_OF_PAGE =
*CALLBACK_GUI_STATUS =
*CALLBACK_CONTEXT_MENU =
  status = 'IMPLICIT'
  check_duplicate_name = '1'
*color_of_node = '4'
*color_of_mark = '3'
*color_of_link = '1'
*color_of_match = '5'
  lower_case_sensitive = ' '
  modification_log = ' '
  node_length = 30
  text_length = 75
  text_length1 = 0
  text_length2 = 0
  return_marked_subtree = ' '
  screen_start_column = 0
  screen_start_line = 0
  screen_end_column = 0
  screen_end_line = 0
  suppress_node_output = ' '
  layout_mode = ' '
  use_control = 'F'
*IMPORTING
*F15 =
endform.                    "tree_display
" FINAL_DISPLAY

Answer 1

Hi,
Have you checked the examples in SALV_OBJECTS?
/wg