【pubu】...SCREENPUSHBUTTON/1(20)PUBU1USER-COMMANDABCD.SELECTION-...
答案:2 悬赏:50 手机版
解决时间 2021-02-01 02:53
- 提问者网友：川水往事
- 2021-01-31 12:44
【pubu】...SCREENPUSHBUTTON/1(20)PUBU1USER-COMMANDABCD.SELECTION-...
最佳答案
- 五星知识达人网友：一把行者刀
- 2021-01-31 13:34
【答案】 把AT USER-COMMAND.换成AT SELECTION-SCREEN .
AT SELECTION-SCREEN .是选择屏幕的PAI事件. 追问： 嗯，AT SELECTION-SCREEN 的用法我知道，我只是想知道这个AT USER-COMMAND到底应该怎么用的？ 追答： AT USER-COMMAND 是列表交互事件，它实现的前提条件是自定义的GUI状态和用户行为的接收；给你一个列表交互示例，自己多DEBUG就明白了： 注：SET PF-STATUS 'TEST' EXCLUDING 'PICK'.这句话中的TEST是GUI状态（就是你指的工具栏和菜单栏）的名字，需要新建，然后在GUI状态-应用工具条中添加五个按钮，功能代码分别为FC01~FC05. REPORT Z_LIST_AT_USER_COMMAND. START-OF-SELECTION. WRITE: 'Basic List', / 'SY-LSIND: ', sy-lsind. TOP-OF-PAGE. WRITE: 'Top-of-Page'. ULINE. TOP-OF-PAGE DURING LINE-SELECTION. CASE sy-pfkey. WHEN 'TEST'. WRITE 'Self-defined GUI for Function Codes'. ULINE. ENDCASE. AT LINE-SELECTION. SET PF-STATUS 'TEST' EXCLUDING 'PICK'. PERFORM out. sy-lsind = sy-lsind - 1. AT USER-COMMAND. CASE sy-ucomm. WHEN 'FC01'. PERFORM out. WRITE / 'Button Fun 1 was pressed'. WHEN 'FC02'. PERFORM out. WRITE / 'Button Fun 2 was pressed'. WHEN 'FC03'. PERFORM out. WRITE / 'Button Fun 3 was pressed'. WHEN 'FC04'. PERFORM out. WRITE / 'Button Fun 4 was pressed'. WHEN 'FC05'. PERFORM out. WRITE / 'Button Fun 5 was pressed'. ENDCASE. sy-lsind = sy-lsind - 1. *&---------------------------------------------------------------------* *& Form out *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* FORM out. WRITE: 'Secondary List', / 'SY-LSIND: ', sy-lsind, / 'SY-PFKEY: ', sy-pfkey. ENDFORM. out 追问： 谢谢回答！我现在就把这个问题搞清楚。。
AT SELECTION-SCREEN .是选择屏幕的PAI事件. 追问： 嗯，AT SELECTION-SCREEN 的用法我知道，我只是想知道这个AT USER-COMMAND到底应该怎么用的？ 追答： AT USER-COMMAND 是列表交互事件，它实现的前提条件是自定义的GUI状态和用户行为的接收；给你一个列表交互示例，自己多DEBUG就明白了： 注：SET PF-STATUS 'TEST' EXCLUDING 'PICK'.这句话中的TEST是GUI状态（就是你指的工具栏和菜单栏）的名字，需要新建，然后在GUI状态-应用工具条中添加五个按钮，功能代码分别为FC01~FC05. REPORT Z_LIST_AT_USER_COMMAND. START-OF-SELECTION. WRITE: 'Basic List', / 'SY-LSIND: ', sy-lsind. TOP-OF-PAGE. WRITE: 'Top-of-Page'. ULINE. TOP-OF-PAGE DURING LINE-SELECTION. CASE sy-pfkey. WHEN 'TEST'. WRITE 'Self-defined GUI for Function Codes'. ULINE. ENDCASE. AT LINE-SELECTION. SET PF-STATUS 'TEST' EXCLUDING 'PICK'. PERFORM out. sy-lsind = sy-lsind - 1. AT USER-COMMAND. CASE sy-ucomm. WHEN 'FC01'. PERFORM out. WRITE / 'Button Fun 1 was pressed'. WHEN 'FC02'. PERFORM out. WRITE / 'Button Fun 2 was pressed'. WHEN 'FC03'. PERFORM out. WRITE / 'Button Fun 3 was pressed'. WHEN 'FC04'. PERFORM out. WRITE / 'Button Fun 4 was pressed'. WHEN 'FC05'. PERFORM out. WRITE / 'Button Fun 5 was pressed'. ENDCASE. sy-lsind = sy-lsind - 1. *&---------------------------------------------------------------------* *& Form out *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* FORM out. WRITE: 'Secondary List', / 'SY-LSIND: ', sy-lsind, / 'SY-PFKEY: ', sy-pfkey. ENDFORM. out 追问： 谢谢回答！我现在就把这个问题搞清楚。。
全部回答
- 1楼网友：鸽屿
- 2021-01-31 15:12
和我的回答一样，看来我也对了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯