ABAP-前台进度条

举报
Mr_blank 发表于 2025/02/14 14:19:28 2025/02/14
79 0 0
【摘要】 DATA:count TYPE string.  " 内表总数据条数DATA:msg   TYPE string.    " 显示的消息DATA:index TYPE string.  " 当前处理的索引DATA:BEGIN OF gt_tab  OCCURS 0,      col1 TYPE string,     END OF gt_tab ." 插入100条空数据DO 10000 T...

DATA:count TYPE string.  " 内表总数据条数
DATA:msg   TYPE string.    " 显示的消息
DATA:index TYPE string.  " 当前处理的索引

DATA:BEGIN OF gt_tab  OCCURS 0,
      col1 TYPE string,
     END OF gt_tab .


" 插入100条空数据
DO 10000 TIMES.
  APPEND gt_tab.
ENDDO.
DESCRIBE TABLE gt_tab LINES count.


*  进度条显示
LOOP AT gt_tab.
  CLEAR:msg,index.
  index = sy-tabix.
  CONCATENATE '正在处理。。。'  index '/' count INTO msg. " 拼接消息
  index = index / count * 100.  " 时钟显示的百分比

  CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
    EXPORTING
      percentage = index " 处理的百分比
      text       = msg.
ENDLOOP.

【声明】本内容来自华为云开发者社区博主,不代表华为云及华为云开发者社区的观点和立场。转载时必须标注文章的来源(华为云社区)、文章链接、文章作者等基本信息,否则作者和本社区有权追究责任。如果您发现本社区中有涉嫌抄袭的内容,欢迎发送邮件进行举报,并提供相关证据,一经查实,本社区将立刻删除涉嫌侵权内容,举报邮箱: cloudbbs@huaweicloud.com
  • 点赞
  • 收藏
  • 关注作者

作者其他文章

评论(0

抱歉,系统识别当前为高风险访问,暂不支持该操作

    全部回复

    上滑加载中

    设置昵称

    在此一键设置昵称,即可参与社区互动!

    *长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。

    *长度不超过10个汉字或20个英文字符,设置后3个月内不可修改。