Consulta entre 2 fechas.

[Casimiro Noteví]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración

Recuerda poner los tags al código fuente, ejemplo:



Gracias

[sintornillos]

Hola Casimiro, si bien había visto la guía de estilo, no había visto lo que me indicas, lo tendré en cuenta para futuras preguntas y/o respuestas.
Gracias por tu atención
¿será necesario que reformule mi consulta??

[sintornillos]

Aquí voy de nuevo,(a ver si ahora lo hago bien),

Hola amigos, estoy tartando de hacer lo arriba indicado, en mi caso tengo una tabla Mysql, cuya estructura es la siguiente:
Tabla entregas identrega, idbeneficiarios, idmercaderia, fecha
beneficiariosidbeneficiarios, apellido, nombre, dni
mercaderiaidmercaderia,detalle

En el formulario FrmBenefxFecha tengo un Zquery ZQryFecha, dos DateTimePicker, en los cuales ingreso la fecha de inicio y la fecha final y un boton para iniciar la busqueda y un Dbgrid donde muestro el resultado, el código es el siguiente:

Código Delphi [-]
with FrmBenefxFec.ZQryFecha do
    begin
      Close;
      Sql.Text:= 'select * ' +
                 'from entregas ' +
                 'where Fecha Between :finicio and :ffinal ';


      ParamByName('finicio').AsDate:=DateTPDesde.Date;
      ParamByName('ffinal').AsDate:=DateTPHasta.Date;
      Sql.Add('Order By Fecha');

      //Open;
      ExecSQL;
    end

El código en las propiedades sql del Zquery es el siguiente:

Código SQL [-]
select * from entregas
  inner join beneficiarios 
    on (entregas.idbeneficiarios=beneficiarios.idbeneficiarios)
  inner join mercaderia
    on (entregas.idmercaderia=mercaderia.idmercaderia);

y al ejecutarlo me sale el siguiente error:
ZQryFecha: Parameter 'finicio' not found

trate de incluir los parametros en las propiedades params de la zquery y tampoco.

Desde ya les agradezco vuestra ayuda.-

[marinaAv]

hola mira yo tengo un codigo parecido al tuyo solo que en la consulta la pongo asi

Código Delphi [-]
Sql.Text:= 'select * ' +            
'from entregas ' +          
 'where Fecha Between  FormatDateTime('yyyy/mm/dd',dt_desde.Date) +' and '+ FormatDateTime('yyyy/mm/dd',dt_hasta.Date);

mi dt_desde es el nombre de mi DateTimePicker y si me funciona espero te sirva

[sintornillos]

Gracias MarinaAv por tu pronta respuesta, me olvide de aclarar que estoy trabajando con Delphi XE no se si eso tendrá algo que ver, pues el código que me pasaste me tira un error "E2066 Missing operator or semicolon"

[Casimiro Noteví]

Usa "open", ya que es un "select", el "execsql" es cuando no devuelve datos: update, insert, etc.

Creo que no estás poniendo el código adecuado para que lo veamos, ya que no puede decirte que no existe el parámetro finicio cuando sí que existe en el código que has pegado.

[sintornillos]

Muchas Gracias Casimiro, tenías razón el problema era el execsql lo reemplace por el open y funcionó.

[marinaAv]

Empezado por sintornillos

Gracias MarinaAv por tu pronta respuesta, me olvide de aclarar que estoy trabajando con Delphi XE no se si eso tendrá algo que ver, pues el código que me pasaste me tira un error "E2066 Missing operator or semicolon"

mmm que raro yo tambien estoy con delphi xe y no me marca nada o sabes que ese error es que estas mandando un dato diferente que no lo permite :S

[ecfisa]

Empezado por marinaAv

mmm que raro yo tambien estoy con delphi xe y no me marca nada o sabes que ese error es que estas mandando un dato diferente que no lo permite :S

Hola marinaAv.

Seguramente ha sido un desliz al copiar/pegar o redactar el mensaje (a todos nos ha pasado). Pero al código del mensaje #9:

Código Delphi [-]
Sql.Text:= 'select * ' +            
'from entregas ' +          
 'where Fecha Between  FormatDateTime('yyyy/mm/dd',dt_desde.Date) +' and '+ FormatDateTime('yyyy/mm/dd',dt_hasta.Date);

efectivamente le falta una coma como señala el mensaje de error que nos comenta sintornillos.

Código Delphi [-]
Sql.Text:= 'select * ' +            
'from entregas ' +          
 'where Fecha Between ' + FormatDateTime('yyyy/mm/dd',dt_desde.Date) +' and '+ FormatDateTime('yyyy/mm/dd',dt_hasta.Date);

Saludos.