Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

ALV Tree Problem

Former Member
0 Likes
400

Hello all,

I'm new to alv tree components and i meet some problems (hope someone will be able to help me).

&----


*& Form init_tree

&----


  • text

----


FORM init_tree.

DATA : gt_fieldcatalog type lvc_t_fcat.

DATA : wt_test TYPE TABLE OF zbudget_edit.

CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'

EXPORTING

i_structure_name = 'ZBUDGET_EDIT'

CHANGING

ct_fieldcat = gt_fieldcatalog.

sort gt_fieldcatalog by scrtext_l.

  • change fieldcatalog

DATA : ls_fieldcatalog type lvc_s_fcat.

loop at gt_fieldcatalog into ls_fieldcatalog.

case ls_fieldcatalog-fieldname.

when 'KOSTLG' or 'KOSTL'.

ls_fieldcatalog-no_out = 'X'.

ls_fieldcatalog-key = ''.

endcase.

modify gt_fieldcatalog from ls_fieldcatalog.

endloop.

wt_test[] = wt_edit[]. "data tables

data ls_sort_wa type lvc_s_sort.

  • create sort-table

ls_sort_wa-spos = 1.

ls_sort_wa-fieldname = 'KOSTLG'.

ls_sort_wa-up = 'X'.

ls_sort_wa-subtot = 'X'.

append ls_sort_wa to gt_sort.

  • ls_sort_wa-spos = 2.

  • ls_sort_wa-fieldname = 'KOSTL'.

  • ls_sort_wa-up = 'X'.

  • ls_sort_wa-subtot = 'X'.

  • append ls_sort_wa to gt_sort.

  • create container for alv-tree

data: l_tree_container_name(30) type c,

l_custom_container type ref to cl_gui_custom_container.

l_tree_container_name = 'TREE1'.

create object l_custom_container

exporting

container_name = l_tree_container_name

exceptions

cntl_error = 1

cntl_system_error = 2

create_error = 3

lifetime_error = 4

lifetime_dynpro_dynpro_link = 5.

  • create tree control

create object tree1

exporting

i_parent = l_custom_container

i_node_selection_mode =

cl_gui_column_tree=>node_sel_mode_multiple

i_item_selection = 'X'

i_no_html_header = ''

i_no_toolbar = ''

exceptions

cntl_error = 1

cntl_system_error = 2

create_error = 3

lifetime_error = 4

illegal_node_selection_mode = 5

failed = 6

illegal_column_name = 7.

  • create info-table for html-header

data: lt_list_commentary type slis_t_listheader,

l_logo type sdydo_value.

perform build_comment using

lt_list_commentary

l_logo.

  • repid for saving variants

data: ls_variant type disvariant.

ls_variant-report = sy-repid.

  • register events

perform register_events.

  • create hierarchy

call method tree1->set_table_for_first_display

exporting

it_list_commentary = lt_list_commentary

i_logo = l_logo

i_background_id = 'ALV_BACKGROUND'

i_save = 'A'

is_variant = ls_variant

changing

it_sort = gt_sort

it_outtab = wt_test

it_fieldcatalog = gt_fieldcatalog.

  • expand first level

call method tree1->expand_Tree

exporting

i_level = 1.

  • optimize column-width

call method tree1->column_optimize

exporting

i_start_column = tree1->c_hierarchy_column_name

i_end_column = tree1->c_hierarchy_column_name.

ENDFORM. "plus

Well, my problem is that program returns me an error (GETWA_NOT_ASSIGNED) when i add :

  • ls_sort_wa-spos = 2.

  • ls_sort_wa-fieldname = 'KOSTL'.

  • ls_sort_wa-up = 'X'.

  • ls_sort_wa-subtot = 'X'.

  • append ls_sort_wa to gt_sort.

In fact i'd like such an alv :

kostlg/kostl |--


Data--


|

kostlg1

kostl1

kostl2

kostlg2

etc etc...

I've been through many examples but didn't find why an error occurs.

Please help me guys,

Thank you.

2 REPLIES 2
Read only

former_member194669
Active Contributor
0 Likes
371

Hi,

Make sure that KOSTL field is available in WT_TEST also.

aRs

Read only

0 Likes
371

Hello aRs,

Yes i'm sure KOSTL is available in WT_TEST.

The problem is that when i another element in GT_SORT, this error appears...

Thanks anyway