Clipper/FiveWin - Comparar las horas

Hola como estan quisiera saber en clipper como puedo hacer para compara horas es decir tengo que manejar unos datos en base a hora definidas por el usuario si no es la hora no le permite ver nada pero si es la hora le permite hacer todo tipo de modificacion, Ejemplo

Hora establecidad : 07:30

Hora del sistema : 06:58

No se puede accesar porque el horario no es el permitido
la pregunta es como puedo saber esto gracias por su ayuda

horaestablecida = \'07:30\'
horaingreso = \'06:58\'
if dia_entrada = dia_sistema
if val(horaentrada) < val(horaestablecida)
msg(\'No se puede accesar porque el horario no es el permitido \')
endif
endif
espero te ayude

Saludos yo trabajaria mejor con los segundos trascurridos desde la media noche, ejemplo: 7:30:00 habran trasncurrido 27000 segundos..
si utilizas SECONDS() te devulve los segundos trascurridos desde la media noche por lo tanto lo puedes comparar con la hora establecida de manera numerica, si no quieres modificar la estructura de la base de datos puedes crear uno funcion como la que sigue:

IF SECONDS()>SEGUNDOS(HORAESTABLECIDA)
@ 10,10 SAY "SI SE PUEDE"
ELSE
@ 10,10 SAY "NO SE PUEDE"
ENDIF

FUNCTION SEGUNDOS(Q_DEV)
Q_SEC=(VAL(SUBSTR(Q_DEV,1,2))*60)*60
Q_SEC=Q_SEC+(VAL(SUBSTR(Q_DEV,4,2))*60)
Q_SEC=Q_SEC+VAL(SUBSTR(Q_DEV,7,2))
RETURN(Q_SEC)

Espero te ayude....