Foro de programación ABAP

Código abierto => Funciones => Mensaje iniciado por: abapito en 18 de Mayo de 2011, 01:05:10 pm

Título: Ejemplo de 'SAPGUI_PROGRESS_INDICATOR'
Publicado por: abapito en 18 de Mayo de 2011, 01:05:10 pm
Hola, aquí dejo un ejemplo de la función SAPGUI_PROGRESS_INDICATOR. La del relojito  ;)

Código: [Seleccionar]
* 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.