Ayuda con esta consulta

[*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