1
*---------------------------------------------------------------------*
2
* FORM X_REFRESH_TCTRL *
3
4
* refresh table control (external call) *
5
6
* VALUE(XE_NAME) ---> name of view/table to process *
7
* VALUE(XE_SCREEN) ---> screen to refresh from *
8
9
FORM X_REFRESH_TCTRL USING VALUE(XRT_NAME) LIKE VIMDESC-VIEWNAME
10
VALUE(XRT_SCREEN) LIKE VIMDESC-LISTE.
11
DATA: XRT_CONTROL_NAME(16) TYPE C VALUE 'TCTRL_'.
12
13
XRT_CONTROL_NAME+6 = XRT_NAME.
14
REFRESH CONTROL XRT_CONTROL_NAME FROM SCREEN XRT_SCREEN.
15
ENDFORM. "x_refresh_tctrl