Ver Mensaje Individual
  #1  
Antiguo 21-11-2016
jose001 jose001 is offline
Miembro
NULL
 
Registrado: jul 2016
Posts: 13
Reputación: 0
jose001 Va por buen camino
ayuda consulta en un edit

hola buenas tardes planteo mi duda tengo un formulario de caja en el cual esta compuesto por un dbgrid y 2 datetimepicker y un edit. esta aplicacion esta echa en delphi 2010 y componentes query de zeos y uso mysql-5 para la base de datos.
En dicho formulario lo que quiero realizar es lo siguiente buscar por fecha seleccionada en los datetimepicker y segun la fecha quiero traer el ultimo total de esa busqueda y guardarlo en un edit. y los demas datos que mostrarlo en el grid
bien con este codigo en el boton buscar

Código Delphi [-]
qCaja.Close;
qCaja.SQL.Clear;
qCaja.SQL.ADD('select * from caja');
qCaja.SQL.ADD('where fecha BETWEEN :Finicio AND :Fhasta');
qCaja.Params[0].AsDate:= Finicio.Date;
qCaja.Params[1].AsDate:= Fhasta.Date;
la busqueda se realiza a la perfección trayendo los datos de la caja segun la fecha y me los muestra en el dbgrid por esta parte esta bien ahora lo que queria es segun esa fecha traerme el ultimo total para ello plantie el siguiente codigo


Código Delphi [-]
qCaja.Close;
qCaja.SQL.Clear;
qCaja.SQL.ADD('select * from caja');
qCaja.SQL.ADD('where fecha BETWEEN :Finicio AND :Fhasta');
qCaja.SQL.ADD('AND idcaja=(select max(idcaja) from caja')); // linea agregada
qCaja.SQL.ADD('AND monto_total = :total')); // linea agregada
Edit1.Text:= qCaja.ParambyName('total').AsInteger; //linea agregada
qCaja.Params[0].AsDate:= Finicio.Date;
qCaja.Params[1].AsDate:= Fhasta.Date;


bien aca pasa lo siguiente me tira un error de que mysql no me reconoce la consulta. Probé usando un nuevo query para esas 3 lineas agregadas y el resultado es el mismo alguna ayuda ?
aclaro que quiero traer el ultimo total segun esa fecha para mostrarlo en primer lugar y luego lo re utilizare en otra operacion mas adelante
desde ya muchas gracias
Responder Con Cita