Calcular horas transcurridas

[gegarcia]

Hola a todos los del foro. Alguno me podria ayudar como debo hacer para calcular las horas transcurridas. Por ejemplo desde hoy a las 13:00 hrs hasta pasado mañana a las 15:00 horas. Habra alguna funcion? Muchas gracias.

[martinq]

Fijate en el clarion wiki que hay bastante código útil, hay un ejemplo de Fernando Cernini:

Para sacar la diferencia entre horas es simplemente:

resultado = hora2 - hora + 1
El +1 es porque sino que faltaria un segundo cuando muestres el resultado (en formato @T6, por ej)

Si Hora2 es del dia siguiente, la cuenta seria:

resultado = (hora2 +(100*60*60*24)) - hora + 1

[CWeidl]

Yo lo manejo en formato Decimal, y convierto los datos para mostrarselo a los usuarios.
Ej. :

CampoDecimal = 56,59 ! Campo Expresado en Decimal
LOC:HORAS = INT(CampoDecimal) ! Me quedo con 56
LOC:MINUTOS = INT(((CampoDecimal - LOC:HORAS) * 60) + 1)
!
! LOC:MINUTOS = Me quedaria (((56,59 - 56) * 60) + 1) = 36
!
LOC:Resultado = CLIP(LOC:HORAS) & ':' & CLIP(LOC:MINUTOS) & 'Hs.'
! LOC:HORAS y LOC:MINUTOS como Nº Enteros
! LOC:Resultado = 56:36 Hs.

Espero te sirva. Saludos

Carlos