abap progress indicator实用实例

   在 abap 编程中经常用到 progress indicator ，现在偶把这个函数详细说明一下，再做两个实例看看。

    函数名：SAPGUI_PROGRESS_INDICATOR

    FUNCTION GROUP:SGUI

    参数：IMPORT：PERCENTAGE    进度百分数

                        ：TEXT                 描述

 

使用实例1：显示进度

REPORT Z_DEMO1.

 

 

 DO 300 TIMES.   “做个时间延迟

    GET TIME.

 ENDDO.

 A(3) = SY-INDEX.A+3 = '%'. “取得进度的百分数

 CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'

       EXPORTING

            PERCENTAGE = SY-INDEX

            TEXT       = A.

ENDDO.

使用实例2：显示滑动字符流

 Z_                               .

   Waiting for an answer'.

 DO 300 TIMES.

    GET TIME.

 ENDDO.

  SHIFT MESSAGE CIRCULAR RIGHT.

 

  CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'

 

       EXPORTING

 

            PERCENTAGE = ''

 

            TEXT       = MESSAGE.

 

ENDDO.