Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Consulta simple en sql AYUDA (https://www.clubdelphi.com/foros/showthread.php?t=69258)

Elizabethdelphi 05-08-2010 03:58:59

Consulta simple en sql AYUDA
 
Buenas noches!! Realice una consulta en sql con un query, cuando presiono un button en un dbgrid me deberia mostrar los registros.

La composicion de las tablas es la sgte
turno.dni, turno.medico, turno.fechaten, turno.horaaten son todos claves primarias de la tabla turno.
Ésta está relacionada con la tabla paciente cuya clave primaria es paciente .dni y con la tabla medico cuya clave es medico.matric.
Bueno lo que quiero que haga la consulta es que me muestre los pacientes que tiene un medico determinado para atender en el dia de la fecha y la consulta que probe entre otras fue la sgte:

C:='select turno.dni, turno.medico, turno.fechaten, turno.horaaten from turno left join medico on ' ;
c:=c+ 'turno.medico=medico.matric where turno.dni>= 1 and turno.fechaten= "date()" and turno.horaaten>="08:00:00"';

El error que me da aca es type mistmatch in expresion, en las otras consultas que hice me daba un error de clave en turno. fechaten="date()"

La verdad estoy bastante mareada con esta consulta y se que es bastante simple pero no logro superarla... Espero que alguien me pueda ayudar Desde ya Muchas gracias

Elizabethdelphi 05-08-2010 04:09:27

La tabla esta hecha en paradox 7 y turno.fechaten es de tipo date y turno.horaaten es de tipo time los otros 2 registros son integer gracias

Caral 05-08-2010 04:14:57

Hola
A ver
Código Delphi [-]
C:=' select turno.dni, turno.medico, turno.fechaten, turno.horaaten from turno left join medico on  ' +
' turno.medico = medico.matric where turno.dni >= 1 and turno.fechaten = '+date()+' and turno.horaaten >= ''08:00:00'';
Saludos

Elizabethdelphi 07-08-2010 19:05:45

Hola sabes que he probado tu codificacion y me da un error de tipos, me dice q es incompatible tipo string con tdatetime yo utilizo delphi6 de todos modos muchas gracias

Caral 07-08-2010 19:38:23

Hola
Código Delphi [-]
C:=' select turno.dni, turno.medico, turno.fechaten, turno.horaaten from turno left join medico on  ' +
' turno.medico = medico.matric where turno.dni >= 1 and turno.fechaten = '+dateToStr(Date)+' and turno.horaaten >= '+TimeToStr(Time);
Saludos


La franja horaria es GMT +2. Ahora son las 22:35:57.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi