ALV直接返回选择屏幕

当有多个ALV的时候 想直接返回选择屏幕 可调用函数 RS_REFRESH_FROM_SELECTOPTIONS

其中 l_seltab  可带出当前程序的 选择条件参数

 CASE ucomm.
    WHEN '&Z_F15'.
      DATA:l_seltab TYPE TABLE OF rsparams.

      CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS' "直接返回选择屏幕函数
        EXPORTING
          curr_report     = sy-repid "程序名-ZJRFI018
        TABLES
          selection_table = l_seltab
        EXCEPTIONS
          not_found       1
          no_report       2
          OTHERS          3.

      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.

      SUBMIT zjrfi018 WITH SELECTION-TABLE l_seltab VIA SELECTION-SCREEN.
    WHEN '&Z_F12'.
      LEAVE PROGRAM .

   when others.

endcase.

原文地址:https://www.cnblogs.com/WACBZWY/p/13673830.html