对于我们自开发的SAP ABAP程序,当程序处理的数据量比较大或者预计耗时比较长时,在任务栏上显示一定的消息与用户进行交互是一种好习惯,例如显示任务进度百分比、显示当前正在执行的操作等。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 |
REPORT ZGDR0060. *代码来源于:SAPRSEUT *自动生成测试数据的程序:SAPBC_DATA_GENERATOR DATA: G_SBOOK TYPE STANDARD TABLE OF SBOOK WITH HEADER LINE, G_MESSAGE TYPE C LENGTH 200. SELECT * FROM SBOOK INTO TABLE G_SBOOK. IF LINES( G_SBOOK[] ) > 0. G_MESSAGE = REPLACE( VAL = 'SBOOK表中找到 &1 条数据' SUB = '&1' WITH = |{ LINES( G_SBOOK[] ) }| ). "sap netweaver750新语法. PERFORM LOG_MESSAGE USING G_MESSAGE. ENDIF. FORM LOG_MESSAGE USING P_MESSAGE TYPE CHAR200. IF P_MESSAGE IS NOT INITIAL. IF SY-BATCH IS INITIAL. CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING TEXT = P_MESSAGE. "信息会一闪而过,因此暂停一下看效果. WAIT UP TO 3 SECONDS. "把消息内容打印出来. WRITE P_MESSAGE. NEW-LINE. ELSE. MESSAGE S001(00) WITH P_MESSAGE(50) P_MESSAGE+50(50) P_MESSAGE+100(50) P_MESSAGE+150(50). ENDIF. ENDIF. ENDFORM. |
延伸阅读:SAP Fiori Design Principles
本文作者: GavinDong
版权属于: GavinDong博客
文章链接: https://gavindong.com/9561.html
如果使用过程中遇到问题,可 **点击此处** 交流沟通。
版权所有,转载时必须以链接形式注明作者和原始出处及本声明。