ALV动态显示菜单栏按钮

【原创】 ALV动态显示菜单栏按钮

栏目：ABAP 作者：在海边看星星阅读：（369）更新于：2025-01-22 09:30

alv函数下设置参数i_callback_pf_status_set = 'SUB_STATUS_SET'

PERFORM pre_fieldcat.   "设置字段
  PERFORM set_layout.     "设置布局

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
    EXPORTING
      i_callback_program       = sy-cprog
      i_callback_pf_status_set = 'SUB_STATUS_SET'
      i_callback_user_command  = 'SUB_USER_COMMAND'
      is_layout_lvc            = rec_g_layout
      it_fieldcat_lvc          = tab_g_fieldcat
      i_save                   = 'A'
*     it_events                = gt_event
    TABLES
      t_outtab                 = gt_out
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
  IF sy-subrc <> 0.
  ENDIF.

status下代码

*&---------------------------------------------------------------------*
*&      Form  SUB_STATUS_SET
*&---------------------------------------------------------------------*
*&      设置状态栏
*&---------------------------------------------------------------------*
FORM sub_status_set USING it_extab TYPE slis_t_extab.
  DATA: lt_extab TYPE TABLE OF sy-ucomm WITH HEADER LINE.

  IF p_upload = 'X'.
    APPEND 'REPROC' TO it_extab.
  ELSE.
    APPEND '&SCDD' TO it_extab.
  ENDIF.

  SET PF-STATUS 'STATUS_001' EXCLUDING it_extab.
  SET TITLEBAR 'TITLE'.
ENDFORM. "SUB_STATUS_SET