cai
12-06-2005, 12:50:03
Al intentar listar una seleccion de valores a través de varios QrdbText que tengo asociados a través del DataSet a un TAdoQuery solo se me muestra un valor repetido tantas veces como valores diferentes deberia de devolver la consulta, es decir:
Nombre 1ºApellido 2ºApellido Cantidad Tipo Seccion Fecha
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
(asi hasta 11 veces)
Cuando ejecuto la accion para listar tengo este código:
procedure TForm1.Listar_CopiasExecute(Sender: TObject);
begin
Tabla_Copias.Open;
Application.CreateForm(TFrm_Copias, Frm_Copias);
ADOQuery1.Prepared;
ADOQuery1.Open;
Frm_Copias.QuickRep1.Preview;
Frm_Copias.Free;
Tabla_Copias.Close;
end;
y la consulta Sql que le tengo al AdoQuery es la siguiente:
Select P.Nombre, P.Apel1, P.Apel2, C.Cantidad, C.Tipo, S.Nombre,C.Fecha
From Profesores as P, Copias as C, Seccion as S
Where P.Cod_Profesor=C.Cod_Profesor and C.Cod_Seccion=S.Cod_Seccion
Order by C.Fecha Desc
además quería que me agrupase por nombre y apellidos, pero si intento poner la siguiente clausula:
Group by P.Nombre, P.Apel1, P.Apel2
me dice que no puedo hacer eso sin agrupar tambien los demás valores del select.
Cuando creo la sentencia SQL estoy trabajando directamente con el nombre de las tablas que tengo en la base de datos, no creo ningun ADOTable puesto que creo que la SQL trabaja directamente sobre las tablas de la BD.
Nombre 1ºApellido 2ºApellido Cantidad Tipo Seccion Fecha
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
Antonio Romero Garcia 12 A2 Primaria 12/6/2005
(asi hasta 11 veces)
Cuando ejecuto la accion para listar tengo este código:
procedure TForm1.Listar_CopiasExecute(Sender: TObject);
begin
Tabla_Copias.Open;
Application.CreateForm(TFrm_Copias, Frm_Copias);
ADOQuery1.Prepared;
ADOQuery1.Open;
Frm_Copias.QuickRep1.Preview;
Frm_Copias.Free;
Tabla_Copias.Close;
end;
y la consulta Sql que le tengo al AdoQuery es la siguiente:
Select P.Nombre, P.Apel1, P.Apel2, C.Cantidad, C.Tipo, S.Nombre,C.Fecha
From Profesores as P, Copias as C, Seccion as S
Where P.Cod_Profesor=C.Cod_Profesor and C.Cod_Seccion=S.Cod_Seccion
Order by C.Fecha Desc
además quería que me agrupase por nombre y apellidos, pero si intento poner la siguiente clausula:
Group by P.Nombre, P.Apel1, P.Apel2
me dice que no puedo hacer eso sin agrupar tambien los demás valores del select.
Cuando creo la sentencia SQL estoy trabajando directamente con el nombre de las tablas que tengo en la base de datos, no creo ningun ADOTable puesto que creo que la SQL trabaja directamente sobre las tablas de la BD.