对ALV的自动刷新

* ------- 对ALV LIST的刷新:

MODULE user_command_1100 INPUT.
DATA save_ok LIKE sy-ucomm.
save_ok = ok_code.
CLEAR ok_code.
CASE save_ok.
WHEN 'BACK'.
CLEAR gs_data.
PERFORM update_internal_table.
SET SCREEN 0.
LEAVE SCREEN.

FORM update_internal_table.
DATA: gd_repid LIKE sy-repid, "Exists
ref_grid TYPE REF TO cl_gui_alv_grid.
IF ref_grid IS INITIAL.
CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
IMPORTING
e_grid = ref_grid.
ENDIF.
IF NOT ref_grid IS INITIAL.
CALL METHOD ref_grid->check_changed_data .
ENDIF.
ENDFORM. "update_internal_table
* -------获得选择的行
DATA: t_rows TYPE lvc_t_row.
DATA: s_row TYPE lvc_s_row.
CALL METHOD lr_grid->get_selected_rows
IMPORTING
et_index_rows = t_rows.
* ---------屏幕上的修改字段更新到内表
gs_grid_settings-edt_cll_cb = 'X'.

[@more@]

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/11011430/viewspace-1017669/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/11011430/viewspace-1017669/