ABAP状态栏将自定义按钮置灰
由于目前不能上传站外图片,遗憾~~~~~
1.SE38 创建程序名为:ZLRB_001
2.SE41 为程序创建状态为:TEST001,创建两个测试按钮。
CS1        CS2
测试一     测试二
3. 在菜单栏 ‘GOTO ’-> ‘Attributes’ -> ‘Pushbutton’ 选择‘display all’ 保存,激活。
4.在程序中增加如下代码
REPORT ZLRB_001.
TYPE-POOLS:slis.
DATA:rt_extab TYPE slis_t_extab.
INITIALIZATION.
START-OF-SELECTION.
*  APPEND 'CS1' TO rt_extab.
  APPEND 'CS2' TO rt_extab.
  SET PF-STATUS 'TEST001' EXCLUDING rt_extab.
  WRITE '两个按钮,左边那个被灰掉了'.
  WRITE / '虽然显示但是不可以按'.
*AT USER-COMMAND.
  IF sy-ucomm = 'BACK'.
    LEAVE PROGRAM.
  ELSEIF sy-ucomm = 'CS1'.
    REFRESH rt_extab.
    APPEND 'CS2' TO rt_extab.
    SET PF-STATUS 'TEST001' IMMEDIATELY EXCLUDING rt_extab.
  ENDIF.
5.操作完成,就可以看到一个按钮变成灰色的。
 
                     
                    
                 
                    
                
 
 
                
            
         
         浙公网安备 33010602011771号
浙公网安备 33010602011771号