*&---------------------------------------------------------------------*
*& FORM SET_PF_STATUS
*&---------------------------------------------------------------------*
* 定义界面状态栏
*----------------------------------------------------------------------*
* -->RT_EXTAB TEXT
*----------------------------------------------------------------------*
FORM FORM_SET_GUI_STATUS USING I_IT_EXTAB TYPE SLIS_T_EXTAB.
"设置ALV状态栏按钮的隐藏与显示
DATA: LT_EXTAB TYPE TABLE OF SY-UCOMM WITH HEADER LINE.
IF P_ALL IS NOT INITIAL. "此处P_ALL是选择屏幕的单选按钮
REFRESH: LT_EXTAB.
APPEND 'POPUSH' TO LT_EXTAB.
APPEND '&ALL' TO LT_EXTAB.
APPEND '&SAL' TO LT_EXTAB.
CLEAR: LT_EXTAB.
ELSEIF P_PUSH IS NOT INITIAL.
REFRESH: LT_EXTAB.
APPEND 'POPUSH' TO LT_EXTAB.
APPEND '&ALL' TO LT_EXTAB.
APPEND '&SAL' TO LT_EXTAB.
CLEAR: LT_EXTAB.
ENDIF.
"设置ALV状态栏
SET PF-STATUS 'STATUS_ALV' EXCLUDING LT_EXTAB.
ENDFORM.