ABAP处理的数据量较大时,盯着一动不动的选择屏幕是不是很无聊??
LOOP AT I_TAB.
DESCRIBE TABLE I_TAB[] LINES L_LIN.
L_PERC = SY-TABIX / L_LIN * 100.
L_LIN1 = L_PERC.
CONCATENATE L_LIN1 '%' ',' '正在解析文件...'
INTO L_TXT.
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
EXPORTING
PERCENTAGE = L_PERC
TEXT = L_TXT.
。
。
。
。
。
ENDLOOP.
效果: