W Pub: ABAP Cursosentenciagetruntime

<HTML>

<HEAD>

<META http-equiv="Content-Type" content="text/html; charset=windows-1252">

<META name="GENERATOR" content="Microsoft FrontPage 4.0">

<META name="ProgId" content="FrontPage.Editor.Document">

<TITLE>GET RUN TIME</TITLE>

<link rel="stylesheet" href="../../gaussr3.css" tppabs="http://www.gaussr3.com/gaussr3.css" type="text/css">

</HEAD>

<BODY>

<p align="left">⚠ &lt;b&gt;<span class="titulo">GET RUN TIME</span>⚠ &lt;/b&gt;</p>

<P align="left" class="gaussr3">⚠ &lt;B&gt;Definicin⚠ &lt;/B&gt;</P>

<p align="left" class="gaussr3">Se utiliza para obtener el tiempo de ejecucin 

  de un programa.</p>

<p align="left" class="gaussr3">⚠ &lt;B&gt;Sintaxis:⚠ &lt;/B&gt;</p>

<pre class="gaussr3">GET RUN TIME FIELD <campo>.</pre>

<p class="gaussr3">La primera vez que se ejecuta esta sentencia se inicializa 

  el campo <campo> (que ha de ser de tipo I) a 0. Para las llamadas posteriores 
  a la sentencia GET RUN TIME el sistema actualiza el campo <campo> con 
  el tiempo transcurrido. Si el servidor de aplicacin tiene 2 o ms procesadores 
  puede ocurrir que haya fluctuaciones el los tiempos devueltos. El tiempo que 
  devuelve la sentencia esta en microsegundos.</p>

<p class="gaussr3">Para realizar anlisis ms complejos utilizaremos la transaccin 

  SE30. </p>

<p class="gaussr3">⚠ &lt;b&gt;Ejemplo:⚠ &lt;/b&gt;</p>

<pre class="gaussr3">DATA: T1 TYPE I, 

      T2   TYPE I,
      TMIN TYPE I.</pre>

<pre class="gaussr3">DATA: F1(4000), F2 LIKE F1.</pre>

<pre class="gaussr3">TMIN = 1000000.

DO 10 TIMES. 

  GET RUN TIME FIELD T1.
    MOVE F1 TO F2.        "Medicin la sentencia MOVE
  GET RUN TIME FIELD T2.
  T2 = T2 - T1. IF T2 < TMIN. TMIN = T2. ENDIF.

ENDDO.

WRITE: 'Mover 4000 bytes toma', TMIN, 'microsegundos'.</pre>

</BODY>

</HTML>