Se requiere conocer si el horario es habil o inhabil la empresa tiene un costo de atención mientras el horario sea desde las 7:00 a.m. hasta las 19:59 p.m., entonces las respuesta es la siguiente:
*DATETIME, Muestra la fecha y hora actual.
*==================================
xhabil = DATETIME(YEAR(DATE()),MONTH(DATE()),DAY(DATE()),07,00,00)
xinhabil = DATETIME(YEAR(DATE()),MONTH(DATE()),DAY(DATE()),20,00,00)
IF DATETIME() >= xhabil AND DATETIME() < xinhabil then
thisform.label1.Caption = "HABIL"
ELSE
thisform.label1.Caption = "INHABIL"
ENDIF