Ergebnis auf einen Datensatz reduzieren

[stifflersmom]

So wie ich das (ungetestet) sehe, könntest Du eigentlich auf den subselect verzichten und gleich ein SUM auf ABFPosMenge machen, musst halt nur ein group by hinzufügen.

[Uwe Raabe]

Um das mal zu konkretisieren (nur so hingeschrieben):

SQL-Code:

SELECT
    ABFDocAuftragNr,
    ABFPosArtNr,
    SUM(ABFPosMenge) AS TotalSum
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
ORDER BY ABFPosArtNr;

[HCB]

Hallo Danke, Super!
Jetzt wird es aber wesentlich komplexer mit zwei Tabellen:

1. ABFDok (da sind nur die Dokumente wie Auftrag, Lieferschein, Rechnung etc. gespeichert)

2. ABFPos (da sind die einzelenen Positionen des Auftrags, Lieferschein etc.)
Nun habe ich z.B. im Auftrag eine Bestellmenge eines Artikels von 12 St.

Anhand der ABFDocAuftragsID 106921 = ABFDocID brauche ich in der ABFPos unter der ABFPosDocId die bestellte Menge unter ABFPosMenge = 10St.
Jetzt suche ich alle gelieferten Artikel anhand des Lieferscheins ABFDocVisType = 2 mit der ABFDocID 107348 in ABFPos die gelieferte Menge = 1
Nun wurde aber nochmals eine Teilmenge geliefert, mit Lieferschein ABFDocVisType = 2 und der ABFDocID 1073347 in ABFPos die gelieferte Menge = 2

Da ich jetzt alles habe, soll mir die noch zu liefernde Menge angezeigt werden: 10 St aus Auftrag minus 1 St aus Lieferung1 minus 2 St. aus Lieferung2 also noch 7 st. zu liefern.

Mir brummt schon der Kopf! Beide Queries zu verbinden scheitert mangels Fachkenntissen.

Delphi-Quellcode:

SELECT
    ABFDocAuftragNr,
    ABFDocDatum,
    ABFDocKundeKurzbez,
    ABFDocSummeNetto_0,
    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 <> ''
order by ABFDocAuftragNr;

und wie von Uwe gepostet:

Delphi-Quellcode:

SELECT
    ABFDocAuftragNr,
    ABFPosArtNr,
    SUM(ABFPosMenge) AS TotalSum
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
ORDER BY ABFPosArtNr;

Anbei Screenshots.
Ich hoffe auf euere Hilfe.

LG Harry

[HCB]

Keine Ideen?
Hab es jetzt mal mit temp tabelle versucht, es werden die Mengen eines Artikel summiert. Leider funktioniert die anschließende Update-Anweisung nicht.
Sieht jemand von der Cracks woran es liegt?

Delphi-Quellcode:

 UPDATE Tmp_Results
SET TotalMenge = SubQuery.TotalMenge
FROM Tmp_Results
INNER JOIN (
    SELECT ABFPosArtNr, SUM(ABFPosMenge) AS TotalMenge
    FROM ABFDok
    INNER JOIN ABFPos ON ABFDok.ABFDocID = ABFPos.ABFPosdocID
    WHERE ABFDocOptFertig = 0 AND
          ABFDocVisType = 2 AND
          ABFPosEPreis > 0 AND
          ABFPosType IN (0, 7) AND
          ABFPosNr <> ''
    GROUP BY ABFPosArtNr
) AS SubQuery ON Tmp_Results.ABFPosArtNr = SubQuery.ABFPosArtNr;

LG Harry

[Jasocul]

Wir haben in vielen Bereichen heute einen Feiertag. Da ist im Forum meist nicht viel los. Morgen ist dann dementsprechend Brückentag
Nur mal auf die Schnelle:

Code:

select
    ABFDocAuftragNr,
    ABFDocDatum,
    ABFDocKundeKurzbez,
    ABFDocSummeNetto_0,
    ABFPosMenge as bestellt,
    ABFPosArtNr,
    ABFPosName1,
    (select sum(LIPos.ABFPosMenge) as LIMenge from ABFPos as LIPos where LIPos.ABFPosdocID = LI.ABFDocID) as geliefert
from ABFDok as AU
join ABFPos as AUPos
ON AU.ABFDocAuftragID = AUPos.ABFPosDocID
left outer join ABFDok as LI
on AU.ABFDocAuftragNr = LI.ABFDocAuftragNr
where AU.ABFDocOptFertig = false AND
    AU.ABFDocVisType = 1 AND
    AUPos.ABFPosEPreis > 0 AND
    AUPos.ABFPosType IN (0, 7) AND
    AUPos.ABFPosNr <> ''

Das ist völlig ungeprüft und ohne genaue hinzusehen.
Ob das in Access so funktioniert, weiß ich nicht und dein Update musst du dann gegebenenfalls selbst daraus erstellen.

[HCB]

Danke, läuft aber nicht.
Mit diesem hier läuft es einmal, wenn keine Tabelle vorhanden ist.

Delphi-Quellcode:

SELECT ABFPosArtNr, SUM(ABFPosMenge) AS TotalMenge
INTO Tmp_Results
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;

Beim 2. Aufruf meckert er dass die Tabelle bereits existiert. Es müsste dann ein Update Statement her, aber daran scheitert es das obige statt INTO Tmp_Results auf UPDATE umzustellen.

LG Harry

[Uwe Raabe]

Ohne konkrete Datenbank wird das schon schwierig, zumal ich mit MS Access schon ein halbes Leben lang nicht mehr arbeite. Trotzdem ein Versuch:

Code:

SELECT
    ABFDocAuftragNr,
    ABFDocDatum,
    ABFDocKundeKurzbez,
    ABFDocSummeNetto_0,
    ABFPosMenge as bestellt,
    ABFPosArtNr,
    ABFPosName1,
    (SELECT
       SUM(subPos.ABFPosMenge)
     FROM
       ABFDok subDok
     INNER JOIN
       ABFPos subPos ON subDok.ABFDocID = subPos.ABFPosdocID
     WHERE
       subDok.ABFDocAuftragNr = ABFDoc.ABFDocAuftragNr AND
       subPos.ABFPosArtNr = ABFPos.ABFPosArtNr AND
       subDok.ABFDocOptFertig = false AND
       subDok.ABFDocVisType = 2 AND
       subPos.ABFPosEPreis > 0 AND
       subPos.ABFPosType IN (0, 7) AND
       subPos.ABFPosNr <> ''
    ) AS geliefert
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 <> ''
order by ABFDocAuftragNr;

[Jasocul]

Zitat von HCB:

Danke, läuft aber nicht.

Das ist etwas wenig Info, um Fehler zu korrigieren.

Deine letzter Versuch kann nicht funktionieren, weil die Aufträge und Lieferscheine gemischt anzeigst, wenn ich es richtig sehe. Die Ergebnisse für Aufträge und Lieferscheine müssen getrennt werden.

Wie Uwe schon schrieb, ist das ohne konkrete DB etwas schwierig. Da Uwe und ich ähnliche Ansätze verfolgt haben, hier kurz die Idee, die dahinter steckt, damit du dich ohne unsere Hilfe weiter rantasten kannst:

• Erstmal alle betroffenen Aufträge mit Positionen selektieren
• im Subselect die Lieferscheine mit den Positionen passend zu den Auftragspositionen ermitteln
• Das Subselect darf nur die Summe der Mengen liefern

Den ersten Punkt kannst du sicher alleine hinbekommen. Das Problem ist also nur das Subselect.
Du musst mit Tabellenaliasen arbeiten, damit du die Bedingungen im Subselect sauber mit dem äußeren Select verknüpfen kannst.

Als ersten Ansatz kannst zu einem Ergebnis des Haupt-Selects erstmal eine weiteres Select erstellen, dass dann die richtigen Ergebnisse aus den Lieferscheinen liefert. Daran solltest du erkennen, welche Verknüpfungen im Subselect gesetzt werden müssen. Idealerweise testest du das mit einer Auftragsposition, die mehrere Teillieferungen hatte.

Hinweis am Rande:
Das Sum des Subselects kann NULL-Werte beinhalten. Keine Ahnung was Access damit macht, aber es kann dann sein, dass dort immer NULL rauskommt, sobald einer der Teilwerte NULL ist. Normalerweise habe DBs dafür eine Funktion, die ich aber für Access nicht kenne. Bei meiner DB muss ich Coalesce verwenden