ALV 刷新实现

*&---------------------------------------------------------------------*
*&      Form  user_command
*&---------------------------------------------------------------------*
*       事件响应
*----------------------------------------------------------------------*
FORM user_command USING rf_ucomm    LIKE sy-ucomm
                        rs_selfield TYPE slis_selfield.
  CASE rf_ucomm.
    WHEN '&NTE'. "刷新
      PERFORM alv_refresh CHANGING rs_selfield-col_stable
                                   rs_selfield-row_stable
                                   rs_selfield-refresh.

     ENDCASE.
  ENDCASE.
ENDFORM.                    "user_command   

 

  *&---------------------------------------------------------------------*
*&      Form  alv_refresh
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM alv_refresh  CHANGING _col_stable  _row_stable  _refresh.

  _col_stable = 'X'.
  _row_stable = 'X'.
  _refresh = 'X'.

ENDFORM.                    " alv_refresh

 

在需要刷新的地方加上如下代码：

  set USER-COMMAND '&NTE'.