Ver Mensaje Individual
  #1  
Antiguo 09-10-2007
JESUSNET JESUSNET is offline
Miembro
 
Registrado: ago 2007
Posts: 29
Reputación: 0
JESUSNET Va por buen camino
problemas con detalle/subdetalle en qreport

hola de nuevo tengo un problema al imprimir un reporte, ya he abanzado con lo que me han respondido en los foros pero tengo un nuevo problema es el siguiente:

tengo 2 tablas principalmente una se llama resultados_laboratorio y la otra detalles

la tabla detalles contiene codigoclasificacion que guarda relacion con la tabla clasificaciones y codigosubclasificacion relacionada con subclasifcaciones: si tengo en la tabla de detalles lo siguiente:

codresultado codigoclasificacion codigosubclasificacion resultado
1 1 1 normal
1 1 2 2mg
1 4 4 normal

lo que quiero es sacar las clasificaciones con sus subclasificaciones por separado hojas diferentes

por ejemplo en la primera hoja saldrisa

clasificacion :1
1 normal
2 2mg

en la siguinet hoja:

clasificacion: 4
4 normal

claro los codigos los sustituiria por sus resectivos nombres es solo para que tengan una idea

yo lo hice como me habian dicho en el foro pero me bota los datos asi

en una hoja
clasificacion 1:
1 normal
en la otra hoja
clasificacion 1:
2 2mg
y en la otra
clasificacion: 4
4 normal

como pueden notar me bota todos los registros de la tabla de detalle no me agrupa las subclasificaciones por sus respectivas clasificaciones necesito ayuda el codigo que estoy usando es este:

datamodule2.ADOQuery5.Close;
datamodule2.ADOQuery5.SQL.Clear;
datamodule2.ADOQuery5.SQL.Add('Select *from "resultados_emitidos","detalles_resultados_emitidos","pacientes","convenios","clasificaciones","serv icios"');
datamodule2.ADOQuery5.SQL.Add('where resultados_emitidos.codresultado =detalles_resultados_emitidos.codresultado');
datamodule2.ADOQuery5.SQL.Add('and resultados_emitidos.cedula_paciente=pacientes.cedula');
datamodule2.ADOQuery5.SQL.Add('and resultados_emitidos.codigo_convenio=convenios.codigo');
//datamodule2.ADOQuery5.SQL.Add('and detalles_resultados_emitidos.codigo_clasificacion=clasificaciones.codigo');
datamodule2.ADOQuery5.SQL.Add('and detalles_resultados_emitidos.codigo_subclasificacion=servicios.codigo');
datamodule2.ADOQuery5.SQL.Add('and servicios.codigo=detalles_resultados_emitidos.codigo_subclasificacion');
datamodule2.ADOQuery5.SQL.Add('and servicios.codigo_clasificacion=clasificaciones.codigo');
datamodule2.ADOQuery5.SQL.Add('and resultados_emitidos.codresultado = :codresultado');
bcodresultado:=dbedit1.text;
datamodule2.ADOQuery5.Parameters[0].Value := ''+bcodresultado+'';
datamodule2.ADOQuery5.Open;
frmcompositereport.QRCompositeReport1.Preview;

y en la banda detalle coloco el nombre de la clasificacion y en la subdetalle
coloco el nombre de la subclasificacion asi como su resultado
Responder Con Cita