Formato fecha servidor

[[gatosoft]]

como dice movorack, podrias camniar la linea:

zquery1.Params.ParamByName('dia').Value := now;

por asDate o AsDatetime, y/o truncar la fecha para que no envie hora.

Código Delphi [-]
zquery1.Params.ParamByName('dia').AsDatetime:= Trunc(now);
zquery1.Params.ParamByName('dia').AsDate:= now;

La función no debería fallar asi. Si lo hace, lo que quiere decir que muy probablemente sea lo otro que comenta Movorack: ¿Que formato de fecha tienes en la tabla "feriado"?, si es texto, si vas a tener problemas si no coindicen los formatos.

Y por uñtimo seria bueno ver el mensaje de error, porque tu nos dices que hay un error pero el mensaje nos podria dar una pista.

saludo,

[shoulder]

Hola error es 6/2 not value date o ':' not integer, fui siguiendo estos dias el servicio y lo que no entiendo es durante varios dias funciona y de repente se frena con ese error como marque en el post superior o ahora en las lineas que dejo mas abajo. Pense sera un error de algo nuevo que lee y no es asi porque si abro el servicio de vuelta corre normalmente es como que se le fuera el seteo de la fecha o de la hora del now en algun momento de las pasadas del while. El servicio lo que hace mediante un while a las 10:50 actualiza datos en la BD
Este es el error que detecte tambien en ':' siempre es el now que no le gusta.....en algun momento de los dias trae otro valor a la variable string hora y por consiguiente se frena en la variable integer Impar.. o en el post anterior cuando paso el valor a zquery.

Código Delphi [-]
ShortDateFormat := 'dd/mm/yyyy';
hora := copy(datetimetostr(now()),11,6);

if copy(datetimetostr(now()),13,1) = ':' then
   hora := '0'+  copy(datetimetostr(now()),12,4);
impar := strtoint(copy(hora,6,1));

[[movorack]]

La verdad, no entendí el último mensaje. Pero me queda la duda.

¿De que tipo es el campo feriado.fecha?
¿Haz probado enviando el parámetro día con AsDate o AsDateTime?

y uno mas.

¿Porque extraes la hora de esa manera? Si es para llevarla a algún informe, te recomendaría usar DateTimeToStr

Pero si es para el manejo de la tabla, ahí si como ya han dicho en otros hilos: Usar el tipo de dato adecuado para cada situación.

[shoulder]

Hola extraigo asi porque, si la cifra del ultimo minuto es impar hago una cosa si es par otra. Como podria ser mas claro me doy cuenta que el servicio funciona pero al pasar los dias yo tampoco entiendo porque es como que la variable now pierde su seteo por eso me aparecen los error 6/2 no es valid date (tendria que ser.. 06/2020 o la hora en blanco en el integer. (el campo fecha del post anterior si es date).
Gracias

Código Delphi [-]
ShortDateFormat := 'dd/mm/yyyy';
hora := copy(datetimetostr(now()),11,6);
impar := strtoint(copy(hora,6,1));

[[movorack]]

Para el caso puntual, en lugar de extraerla de la cadena puedes usar MinuteOf para obtener el minuto y Odd para saber si es impar