Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-10-2008
lKinGl lKinGl is offline
Miembro
 
Registrado: ago 2007
Posts: 333
Poder: 20
lKinGl Va por buen camino
Exclamation Consulta SQL por Mes y Año

Salu2 amigos foristas

necesito realizar de una u otra forma una consulta sql donde el usuario pueda especificar el mes y año que quiere obtener los resultados, los resultados deben salir en un quickreport...

Tengo un datatimepicker donde aparecen los meses ej. Enero, Febrero

Tengo un Edit donde sale el numero de mes marcado en el datatimepicker
ejemplo: 01...12

tengo el quickreport armado con 1 Query direccionado a la tabla costosygastos

en el formulario donde selecciono el mes y escribo el año hay un boton que tiene este codigo:

Código Delphi [-]
with Form45.Query1 do begin
   Close;
   SQL.Clear;
   SQL.Text := 'Select Fecha,grupo,des_cu,debe,haber from costosygastos.db where fecha >= "01/"+QuotedStr(edMes.Text)+"/"+QuotedStr(edAno.Text)+"';
   Open;
end;
form45.QuickRep1.Preview;

pero al presionar el boton me sale un error que dice lo siguiente:

"Project Project1.eae raised exception class EDBE EngineError with message 'Unexpected end of command. Token:"
Line Number: 1'. Process stopped. Use Step or Run to continue.

gracias adelantadas por su ayuda y si tienen alguna otra forma de hacerlo que funcione como deseo, tambien sirve
__________________
Las cosas o son, o no son...
Responder Con Cita
  #2  
Antiguo 27-10-2008
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.572
Poder: 27
egostar Va camino a la fama
Hola

Código Delphi [-]
SQL.Text := 'Select Fecha,grupo,des_cu,debe,haber from costosygastos.db where fecha >= "01/"'+
            QuotedStr(edMes.Text)+'"/"'+QuotedStr(edAno.Text);

Aunque yo lo haría así

Código Delphi [-]
SQL.Text := 'Select Fecha,grupo,des_cu,debe,haber from costosygastos.db where fecha >= '+
            QuotedStr('01/'+edMes.Text+'/'+edAno.Text);

Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita
  #3  
Antiguo 27-10-2008
lKinGl lKinGl is offline
Miembro
 
Registrado: ago 2007
Posts: 333
Poder: 20
lKinGl Va por buen camino
Gracias Egostar de la segunda forma si me funcionó[IMG]file:///C:/Users/Rey/AppData/Local/Temp/moz-screenshot.jpg[/IMG]
__________________
Las cosas o son, o no son...
Responder Con Cita
  #4  
Antiguo 27-10-2008
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Poder: 28
Delphius Va camino a la fama
Cita:
Empezado por lKinGl Ver Mensaje
Gracias Egostar de la segunda forma si me funcionó[IMG]file:///C:/Users/Rey/AppData/Local/Temp/moz-screenshot.jpg[/IMG]
lkinGl,
Si deseas mostrarnos una imagen debes subirla a un sitio que ofrezca el "alojamiento" de imágenes, como lo es ImageShack. Te registras, subes la imagen y luego la seleccionas y presionas en forum codes o algo así (no tengo abierto ImageShack en estos momentos). Te mostrará un cuadro de diálogo en donde estará el Code BB para que después lo pegues aquí.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita
  #5  
Antiguo 27-10-2008
lKinGl lKinGl is offline
Miembro
 
Registrado: ago 2007
Posts: 333
Poder: 20
lKinGl Va por buen camino
Cita:
Empezado por Delphius Ver Mensaje
lkinGl,
Si deseas mostrarnos una imagen debes subirla a un sitio que ofrezca el "alojamiento" de imágenes, como lo es ImageShack. Te registras, subes la imagen y luego la seleccionas y presionas en forum codes o algo así (no tengo abierto ImageShack en estos momentos). Te mostrará un cuadro de diálogo en donde estará el Code BB para que después lo pegues aquí.

Saludos,
disculpa pero no queria poster imagenes, es que tenia esa url copiada y sin querer preione ctrl+v
__________________
Las cosas o son, o no son...
Responder Con Cita
  #6  
Antiguo 27-10-2008
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Poder: 28
Delphius Va camino a la fama
Cita:
Empezado por lKinGl Ver Mensaje
oye egostar pero el codigo que me diste sirve pero solo para buscar los 1 del mes que seleccione como seria para buscar en todo el mes?
Disculpa lKinGl pero la consulta que muestra Egostar dice algo así:

"Traeme todos los costos y gastos mayores o iguales a la fecha 01/Mes/Año" Donde Mes y Año son los dos "parámetros" que le indicas a la consulta.

¿Seguro que te devuelve solo las de fechas correspondiente al primer día del més?

Habría que ver...

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita
  #7  
Antiguo 27-10-2008
lKinGl lKinGl is offline
Miembro
 
Registrado: ago 2007
Posts: 333
Poder: 20
lKinGl Va por buen camino
Cita:
Empezado por Delphius Ver Mensaje
Disculpa lKinGl pero la consulta que muestra Egostar dice algo así:

"Traeme todos los costos y gastos mayores o iguales a la fecha 01/Mes/Año" Donde Mes y Año son los dos "parámetros" que le indicas a la consulta.

¿Seguro que te devuelve solo las de fechas correspondiente al primer día del més?

Habría que ver...

Saludos,

ponga el mes que ponga me saca el registro que tengo en la tabla

que por cierto la fecha del registro que tengo para la prueba es de


10/01/2008

si pongo cualquier mes igual me muestra el registro

salu2
__________________
Las cosas o son, o no son...
Responder Con Cita
  #8  
Antiguo 27-10-2008
lKinGl lKinGl is offline
Miembro
 
Registrado: ago 2007
Posts: 333
Poder: 20
lKinGl Va por buen camino
Cita:
Empezado por egostar Ver Mensaje
Hola

Código Delphi [-]SQL.Text := 'Select Fecha,grupo,des_cu,debe,haber from costosygastos.db where fecha >= "01/"'+ QuotedStr(edMes.Text)+'"/"'+QuotedStr(edAno.Text);


Aunque yo lo haría así

Código Delphi [-]SQL.Text := 'Select Fecha,grupo,des_cu,debe,haber from costosygastos.db where fecha >= '+ QuotedStr('01/'+edMes.Text+'/'+edAno.Text);


Salud OS

oye egostar pero el codigo que me diste sirve pero solo para buscar los 1 del mes que seleccione como seria para buscar en todo el mes?
__________________
Las cosas o son, o no son...
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Realizar una consulta sobre los registros que devuelve otra consulta Borjaserrano Firebird e Interbase 12 01-10-2007 23:19:44
Consulta dentro de otra consulta judit25 Conexión con bases de datos 1 25-06-2007 15:52:15
consulta sobre consulta superhopi SQL 2 16-05-2003 19:01:47


La franja horaria es GMT +2. Ahora son las 09:46:54.


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