진행상태 Function (SAPGUI_PROGRESS_INDICATOR)

Internal table의 loop 를 도는 동안의
진행상태를 알 수 있음.

  DATA: GV_CUR_P  TYPE I,"CURRENT PERCENTAGE
      GV_CUR_PP TYPE P,"ONLY CALC.
      GV_TOT_D TYPE I, "인터널테이블 총수량
      GV_DIS_T(20).    "DISPLAY


DATA: BEGIN OF GT01 OCCURS 0,
        ZDATA TYPE I,
      END OF GT01.


START-OF-SELECTION.


  DO 1000 TIMES.
    GT01-ZDATA = SY-INDEX.
    APPEND GT01.
  ENDDO.


  DESCRIBE TABLE GT01 LINES GV_TOT_D.


  LOOP AT GT01.

    GV_CUR_PP = SY-TABIX / GV_TOT_D * 100.
    GV_CUR_P = GV_CUR_PP.
    GV_DIS_T = GT01-ZDATA.

    call function 'SAPGUI_PROGRESS_INDICATOR'
         exporting
              percentage = GV_CUR_P
              text       = GV_DIS_T.
    IF GV_CUR_P >= 10.
      WRITE GT01-ZDATA.
    ENDIF.


  ENDLOOP.