ABAP /
\ ABAP

Macro de procentaje SAYME

  1. * Ini : SAYME v 1.3. ------------------ 21.12.2004
  2. constants say_me_max type i value 10.
  3. data say_me_now type i value 0.
  4. define say_me.
  5.  if sy-batch is initial.
  6.  add 1 to say_me_now.
  7.  if say_me_now > say_me_max. say_me_now = 1. endif.
  8.  syst-PRCOP = 100.
  9.  if say_me_max ne 0.  syst-PRCOP = say_me_now * 100 / say_me_max. endif.
  10.  call function 'SAPGUI_PROGRESS_INDICATOR'
  11.  exporting  percentage = syst-PRCOP
  12.             text       = &1
  13.  exceptions others     = 1.
  14.  endif.
  15. end-of-definition.
  16. * Fin : SAYME v 1.3  ------------------ 21.12.2004
[$[Get Code]]

SAP ABAP Programación Macro DEFINE

Última modificación de la página el 03 May 2026 a las 07h33
Powered by PmWiki