Error en consulta sql TADOQuery

[hoguera]

Hola Amigos
Gracias por sus respuestas Caro y Jesus Salvador, disculpen mi error en las etiquetas del codigo, hice las modificaciones propuestas, pero igual me sigue arrojando vacio, saque de la consulta la parte del BETWEEN y ahi si me arroja todo sobre ese vendedor yo queria filtrarlo tambien por fecha pero se ve que algo no esta bien, sigo probando gracias por sus respuestas.

Saludos HoGueRa

[[Lepe]]

Usa PreviewModal para mostrar el informe.

Preview no es modal, por tanto el código se sigue ejecutando. Si tu consulta devuelve 3 o 4 registros, te funcionará bien. Si tu consulta devuelve ... por decir algo, 300 páginas, tendrás un Access violation o similar.

Pon un breakpoint en la linea quickReport.free y ejecuta el programa, verás que delphi se parará en el punto de ruptura sin haber cerrado el informe. Ahora prueba con PreviewModal .

Saludos

[hoguera]

Hola
disculpen pero puede ser el error que el campo es DATE/TIME y la consulta envia solo el DATE, como tendria que formular la consulta para salvar eso?

la estructura de la tabla tiene el campo ACTIVADO como DATE/TIME formato FECHA CORTA

Saludos

[[Lepe]]

- ¿de qué tipo están definido en la base de datos "id_vendedor" y "activado"?
- ¿seguro que el Quickreport tiene su propiedad dataset apuntando a la consulta "clientes"?

Antes de abrir la consulta, pon un memo en tu ventana y haz algo así:

Código Delphi [-]
memo1.lines.assign(clientes.sql);

y pon en el foro lo que haya en el memo1, quizás sea un problema de interpretación de fechas.

Lo que me intriga son los dos puntos de la consulta:

Código Delphi [-]
 BETWEEN :'+Form7.medt1.Text+' AND :'+FORM7.medt2.Text

...no me cuadra de ninguna forma.

Saludos

[jesus salvador]

Si el problema es el BETWEEN yo te recomiendo que descompongas la fecha en tu manejador de base de datos puedes descomponer la fecha

access
Day(<Tu fecha en bdd>) as VDay
Month(<Tu fecha en bdd>) as VMonth
Year(<Tu fecha en bdd>) as VYear
ms-sql
DATEPART(dd,<Tu fecha en bdd>) as VDay
DATEPART(mm,<Tu fecha en bdd>) as VMonth
DATEPART(yy,<Tu fecha en bdd>) as VYear
orecle
to_char(<Tu fecha en bdd>,'DD') VDay
to_char(<Tu fecha en bdd>,'MM') VMonth
to_char(<Tu fecha en bdd>,'YYYY') VYear


hay unas fuciones en delphi que descompone la fecha en dias mes año hora minuto segundo, no estoy seguro pero es encodedatetime decodedtetime, hay ejemplos en la ayuda del delphi con ello haces las comparación para encontrar entre dos fechas

además esto te ayuda a prevenir hackeo "sql inyection" en tu aplicación

[hoguera]

Hola
Puse un memo en el form y arrojo esto antes de la consulta:

Código SQL [-]
select * from clientes WHERE id_vendedor = 1 AND activado BETWEEN 01/01/2001 AND 01/01/2009

le quite los dos puntos, el Qreport tiene el dataset apuntando a clientes, tiene que ser algo relacionado con las fechas porque si dejo por ejemplo la siguiente orden sql anda perfecto

Código SQL [-]
select * from clientes WHERE id_vendedor = 1

asi funciona bien, lo que voy a intentar es desglozar la fecha como propone jesus salvador, para ver si asi toma la consulta.

saludos

[hoguera]

Encontre la solucion era simple, el error estaba en la consulta teniq que ser asi

Código Delphi [-]
      QuickReport1.clientes.SQL.Add('WHERE id_vendedor = '+
          vendedor.FieldByName('id_vendedor').AsString+' AND activado BETWEEN #'+
          medt1.Text+'# AND #'+medt2.Text+'#');

tenia que estar entre numerales las fechas de consulta, por si alguien le pasa lo mismo....

Gracias a todos Saludos HoGueRa