02/08/2010

Program to Generate a Progress Bar


*-----------------------------------------------------------------------
* This program generates a Progress Bar on your screen.
* Try to change the value in layout of the 'EPS_PROGRESS_POPUP'
* function (from 1 to 4).
*-----------------------------------------------------------------------
REPORT ztest NO STANDARD PAGE HEADING.

DATA: val TYPE i VALUE 0.

DO 20 TIMES.

val = val + 5.
CALL FUNCTION 'EPS_PROGRESS_POPUP'
EXPORTING
btn_txt = 'CANCEL'
curval_g1 = val
curval_g2 = val
layout = '1'
maxval_g1 = '100'
maxval_g2 = '100'
popup_link = 'ASYNC'
popup_stat = '1'
popup_title = 'This is my Title'
text_1 = 'TEXT 1'
text_2 = 'TEXT 2'
text_3 = 'TEXT 3'
text_4 = 'TEXT 4'
text_g1 = 'My Progress Bar'
text_g2 = 'Line 2'
title_g2 = 'Progress Status'
winid = 100.

ENDDO.

CALL FUNCTION 'PROGRESS_POPUP'
EXPORTING
stat = '2'
winid = 100.

CALL FUNCTION 'GRAPH_DIALOG'
EXPORTING
close = 'X'.

Nenhum comentário:

Postar um comentário