SAP ABAP 关于进度条的好与坏
当程序运行时间较长或数据量较大时
在程序运行时显示出运行进度供用户查看可以减少用户等待时的焦虑
这个进度条展示在GUI上,在运行过程中可能会产生一些意想不到的BUG甚至是DUMP
例如DUMP => MESSAGE_TYPE_X => 它会告诉你是GUI版本等的问题,但是实际上却可能是由进度条函数配合ALV展示等可能新开会话框的函数进而导致的DUMP 或 BUG
关于 SAPGUI_PROGRESS_INDICATOR 的使用
DATA(lv_text) = ''.
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
EXPORTING
* PERCENTAGE = 0
text = lv_text.
更多的时候我们会在LOOP、DO等循环中使用该进度条。
这个函数存在的一个问题是,它在运行过程中会占用当前会话窗口
这时如果程序执行到ALV报表展示等函数时,就会新开一个会话窗口
然后原会话会持续等待,就会形成卡住无法中断的情况
也有可能新建新的会话窗口失败,导致ALV无法展示就一直卡在运行的选择屏幕界面
更极端的就是出现以上提及的 MESSAGE_TYPE_X DUMP
为了解决以上问题,我们可以使用SAP封装的类 SAPGUI_PROGRESS_INDICATOR 来实现进度条
使用 SAPGUI_PROGRESS_INDICATOR
cl_progress_indicator=>progress_indicate(
EXPORTING
i_text = |正在执行,请稍等......{ sy-tabix } / { lv_lines } |
* i_msgid = i_msgid " Message Class (If I_TEXT is not transferred)
* i_msgno = i_msgno " Message Number (If I_TEXT is not transferred)
* i_msgv1 = i_msgv1 " Message Variable (Maximum of 50 Characters)
* i_msgv2 = i_msgv2 " Message Variable (Maximum of 50 Characters)
* i_msgv3 = i_msgv3 " Message Variable (Maximum of 50 Characters)
* i_msgv4 = i_msgv4 " Message Variable (Maximum of 50 Characters)
i_processed = sy-tabix " Number of Objects Already Processed
i_total = lv_lines " Total Number of Objects to Be Processed
i_output_immediately = abap_false " X = Display Progress Immediately
* importing
* e_progress_sent = e_progress_sent " X = Progress Information Was Displayed
).
这里需要关注的是参数 i_output_immediately
这个参数是控制是否立即刷新进度条,如果设置false则每十秒刷新一次
这里一定得设置为空,否则如果立即刷新的话 效果和 函数 SAPGUI_PROGRESS_INDICATOR 是一样的
都将导致不可控结果出现