|
Disculpen las faltas de ortografía anteriores.
1.- El siguiente código se encuentra en un componente TQuery llamado qRecibos que se encuentra en el reporte:
select status, count(fol_pag) as recibos, sum(total) as total
from pagos
where fec_pag = :fecha
and num_caj = :caja
and status='AC'
group by status
2.- Lo mando llamar de la Forma que se llama fQRcorte de la siguiente manera:
fQRCorte.qRecibos.Close; //cierro el query
fQRCorte.qRecibos.ParamByName('FECHA').AsDate := DateEdit1.Date;//paso la fecha como parametro
fQRCorte.qRecibos.ParamByName('CAJA').AsInteger := StrToInt(ComboEdit1.Text);// paso el numero de caja como parametro
fQRCorte.qRecibos.Open; //abro el query
fQRCorte.fRepCorte.Preview; // muestro un preview del reporte
3.- Uso paradox (perdon por no haberlo puesto antes)
4.- El Query si funciona, aunque en ocasiones, hace mal la suma, quitando uno de los últimos recibos de pagos, por lo tanto, la suma del total, esta equivocada, pero despues de que generan el reporte y salen del sistema, vuelven a entrar y a generar el reporte de nueva cuenta y sale bien.
5.- Cada vez que se agrega un recibo, se hace commit, la tabla se actualiza en ese momento, aquí el problema es que estaba funcionando bien por varios meses, y esta fallando en estos dias, por ejemplo: fallo el martes y jueves, pero el lunes y miercoles no, ese es mi problema, espero me hayan entendido.
Gracias.
|