Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   MySQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=21)
-   -   Agrupar registros dentro de un DBGrid (https://www.clubdelphi.com/foros/showthread.php?t=70481)

jjaen26 22-10-2010 23:49:46

Agrupar registros dentro de un DBGrid
 
Saludos

Si me pudieran ayudar de favor se los agradezco... me gustaria presentar en un DbGrid los datos agurpados... bueno tal vez agrupados no sea la palabra mas correcta digamos ordenados por algun dato y lo que me gustaria hacer sería no repetir los valores repetidos..(Por Valor me refiero a cualquier dato que se les ocurra Sucursales, puestos, personas, etc) solo para cuestiones de mejor presentacion y mejor visibilidad

Por ejemplo supongamos que tenemos un query que agrupa de la siguente manera
+----+-------+--------------+
| A | P01 | 1060000.00 |
| A | P04 | 567.89 |
| A | P05 | 530000.00 |
| A | P10 | 268000.00 |
| A | P15 | 67000.00 |
| A | P25 | 420000.00 |
| B | P01 | 155400.00 |
| B | P05 | 77700.00 |
| B | P10 | 39600.00 |
| B | P15 | 4460.16 |
+----+-------+--------------+

que nos quede asi

+----+-------+--------------+
| A | P01 | 1060000.00 |
| | P04 | 567.89 |
| | P05 | 530000.00 |
| | P10 | 268000.00 |
| | P15 | 67000.00 |
| | P25 | 420000.00 |
| B | P01 | 155400.00 |
| | P05 | 77700.00 |
| | P10 | 39600.00 |
| | P15 | 4460.16 |
+----+-------+--------------+


me gustaria que se viera asi..

Me podrian ayudar por favor?

Gracias de antemano y saludos



Actualmente utilizo MySQL con componentes Zeos y ZQuery (TDataSet y DBGrid estandar)

jjaen26 25-10-2010 01:34:40

Bueno por si a alguien le interesa, creo que estoy llegando a una solucion a nivel del diseño del query utilizando variables

Select
if (@MyDepto is not null,
if(Departamento is not null,
if(@MyDepto <> Departamento,
Concat(@MyDepto:=Departamento),
Concat(@MyDepto:="")
),
Concat(@MyDepto:="Total ","")
),
Concat(@MyDepto:=Departamento)
) as Depto,

if(Clave is not null,
if(@MyClave <> Clave,
Concat(@MyClave:=Clave),
Concat(@MyClave:="")
),
Concat(@MyClave:="Total Departamento","")
) as clave,
Sum(Importe)
From TMP_ConsultaNomina
Group by Departamento,Clave
With rollup

El punto es que para que funcione tengo que ejecutar el query dos veces, por esto de la inicializada de las variables

Saludos


La franja horaria es GMT +2. Ahora son las 17:05:21.

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