Milliseconds
Milliseconds : Integer
| Parámetro | Tipo | Descripción | |
|---|---|---|---|
| Resultado | Integer | ← | Número de milisegundos transcurridos desde que se inició el equipo |
Descripción
Milliseconds devuelve el número de milisegundos ( 1milisegundo = 1 milésima de un segundo) pasados desde que se inició el equipo.
El valor devuelto es un entero largo firmado, hasta 2^31 (alrededor de 2 mil millones de milisegundos o 24 días). Cuando la máquina ha estado funcionando durante más de 24 días, el número se vuelve negativo.
El propósito del comando es medir cortos períodos de tiempo con una alta precisión. Un rango de 24 días es más que suficiente para las comparaciones, pero debe tener cuidado. Al comparar valores, siempre trabaje con la diferencia entre dos valores. Nunca compare los valores directamente, ya que uno podría ser negativo y el otro positivo.
Ejemplo
El siguiente código espera hasta 5 segundos para que un registro bloqueado se desbloquee o finalice:
If(Locked([Table_1]))
$starttime:=Milliseconds
Repeat
DELAY PROCESS(Current process;15)
LOAD RECORD([Table_1])
$waittime:=Milliseconds-$starttime
Until(Not(Locked([Table_1]))|(Process aborted)|($waittime>5000)) //espera 5 segundos máximo
End if
Nota: siempre compare la diferencia entre dos llamadas de Milliseconds como se muestra arriba, nunca compare directamente, por ejemplo:
(Milliseconds>($starttime+5000)) //nunca lo haga así, ya que uno podría ser positivo, uno negativo