Здравствуйте, есть задача: необходимо сформировать для журнала дерево просмотра таким образом, чтобы записи журнала фильтровались в зависимости от выбранного в дереве компонента, наподобие как это сделано в примере SBAL_DEMO_04_SELF. Все вроде бы работает, только с одной оговоркой: в 4-ом уровне дерева не отображается текст ветки, который должен загружаться из структуры BAL_S_SHOW и поля T_DETLEVEL, в уровнях выше все работает нормально, почему так, кто-нибудь знает в чем дело???
Code:
************* define structure of level 3 in tree
* id of connection (invisible)
CLEAR l_s_fcat.
CLEAR c_s_display_profile-lev3_fcat.
l_s_fcat-ref_table = 'BAL_S_SHOW'.
l_s_fcat-ref_field = 'PROBCLASS'.
* l_s_fcat-no_out = 'X'.
APPEND l_s_fcat TO c_s_display_profile-lev3_fcat.
* name of connection (to be derived externally from connection ID)
CLEAR l_s_fcat.
l_s_fcat-ref_table = 'BAL_S_SHOW'.
l_s_fcat-ref_field = 'T_PROBCLSS'.
* l_s_fcat-is_extern = 'X'.
l_s_fcat-col_pos = 1.
APPEND l_s_fcat TO c_s_display_profile-lev3_fcat.
* sort by name of connection
CLEAR l_s_sort.
CLEAR c_s_display_profile-lev3_sort.
l_s_sort-ref_table = 'BAL_S_SHOW'.
l_s_sort-ref_field = 'PROBCLASS'.
l_s_sort-up = 'X'.
APPEND l_s_sort TO c_s_display_profile-lev3_sort.
************* define structure of level 4 in tree
* id of connection (invisible)
CLEAR l_s_fcat.
CLEAR c_s_display_profile-lev4_fcat.
l_s_fcat-ref_table = 'BAL_S_SHOW'.
l_s_fcat-ref_field = 'DETLEVEL'.
* l_s_fcat-no_out = 'X'.
APPEND l_s_fcat TO c_s_display_profile-lev4_fcat.
* name of connection (to be derived externally from connection ID)
CLEAR l_s_fcat.
l_s_fcat-ref_table = 'BAL_S_SHOW'.
l_s_fcat-ref_field = 'T_DETLEVEL'.
* l_s_fcat-is_extern = 'X'.
l_s_fcat-col_pos = 1.
APPEND l_s_fcat TO c_s_display_profile-lev4_fcat.
* sort by name of connection
CLEAR l_s_sort.
CLEAR c_s_display_profile-lev4_sort.
l_s_sort-ref_table = 'BAL_S_SHOW'.
l_s_sort-ref_field = 'DETLEVEL'.
l_s_sort-up = 'X'.
APPEND l_s_sort TO c_s_display_profile-lev4_sort.