Tiempo de ejecución en ABAP

Muchas veces, queremos saber si un SELECT va a ejecutar más rápido utilizando SELECT o INNER JOIN...O simplemente queremos saber que condiciones en el WHRE nos va a ayudar a mejorar el performance...Con este código podemos hacer pruebas de RunTime y determinar la mejor opción.

REPORT Z_TEST_RUNTIME.

DATA: T1 TYPE I,
      T2 TYPE I,
      T TYPE P DECIMALS 2,
      N TYPE I VALUE 1000.

DATA: NUM TYPE I.

NUM = 10.
T = 0.

DO N TIMES.
  GET RUN TIME FIELD T1.
*-----Inicio código a validar-----*
  WHILE NUM GT 0.
    WRITE:/ NUM.
    NUM = NUM - 1.
  ENDWHILE.
*-----Fín código a validar-----*
  GET RUN TIME FIELD T2.
  T2 = T2 - T1.
  T = T + T2 / N.
ENDDO.

SKIP 1.
WRITE:/ 'Tiempo de Ejecución: ', T, 'microsegundos'.

El resultado en mi sistema...

        10                                   
         9                                   
         8                                   
         7                                   
         6                                   
         5                                   
         4                                   
         3                                   
         2                                   
         1                                   
                                             
Tiempo de Ejecución:  0.17  microsegundos

Saludos,

Blag.