1
*---------------------------------------------------------------------*
2
* FORM VIM_FILL_WHERETAB *
3
4
* fill internal table for dynamic select *
5
6
FORM VIM_FILL_WHERETAB.
7
CALL FUNCTION 'VIEW_FILL_WHERETAB'
8
EXPORTING
9
TABLENAME = X_HEADER-ROOTTAB
10
TABLES
11
SELLIST = DBA_SELLIST
12
WHERETAB = VIM_WHERETAB
13
X_NAMTAB = X_NAMTAB
14
EXCEPTIONS
15
NO_CONDITIONS_FOR_TABLE = 01.
16
ENDFORM. "vim_fill_wheretab.