Ejemplo de 'SAPGUI_PROGRESS_INDICATOR'

abapito · 18 May 2011, 13:05

Hola, aquí dejo un ejemplo de la función SAPGUI_PROGRESS_INDICATOR. La del relojito


* Declaramos las variables
DATA: gf_progresstext           TYPE string,
      gf_numbertext             TYPE string,
      gf_progresspercentage     TYPE p,
      gf_progress_maxlinenumber TYPE sy-dbcnt,
      gf_tabix                  TYPE string.



  DESCRIBE TABLE tu_tabla_interna LINES gf_progress_maxlinenumber.
  gf_numbertext   = gf_progress_maxlinenumber.
*
  LOOP AT tu_tabla_interna.

...

    gf_progresspercentage = sy-tabix * 100 / gf_progress_maxlinenumber.
    gf_progresstext = gf_progresspercentage.
    gf_tabix = sy-tabix.

    CONCATENATE 'Seleccionando Datos... ' gf_progresstext '%' '***'
                'Tratando...' gf_tabix 'de' gf_numbertext 'materiales'
      INTO gf_progresstext SEPARATED BY space.

    CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
      EXPORTING
        percentage = gf_progresspercentage
        text       = gf_progresstext.

...



  ENDLOOP.

Ejemplo de 'SAPGUI_PROGRESS_INDICATOR'

abapito