Progressindicator in ABAP Dynpro

Use the following coding to show a progress indicator in ABAP.
Thanks to: http://www.abapforum.com/forum/viewtopic.php?t=7389

ANZ_VERARB = ANZVERARB + 1.
....
PERFORM FORTSCHRITT USING P_VERARB
P_GESAMT
'irgendein Text'.

Like it? Share it!
FORM FORTSCHRITT USING P_AKTUElL TYPE I P_MAX TYPE I P_TEXT. DATA: TMP_WERT TYPE I. IF P_MAX GT 0. TMP_WERT = P_AKTUELL * 100 / P_MAX. ENDIF. IF TMP_WERT > ANZ_SCHWELLE. ANZ_SCHWELLE = ANZ_SCHWELLE + 5. CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING PERCENTAGE = ANZ_SCHWELLE TEXT = P_TEXT EXCEPTIONS OTHERS = 1. ENDIF.

>_ Author

>_ last updated 4 yearss ago

>_ Language: ABAP

SAPGUI_PROGRESS_INDICATOR