mmmm
, el resultado sigue siendo el mismo amigo:
http://www.subirimagenes.com/fondosy...do-506687.html
Esta es la estructura de mi quick Report:
http://www.subirimagenes.com/fondosy...te-506692.html
y este es el resultado de la consulta que me pasaste, que pues si funciona:
http://www.subirimagenes.com/otros-r...a2-506736.html
Y este es el codigo del boton Imprimir despues de haber seleccionado las fechas:
Código Delphi
[-]
with Modulo.Busqueda do begin
If active then close;
SQL.Clear;
SQL.Add('SELECT venta.id_venta, venta.fecha_venta, venta.total_venta, productos.descripcion,');
SQL.Add('detalle_venta.precio_unitario, detalle_venta.cantidad_vendida ');
SQL.Add('FROM venta');
SQL.Add('join detalle_venta on venta.id_venta = detalle_venta.id_venta');
SQL.Add('join productos on detalle_venta.id_producto = productos.id_producto');
SQL.Add('WHERE venta.fecha_venta between "2008-05-01" and "2008-05-31"');
SQL.Add('order by venta.id_venta');
Open;
end;
form18.QuickRep1.DataSet:=modulo.busqueda;
form18.QRGroup1.Expression:=modulo.busqueda.fieldbyname('id_venta').AsString;
form18.QRSubDetail1.DataSet:=modulo.busqueda;
form18.QRDBText1.DataSet:=modulo.busqueda;
form18.QRDBText2.DataSet:=modulo.busqueda;
form18.QRDBText3.DataSet:=modulo.busqueda;
form18.QRDBText4.DataSet:=modulo.busqueda;
form18.QRDBText5.DataSet:=modulo.busqueda;
form18.QRDBText6.DataSet:=modulo.busqueda;
form18.QRDBText1.DataField:='id_venta';
form18.QRDBText2.DataField:='fecha_venta';
form18.QRDBText3.DataField:='total_venta';
form18.QRDBText4.DataField:='descripcion';
form18.QRDBText5.DataField:='cantidad_vendida';
form18.QRDBText6.DataField:='precio_unitario';
form18.QuickRep1.Preview;
Como veras solo estoy probando las ventas del mes de mayo, tengo como 4 ventas, y solo me muestra la primera y en Detalle muestra los productos de todas las ventas
Gracias por tu paciencia amigo, espero sigas ayudandome