ABAP语法笔记08 - 事件2和GUI状态

AT LINE-SELECTION .  " 双击行的时候触发的事件 一般用来跳转 搭配 GET CURSOR 使用

TOP-OF-PAGE DURING LINE-SELECTION .  " 双击行显示的次级表单的抬头执行逻辑

 

AT USER-COMMAND .  " 用户操作按钮的事件，配合GUI状态指定的功能码
    PERFORM FRM_USER_COMMAND  .


FORM FRM_USER_COMMAND .
    DATA: LV_CODE TYPE SY-UCOMM .
    LV_CODE = SY-UCOMM .
    CLEAR SY-UCOMM .
    CASE LV_CODE .
        WHEN '&15'.
            " DO SOMETHING ...
        WHEN '&12'.
            " DO SOMETHING ...
        WHEN OTHERS.
            SY-UCOMM = LV_CODE .
    ENDCASE.


ENDFORM.   

 

GET CURSOR FIELD fieldname VALUE value  . " 获取光标所在的位置  会返回两个字段 FIELD VALUE 

 

在程序中对应创建GUI状态，用来声明菜单栏、应用工具栏、按钮栏的按钮事件

正常屏幕：每个屏幕的菜单栏、应用工具栏、按钮栏的按钮

对话框：弹窗的按钮

上下文菜单：？？？不常用

 

 

 

 每个GUI状态至少需要一个E类型的菜单按钮，用来强制退出报错界面

图标文本：按钮图标后面显示的内容

信息文本：鼠标悬浮时显示的内容

 

 

 菜单栏中，仅输入文本，双击维护子菜单；对应菜单按钮输入按钮功能码添加菜单

 

 

 

SET PF-STATUS 'XXX'.  " 设置GUI状态，一般在PBO中设置