Un reporte impreso con Imaginacion!!

[nelostanley]

Hola Gente,

Aqui de nuevo pellizcando la paciencia .... Estoy con reporte tipo cartesiano.

Producto vs Almacen (Sus origenes son dataset).

CODIGO ALMACEN-1 ALMACEN-2 ALMACEN-N
PRA 3 4
PRB 2 3
PRC 1
------------------------------------------------------------
TOTALES ...: 3 2 8


Nose de un componente que pueda hacer eso , pero lo hice asi; utilizar un grid y con algunos algoritmos llenar dicho grid, y hacer el calculo de los totales.

Pero bueno ... trabajoso ... pero hay que hacerlo.... ahora estoy en la fatiga de pasarlo a un reporte (QREPORT) es mi preferido .... pero solo se me ocurre lo sgte:

Cargar los datos del GRID a un Memo y llevarlo al QReport, pero con la tabulacion del Memo con los datos del grid me esta desanimando.


Entonces pregunto ..... que me recomendarian en este caso, podria existir un metodo mucho mas practico?, algun componente ? .....


De antemano muchas gracias.

[droguerman]

Este tipo de consultas son llamadas de cross table (tabla cruzada), en fastreport existe un componente para eso, no recuerdo si hay uno asi en QReport. El camino dificil es hacerlo via SQL, creando varios SELECT por separado o en subconsultas para ser unidos en uno final.

[[Lepe]]

¿Con qué base de datos trabajamos?

Si es con firebird o similar... sin problemas, se hace un Store procedure y marchando a quickreport (derechito y por la sombra).

Si hablamos de tablas planas, paradox y eso..... torcido y por el sol

Saludos

[nelostanley]

Utilizo MYSQL, pero gracias lepe me intriga eso de STORE PROCEDURE nose me vino a la cabeza, quizas un ejempplillo de arranque te lo agradeceria.

Uso SP en inserciones y actualizaciones pero en Reportes .... changos ... ni lo pense.

Saluditos

[[Lepe]]

Antes de mirar este ejemplo, busca información en mysql sobre "transform", "pivot", "decision cube", puede que ya tengas implementado lo que quieres hacer.

Aquí tienes un ejemplo

year, q1, q2, q3... serían el código y los almacenes, es decir, los parámetros de salida del SP. Como en un folio solo te cabrá 10 o 12 almacenes, tendrías 12 parámetros de salida en el SP.

saludos

[nelostanley]

Gracias por el Ejm Lepe, me quedo con el Ejm del Quarter y con este ejemplito casi soy feliz ....

Código Delphi [-]

Consulta.SQL.Add( 'select campoA ');
n:= 1;
Consulta_de_campos.Open;
while not Consulta_de_campos.eof
begin
Consulta.SQL.Add( ', SUM(CASE Quarter WHEN '+Quotedstr(Consulta_de_campos.Fields[0].AsString)+' THEN COL'+inntostr(n)+' ELSE 0 END) AS COL'+inttosr(n));
  Consulta_de_campos.next;
  n++;
end
Consulta.SQL.Add( ' from tabla group by campoA')

Pero para terminar de resolver me falta un conocimient0 para mi avanzado que resalta mi duda .... aunque sigo bregando no puedo resolver......

Haber ....

Con el ejemplo anterior resuelve parte mi duda genera un reporte cartesiano NxM sin problema .... no conosco los M ni los N ya que la consulta los genera.

Todo esto meto en un DataSet vacio pero nose cargar los campos dinamicamente en el dataset es decir (DataSet1CampoA.value , DataSet1CampoB ....DataSet1CampoN.value), teniendo esto asi mandarlo al reporte es lo de menos.


Nose si pude explicarlo pero por le momento mi camino esta trabao.