Optimizacion de una Consulta

[algicor]

Tengo que realizar un informe, en que la información esta almacenada en varias tablas, en este caso en 3, Usuario, Usr_Cnt., Cuentas
El resultado del informe deberia ser el siguente

Mostrar un listado de los usuarios con las Cuentas que posee
Algo parecido a esto:

Paco - BBV
Paco - Banesto
Paco - Bancaja
Luis - Bancaja
Andres - BBV
Andres - CAM
Juan -Cam
Juan -BBV
Juan -Bancaja

Realizar una consulta que me devuelta estos datos, en sencillo, de echo, no es el problema, lo que quiero es q no aparezcan los nombre de los usuarios repetidos, y es lo que no se hacer, o mejor dicho, no se si se puede hacer con una solo consulta.
Para que muestre algo parecido a lo siguiente:
Paco -BBV
-Banesto
-Bancaja

Luis -Bancaja

Andres -BBV
-CAM

Juan -Cam
-BBV
-Bancaja

Una posible solución, la he encontrado haciendo 2 consultas, y realizando 2 bucles, la primera consulta recorre la tabla de Usuarios, y la segunda consulta, recorre las tabla de Usr_Cnt., Cuentas, con el indice del Usuario, para buscar coincidencias: el codigo seria algo parecido a esto


SQLUsuarios= "SELECT * FROM Usuario"
Set bd = bdconn.Execute(SQLUsuarios)
while (not bd.eof)
tmp_ IdUsuario =bd("IdUsuario ")
Response.write bdCuentas(“NombreUsuario”)

SqlCuentas = "SELECT * FROM Cuentas, Usr_Cnt WHERE Cuentas.IdCuenta= Usr_Cnt. IdCuenta AND Usr_Cnt. IdUsuario="&tmp_ IdUsuario &"
Set bdCuentas = bdconn.Execute(SqlCuentas)

while (not bdCuentas.eof)
Response.write bdCuentas(“NombreCuentas”)
Response.write “<br>”
bdCuentas.MoveNext()
wend


bd.MoveNext()
wend



La pregunta, despues de todo este rollo, es??

Como optimizar este informe???? Suponiendo, que el numero de Usuarios es muy alto, 5000, y en numero de cuentas alrededor de 1000, el coste de este algoritmo es altissimo!!,

[Andres95]

que herramientas de programacion estas utilizando?


VB ? VB.NET ? C# ?

has probado con XSLT ?

[JoseGCB]

prueba con esto

Código:

Sql = "SELECT    Usuario,idUs, usuario.nombreUsuario, Banco.NombreBanco
FROM         usuario INNER JOIN
                      CuentaUsu ON usuario.IdUs = CuentaUsu.IdUsu INNER JOIN
                      Banco ON CuentaUsu.Idbanco = Banco.IdCuenta
ORDER BY usuario.usuario

Set bd = bdconn.Execute(SQL) 
If Not bd.eof then
   tmp_ IdUsuario =bd("IdUsuario ")
   response.write (bb("NombreUsuario"))
else
   response.write(Mensaje_de_Error)
end if
while (not bd.eof) 
   if  tmp_IdUsuario = bd("IdUsuario") then
      response.write(bd("NombreBanco") & "<BR>" )
      bd.movenext
   else
      tmp_ IdUsuario =bd("IdUsuario ")
      response.write (bb("NombreUsuario"))
  end if
wend

Prueba a ver si te sirve si hay un error me disculpo pero esta es la idea
ya qye haces una sola consulta para todo el reporte y no una consulta por cada usuario

Saludos

[algicor]

En respuesta a Andres95, la base de datos esta en SQL SERVER, y el lenguaje con el que le atako es ASP

[algicor]

Gracias JoseGCB.
Por el momento tu solucion es la mas optima que he encontrado, los tiempos de ejecucion han bajado considerablemente, gracias de nuevo.
No se si habra alguna otra solucion mejor, o esta es la mas optima, pero seguire investigando....


Un saludo

[Dynk]

Si las tablas de la select son atacadas con concurrencia le añadería el With(NoLock) para que no hayan bloqueos:

Sql = "SELECT Usuario,idUs, usuario.nombreUsuario, Banco.NombreBanco
FROM usuario
With(NoLock)
INNER JOIN
CuentaUsu With(NoLock) ON usuario.IdUs = CuentaUsu.IdUsu INNER JOIN
Banco With(NoLock) ON CuentaUsu.Idbanco = Banco.IdCuenta
ORDER BY usuario.usuario

[algicor]

No entiendo muy bien, tu solucion, pero la estudiare con calma....
De todas modos, si me la puedes comentar, lo agradeceria...


Gracias

[Dynk]

Mirate esto:

http://msdn.microsoft.com/library/de...on_7a_1hf7.asp