||
用WRITE LIST展示数据时,也要和用户做交互,下面共享两个小代码,做个了解就行。LIST确实很少见了!
代码1:
DATA:get_value(20).
DATA:BEGIN OF it_tab OCCURS 0,
field(20),
END OF it_tab.
it_tab-field = '双击此处弹出消息①'.
APPEND it_tab.
it_tab-field = '双击此处弹出消息②'.
APPEND it_tab.
LOOP AT it_tab.
WRITE:/ it_tab-field.
ENDLOOP.
"响应双击事件的事件块!常用在list方式输出报表中。
AT LINE-SELECTION.
"得到鼠标双击区域对应的数据 存入get_value变量中
GET CURSOR FIELD it_tab-field VALUE get_value.
"将双击的内容输出。
MESSAGE get_value TYPE 'I'.
代码2:
DATA: square TYPE i,"平方
cube TYPE i."立方
START-OF-SELECTION.
FORMAT HOTSPOT."打开热键后,可以响应单击事件
DO 10 TIMES.
square = sy-index ** 2.
cube = sy-index ** 3.
WRITE / sy-index.
HIDE: square, cube.
ENDDO.
"响应单击或双击的事件。
AT LINE-SELECTION.
WRITE: square, cube.
小黑屋|联系我们|赛跑网
( 苏ICP备14021163号-4 ) 
GMT+8, 2026-8-3 19:46 , Processed in 0.161078 second(s), 19 queries .
Powered by 91SAP X3.4
© 2001-2023 91sap Team.