Subtotal en consultas y reportes

[othaheguy]

Hola buen dia. Necesito hacer los siguiente:
Utiizo, Delphi 5 BD paradox
- Tengo un reporte con un corte de control por clientes, en el cual me muestra algo asi
COCA COLA
Pres. Nº2012 "refencia 1" 04/03/2010 $1000
Pres. Nº2002 "refencia 2" 04/02/2010 $1500
Pres. Nº2016 "refencia 3" 24/03/2010 $1800
TERSUAVE
Pres. Nº2013 "refencia 1" 04/03/2010 $1000
Pres. Nº2003 "refencia 3" 04/02/2010 $1500
Pres. Nº2015 "refencia 4" 24/03/2010 $1800
DISAl SA
Pres. Nº2012 "refencia 1" 04/03/2010 $1000
Pres. Nº2002 "refencia 3" 04/02/2010 $1500
Pres. Nº2016 "refencia 5" 24/03/2010 $1800
Necesito poder sumar cada cliente los presupuestos, eso por un lado, y a su vez poder ordenar de mayor a menor ese total
Y mostrando la misma informacion mas el TOTAL de mayor a menor.
Por lo tanto, pense en hacer una sonsulta ya con esta informacion, quedando algo asi:
Nº2012 COCA COLA "refencia 1" 04/03/2010 $1000
Nº2002 COCA COLA "refencia 2" 04/02/2010 $1500
Nº2016 COCA COLA "refencia 3" 24/03/2010 $1800
TOTAL $4300
obtener los 3 presup. + un registro casi en blanco con la suma de los presupuestos.
En oracle haria algo asi, pero aca no me lo toma.

SELECT p.codcli, p.codpresup, c.nomcli, p.referencia,p.fechapresup, p.importe
 FROM presupuestos p, clientes c
 WHERE p.codcli = c.codcli
UNION
SELECT p.codcli, 0 , '', 'TOTAL', NULL, SUM(p.importe)
 FROM presupuestos p, clientes c
 WHERE p.codcli = c.codcli
 GROUP BY p.codcli
ORDER BY 6 DESC

El 1º select me devolveria
1010 Nº2012 COCA COLA "refencia 1" 04/03/2010 $1000
1010 Nº2002 COCA COLA "refencia 2" 04/02/2010 $1500
1010 Nº2016 COCA COLA "refencia 3" 24/03/2010 $1800
Y el 2º
1010 0 '' 'TOTAL' $4300
Espero haber sido claro, gracias...

[Casimiro Notevi]

Por favor, utiliza las etiquetas [code ] tu código [/code ] para que se pueda leer, así es complicado, gracias
Aquí tienes una referencia

[othaheguy]

Disculpa, pero no entiendo que esta mal, lo hice en el bloc de notas, para que se puro texto. Si vos consultas este foro mi consulta, esta legible.
Gracias

[Casimiro Notevi]

Amigo othaheguy, quiero decir que debes poner el código fuente entre etiquetas para que quede así, de esta manera es más legible para todos.

SELECT p.codcli, p.codpresup, c.nomcli, p.referencia,p.fechapresup,  p.importe
 FROM presupuestos p, clientes c
 WHERE p.codcli = c.codcli
UNION
SELECT p.codcli, 0 , '', 'TOTAL', NULL, SUM(p.importe)
 FROM presupuestos p, clientes c
 WHERE p.codcli = c.codcli
 GROUP BY p.codcli
ORDER BY 6 DESC

Debes meter el código entre unas etiquetas
[code ]
tu código fuente
va aquí
[/code ]

[othaheguy]

Asi esta mejor?
Necesito hacer los siguiente:
Utiizo, Delphi 5 BD paradox
- Tengo un reporte con un corte de control por clientes, en el cual me muestra algo asi
COCA COLA
Pres. Nº2012 "refencia 1" 04/03/2010 $1000
Pres. Nº2002 "refencia 2" 04/02/2010 $1500
Pres. Nº2016 "refencia 3" 24/03/2010 $1800
TERSUAVE
Pres. Nº2013 "refencia 1" 04/03/2010 $1000
Pres. Nº2003 "refencia 3" 04/02/2010 $1500
Pres. Nº2015 "refencia 4" 24/03/2010 $1800
DISAl SA
Pres. Nº2012 "refencia 1" 04/03/2010 $1000
Pres. Nº2002 "refencia 3" 04/02/2010 $1500
Pres. Nº2016 "refencia 5" 24/03/2010 $1800
Necesito poder sumar cada cliente los presupuestos, eso por un lado, y a su vez poder ordenar de mayor a menor ese total
Y mostrando la misma informacion mas el TOTAL de mayor a menor.
Por lo tanto, pense en hacer una sonsulta ya con esta informacion, quedando algo asi:
Nº2012 COCA COLA "refencia 1" 04/03/2010 $1000
Nº2002 COCA COLA "refencia 2" 04/02/2010 $1500
Nº2016 COCA COLA "refencia 3" 24/03/2010 $1800
TOTAL $4300
obtener los 3 presup. + un registro casi en blanco con la suma de los presupuestos.
En oracle haria algo asi, pero aca no me lo toma.

SELECT p.codcli, p.codpresup, c.nomcli, p.referencia,p.fechapresup, p.importe
FROM presupuestos p, clientes c
WHERE p.codcli = c.codcli
UNION
SELECT p.codcli, 0 , '', 'TOTAL', NULL, SUM(p.importe)
FROM presupuestos p, clientes c
WHERE p.codcli = c.codcli
GROUP BY p.codcli
ORDER BY 6 DESC

El 1º select me devolveria
1010 Nº2012 COCA COLA "refencia 1" 04/03/2010 $1000
1010 Nº2002 COCA COLA "refencia 2" 04/02/2010 $1500
1010 Nº2016 COCA COLA "refencia 3" 24/03/2010 $1800
Y el 2º
1010 0 '' 'TOTAL' $4300
Espero haber sido claro, gracias...

[Casimiro Notevi]

Esas agrupaciones, sumas, subtotales, etc. deben permitirlas hacer el generador de informes que uses, ¿cuál es?

[othaheguy]

El Qreport que viene con delphi 5, es lo mas standard, otro no he utilizado. Me recomendas que vea algun otro??
Hay una funcion que hacia una suma por grupo, pero no me ordenaba, eso lo tengo que enviar de antes, por eso la consulta.

[Casimiro Notevi]

No lo he usado, pero seguro que sirve para lo que quieres.
Evidentemente, si los quieres ordenados, tendrás que ordenarlo tú o usar alguna opción que tenga el informe para hacerlo.
Supongo que qreport, al igual que todos, vendrá con ejemplos que pueden servirte de referencia.

[othaheguy]

Pero mi problema es el SELECT, como se haria ese en Delphi??

[othaheguy]

Hola, lo solucione creando una tabla con los totales y despues la relacione a la tabla con todos los datos. Por ahora esta resuelto. pero queda esa duda.
Gracias

[[fjcg02]]

QReport tiene las QRExpr, que permiten realizar calculos. Sumas, medias, etc del campo que quieras.
Tendrás que incluir una banda de subtotales en la que incluyas una QRExpr con la función que quieras. En esa misma banda se especifica qué campo hace que se visualice la banda y si se pone a cero el valor.

Para el total de todos los presupuestos puedes poner otro QRExpr en la misma banda sin que se resetee cuando cambie de valor el campo o puedes añadir otra banda tipo report footer con un campo QRExpr.

En los ejemplos creo que vienen casos bastante completos.

Para la ordenación, simplemente ordena el dataset que origina el informe por los campos que quieras y ya está ( cliente e importe imagino ).

Yo no uso ese tipo de bandas, por lo que no puedo darte demasiados detalles.

Saludos