admin管理员组文章数量:1568309
在自开发的程序里有时候需要用到进度条来显示处理进度。如下图所示:
1.函数 (不推荐使用)
DATA: lv_lines TYPE i, "总行数
lv_index TYPE i, "当前行数
lv_percentage TYPE i, "百分比
lv_text TYPE sy-ucomm. "显示消息 CHAR70
DESCRIBE TABLE gt_alv LINES lv_lines. "获取内表总行数
LOOP AT gt_alv INTO DATA(ls_alv).
lv_index = lv_index + 1. "当前行数
lv_percentage = lv_index * 100 / lv_lines. "计算百分比
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' "进度条显示
EXPORTING
percentage = lv_percentage "百分比
text = lv_text. "显示消息 CHAR70
ENDLOOP.
2.类方法 (建议使用)
DATA: lv_lines TYPE i, "总行数
lv_index TYPE i, "当前行数
lv_text TYPE sy-ucomm. "显示消息 CHAR70
DESCRIBE TABLE gt_alv LINES lv_lines. "获取内表总行数
LOOP AT gt_alv INTO DATA(ls_alv).
lv_index = lv_index + 1. "当前行数
cl_progress_indicator=>progress_indicate(
EXPORTING
i_text = lv_text "显示消息 CHAR70
i_processed = lv_index "当前行数
i_total = lv_lines "总行数
i_output_immediately = 'X' "立刻显示 空为每10秒
). "进度条显示
ENDLOOP.
版权声明:本文标题:ABAP 进度条展示 内容由热心网友自发贡献,该文观点仅代表作者本人, 转载请联系作者并注明出处:https://www.elefans.com/dongtai/1727247947a1104867.html, 本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,一经查实,本站将立刻删除。
发表评论