Access - Abfrage für Bücherstand

SELECT b.Titel,b.Untertitel,b.Autor,b.ISBN, b.Stück, 
e.EntlehnteStück, 
RetournierteStück,
EntlehnteStück-RetournierteStück as FehlendeStück
FROM (t_buecher AS b LEFT JOIN t_entlehnungen e ON b.BuchId = e.BuchId)
LEFT JOIN (  
SELECT r.EntlehnungsID, Sum(r.RetournierteStück) AS RetournierteStück
FROM t_retournierungen r
GROUP BY r.EntlehnungsID) as SumRetour
ON e.EntlehnungsID = SumRetour.EntlehnungsID;

SELECT b.Titel,b.Untertitel,b.Autor,b.ISBN, b.Stück, 
e.EntlehnteStück, 
RetournierteStück,
EntlehnteStück-RetournierteStück as FehlendeStück,
b.Stück-FehlendeStück as Soll
FROM (t_buecher AS b LEFT JOIN t_entlehnungen e ON b.BuchId = e.BuchId)
LEFT JOIN (  
SELECT r.EntlehnungsID, Sum(r.RetournierteStück) AS RetournierteStück
FROM t_retournierungen r
GROUP BY r.EntlehnungsID) as SumRetour
ON e.EntlehnungsID = SumRetour.EntlehnungsID;

Select * from ( 
select titel, untertitel , isbn, Sum( SummevonEntlehnteStück), 
Sum(SummevonRetour...), 
Sum(...alle folgenden num. Felder...)  from BücherJeEntlehnerID group by buchid)

SELECT b.buchid,b.Titel, b.Untertitel, b.Autor, b.ISBN, b.Stück, 
Sum(e.EntlehnteStück) AS SummevonEntlehnteStück, Sum(SumRetour.RetournierteStück) AS SummevonRetournierteStück, 
Sum(EntlehnteStück-RetournierteStück) AS FehlendeStück, 
[Stück]-([EntlehnteStück]-[RetournierteStück]) AS Soll
FROM t_buecher AS b LEFT JOIN (
t_entlehnungen AS e LEFT JOIN [
SELECT r.EntlehnungsID, Sum(r.RetournierteStück) AS RetournierteStück 
FROM t_retournierungen r
GROUP BY r.EntlehnungsID]. AS SumRetour 
ON e.EntlehnungsID = SumRetour.EntlehnungsID) ON b.BuchID = e.BuchID
WHERE ((([EntlehnteStück]-[RetournierteStück])>=1))
GROUP BY b.buchid;

SELECT e.EntlehnungsDatum, e.EntlehnungsID,e.Buchid,
 [L.Zuname] & " " & [l.Vorname] AS Entlehner,  
 b.Titel, b.Untertitel, b.ISBN,
 e.EntlehnteStück,
 iif(  r.RetSum is Null,  0, r.RetSum) AS SummevonRetournierteStück, 
[EntlehnteStück]-SummevonRetournierteStück AS FehlendeStück,
e.EntlehnungsAnmerkung
FROM ((t_entlehnungen AS e LEFT JOIN
 [Select entlehnungsid, sum(retournierteStück) as retSum  from  t_retournierungen  group by entlehnungsid ]. as r
 ON e.EntlehnungsID=r.[EntlehnungsID]) INNER JOIN t_buecher AS b 
ON b.buchid = e.buchid) INNER JOIN t_entlehner AS L 
ON L.entlehnerid = e.entlehnerid
ORDER BY e.EntlehnungsDatum DESC;

Select Titel, Untertitel, Autor, ISBN, Stück, EntlehnteStück, SummeVonretournierteStück,FehlendeStück, Soll
from a_13_biber_entlehnungen
order by buchid

SELECT first(b.buchid) as Buchid, first(b.titel) as Titel, first(b.Untertitel) as Untertitel ,first(b.Isbn) as ISBN, first(b.stück) as Stück, 
sum( iif(entlehnteStück is null,0, entlehnteStück)) as Entlehnt,
sum( SummeVonRetournierteStück) AS Retourniert, 
sum( FehlendeStück) AS Fehlende,
first(b.stück)-(sum( entlehnteStück)-sum( SummeVonRetournierteStück)) as Soll
FROM t_buecher b  left join   a_13_biber_entlehnungen as a13 on b.buchid=a13.buchid
group by a13.buchid

SELECT first(b.buchid) as Buchid, first(b.titel) as Titel, first(b.Untertitel) as Untertitel ,first(b.Isbn) as ISBN, first(b.stück) as Stück, 
sum( iif(entlehnteStück is null,0, entlehnteStück)) as Entlehnt,
sum( SummeVonRetournierteStück) AS Retourniert, 
sum( FehlendeStück) AS Fehlende,
first(b.stück)-(sum( entlehnteStück)-sum( SummeVonRetournierteStück)) as Soll
FROM t_buecher b  left join   a_13_biber_entlehnungen as a13 on b.buchid=a13.buchid
group by a13.buchid

union

SELECT
  Buchid, Titel, Untertitel ,ISBN, Stück, 
0 as Entlehnt,
0 AS Retourniert, 
0 AS Fehlende,
Stück as Soll
from t_buecher b
where b.buchid not in (select distinct e.buchid from t_entlehnungen e)

SELECT e.EntlehnungsDatum, e.EntlehnungsID,e.Buchid,
[L.Zuname] & " " & [l.Vorname] AS Entlehner,  
b.Titel, b.Untertitel, b.ISBN,
e.EntlehnteStück,
iif( r.RetSum is Null, 0, r.RetSum) AS SummevonRetournierteStück, 
[EntlehnteStück]-SummevonRetournierteStück AS FehlendeStück,
e.EntlehnungsAnmerkung
FROM ((t_entlehnungen AS e LEFT JOIN
[Select entlehnungsid, sum(retournierteStück) as retSum from t_retournierungen group by entlehnungsid ]. as r
ON e.EntlehnungsID=r.[EntlehnungsID]) INNER JOIN t_buecher AS b 
ON b.buchid = e.buchid) INNER JOIN t_entlehner AS L 
ON L.entlehnerid = e.entlehnerid
where(e.EntlehnteStück- iif( r.RetSum is Null, 0, r.RetSum)>0)
ORDER BY e.EntlehnungsDatum DESC;

Select * from AlleEntlehnungen where FehlendeStück > 0