Ergebnis auf einen Datensatz reduzieren

[Delphi.Narium]

Klappt das?

SQL-Code:

select
    ABFDocAuftragNr,
    ABFDocDatum,
    ABFDocKundeKurzbez,
    ABFDocSummeNetto_0,
    Sum(Geliefert) as Geliefert,
    Sum(Bestellt) as Bestellt,
    ABFPosArtNr,
    ABFPosName1
from
(
  SELECT
      ABFDocAuftragNr,
      ABFDocDatum,
      ABFDocKundeKurzbez,
      ABFDocSummeNetto_0,
      0 as Geliefert,
      ABFPosMenge as Bestellt,
      ABFPosArtNr,
      ABFPosName1
  FROM
      ABFDok
  INNER JOIN
      ABFPos ON ABFDok.ABFDocAuftragID = ABFPos.ABFPosDocID
  WHERE
      ABFDocOptFertig = false AND
      ABFDocVisType = 1 AND
      ABFPosEPreis > 0 AND
      ABFPosType IN (0, 7) AND
      ABFPosNr <> ''
  union all
  SELECT
      ABFDocAuftragNr,
      ABFDocDatum,
      ABFDocKundeKurzbez,
      ABFDocSummeNetto_0,
      0 as Geliefert,
      Sum(ABFPosMenge) as Bestellt,
      ABFPosArtNr,
      ABFPosName1
  FROM
      ABFDok
  INNER JOIN
      ABFPos ON ABFDok.ABFDocID = ABFPos.ABFPosdocID
  WHERE
      ABFDocOptFertig = false AND
      ABFDocVisType = 2 AND
      ABFPosEPreis > 0 AND
      ABFPosType IN (0, 7) AND
      ABFPosNr <> ''
  GROUP BY 
    ABFPosArtNr, 
    ABFDocAuftragNr
) a
group by
    ABFDocAuftragNr,
    ABFDocDatum,
    ABFDocKundeKurzbez,
    ABFDocSummeNetto_0,
    ABFPosArtNr,
    ABFPosName1
ORDER BY 
  ABFPosArtNr;