Controlar tiempos de ejecución

Si lo que se desea conocer es cuánto se tarda en ejecutar una porción de código, la sentecia GET RUN TIME FIELD nos vendrá como anillo al dedo. A continuación muestro un ejemplo de utilización:

DATA: t1 TYPE i, t2 TYPE i, n TYPE i VALUE 1000. GET RUN TIME FIELD t1. * Código a cronometrar * .... GET RUN TIME FIELD t2. t2 = ( t2 - t1 ) / n. " pasamos a milisegundos

Los tiempos t1 y t2 vienen dado en microsegundos por lo que será necesario dividirlos por 1.000 para pasarlos a milisegundos y por 1.000.000 si se desea tener en segundos.