AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Ergebnis auf einen Datensatz reduzieren
Thema durchsuchen
Ansicht
Themen-Optionen

Ergebnis auf einen Datensatz reduzieren

Ein Thema von HCB · begonnen am 29. Mai 2024 · letzter Beitrag vom 31. Mai 2024
Antwort Antwort
Benutzerbild von Jasocul
Jasocul

Registriert seit: 22. Sep 2004
Ort: Delmenhorst
1.375 Beiträge
 
Delphi 11 Alexandria
 
#1

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 07:55
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
Peter
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.600 Beiträge
 
Delphi 7 Professional
 
#2

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 09:58
Da ich keine Ahnung habe, woran ich "Bestellt" und "Geliefert" unterscheiden soll, hab' ich mal ein bisserl geraten (keine Ahnung ob Access das kann und ohne Datenmodell und passende DB nur Spekulatius ).
SQL-Code:
SELECT
    ABFDocAuftragNr,
    ABFPosArtNr,
    Bestellt,
    Geliefert,
    Bestellt - Geliefert as Offen,
    ABFPosName1
FROM (
  SELECT
      ABFDocAuftragNr,
      ABFPosArtNr,
      case when ABFPosType = 0 then ABFPosMenge else 0 end as Bestellt,
      case when ABFPosType = 7 then 0 else ABFPosMenge end as Geliefert,
      ABFPosName1
  FROM
      ABFDok
  INNER JOIN
      ABFPos ON ABFPos.ABFPosAuftragID = ABFDok.ABFDocAuftragID
  WHERE
      ABFDocOptFertig = false AND
      ABFDocVisType = 1 AND
      ABFPosType in (0,7)
)
ORDER BY
    ABFPosArtNr
Was ich nicht verstehe: Wofür war in dem nicht so ganz korrekt funktionierenden SQL das Group by? Um irgendwelche uminösen Dubletten zu eliminieren? Eigentlich benötig man es bei Aggregatfunktionen, da es davon aber keine im SQL gibt, erscheint mir das irgendwie nicht plausibel. Wenn da keine unerwünschten Nebeneffekte auftreten, ist das eher Zufall.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:37 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz