1
*&--------------------------------------------------------------------*
2
*& Form BUILD_MAINKEY_TAB_0 *
3
4
* build mainkey tab for display modification - part one *
5
6
FORM BUILD_MAINKEY_TAB_0.
7
CLEAR: VIM_MAINKEY, VIM_MERGED_ENTRIES, VIM_COLLAPSED_MAINKEYS,
8
<TABLE1>, VIM_MERGE_BEGIN, VIM_MERGE_END.
9
TRANSLATE VIM_NO_MAINKEY_EXISTS USING VIM_NO_MKEY_NOT_PROCSD_PATT.
10
REFRESH: VIM_COLLAPSED_MAINKEYS,
11
VIM_MERGED_ENTRIES.
12
VIM_COLL_MKEYS_FIRST = 'X'.
13
ENDFORM. "build_mainkey_tab_0