Ayuda con esta consulta

[jfbaez]

Utilizo SQL Server 2000 y Delphi 7

[*Caro*]

Hola jfbaez, para que te podamos ayudar mejor, sería bueno que pusieras tus tablas con los campos que entrarían en tu consulta y algunos datos que tienes y otra con el resultado que quieres obtener sobre esas tablas.

Saluditos

[jfbaez]

Gracias Caro por tu respuesta y sugerencia, mis tablas son como sigue:

Debitos: Numero, Codigo, Fecha, Tipo_Doc, monto, status, concepto.

Creditos: Numero, Codigo, Num_Debito, Fecha, Tipo_Doc, monto, Status, Concepto.

La mision es traer los datos de la tabla Debitos que correspondan a un codigo espesifico, y los montos deben ser presentados con los creditos ya restados que estan en la tabla Creditos si tiene registro en la tabla, el asunto esta, que con la consulta de arriba solo me trae los registros que tengan movimiento en las dos tablas, y me gustaria traer los debitos que no tiene todavia credito aplicado.

Trate de ser un poco mas explicito en lo que deseo, y gracias por su atencion.

[*Caro*]

Hola de nuevo jfbaez, ahora si te endiendo mejor, tienes que hacer una consulta con Left Join:

Código SQL [-]
Select D.Fecha, D.Tipo_Doc, D.Numero, D.Monto-C.Monto
From debitos D Left Join (Select Num_Debito, Sum(monto) as Monto 
                          From creditos Where Codigo='+Edit1.Text+' Group by Num_Debito) C
     On D.Numero=C.Num_Debito
Where D.Codigo='+Edit1.Text+' and D.Monto-C.Monto>0

Sin la última condición obtendras los debitos que no tienen ningún registro en la tabla creditos, pero si añades la última condición no tomará en cuenta esos registros porque te devolvera un valor nulo, para resolver eso puedes utilizar la función COALESCE y quedaría así:

Código SQL [-]
Select D.Fecha, D.Tipo_Doc, D.Numero, D.Monto-COALESCE(C.Monto, 0)
From Debitos D Left Join (Select Num_Debito, Sum(monto) as Monto
                          From Creditos 
                          Where Codigo='+Edit1.Text+' Group by Num_Debito) C
     On D.Numero=C.Num_Debito
Where D.Codigo='+Edit1.Text+' and D.Monto-COALESCE(C.Monto, 0)>0

Espero haberte entendido, si no es eso sigue aclarando.

Saluditos

[jfbaez]

Wow!!! ese estilo de consulta me gusto bastante y funciona a la perfeccion. Muchas gracias por resolver este episodio y por el tiempo dedicado. DTB