灰掉工具欄上部分按鈕

效果圖

點BUT01後，BUT01後，01灰掉，02可點擊

代碼：

*&---------------------------------------------------------------------*
*& Report  ZTEST_007
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZTEST_007.


TYPE-POOLS:SLIS.
DATA:RT_EXTAB TYPE SLIS_T_EXTAB.

INITIALIZATION.

START-OF-SELECTION.
  APPEND 'BUT02' TO RT_EXTAB.
  SET PF-STATUS 'STANDARD' EXCLUDING RT_EXTAB.
  WRITE '兩個按鈕，右邊那個被灰掉了'.
  WRITE / '雖然顯示可是不能夠按'.

AT USER-COMMAND.
  IF SY-UCOMM = 'BACK'.
    LEAVE PROGRAM.
  ELSEIF SY-UCOMM = 'BUT01'.
    REFRESH RT_EXTAB.
    APPEND 'BUT01' TO RT_EXTAB.
    SET PF-STATUS 'STANDARD' IMMEDIATELY EXCLUDING RT_EXTAB.
  ELSEIF SY-UCOMM = 'BUT02'.
    REFRESH RT_EXTAB.
    APPEND 'BUT02' TO RT_EXTAB.
    SET PF-STATUS 'STANDARD' IMMEDIATELY EXCLUDING RT_EXTAB.
  ENDIF.

* ***兩個按鈕是交互生效，主要設置以下
*1，雙擊SET PF-STATUS 'STANDARD' 中  STANDARD 輸入 BUT01 BUT02 BACK 等參數
*2，goto->attributes->pushbutton assignment...->Display all   這步是關鍵
*3, 激活  OK

截圖以下：

Status

設置：