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 Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.879 Beiträge
 
Delphi 13 Florence
 
#1

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 30. Mai 2024, 16:14
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;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
226 Beiträge
 
Delphi 12 Athens
 
#2

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 30. Mai 2024, 16:41
Danke Uwe. Bringt Fehler: 1 Parameter wurden erwartet, aber es wurden zu wenig Parameter übergeben.

LG Harry

Geändert von HCB (30. Mai 2024 um 17:10 Uhr)
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
226 Beiträge
 
Delphi 12 Athens
 
#3

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 07:44
Hi, also das mit den temp Tabellen habe ich wieder verworfen.
Habe es jetzt soweit mit einer SQL Abfrage probiert und bin nicht ganz zufrieden damit:
Delphi-Quellcode:
SELECT
    ABFDocAuftragNr,
    ABFPosArtNr,
    ABFPosMenge,
    ABFPosName1
FROM
    ABFDok
INNER JOIN
    ABFPos ON ABFPos.ABFPosAuftragID = ABFDok.ABFDocAuftragID
WHERE
    ABFDocOptFertig = false AND
    ABFDocVisType = 1 AND
    ABFPosType IN (0,7)
GROUP BY
    ABFDocAuftragNr,
    ABFPosMenge,
    ABFPosArtNr,
    ABFPosName1
ORDER BY
    ABFPosArtNr;
Es kommt folgendes Ergebnis zustande:

A023763 | 1119022 | 1
A023763 | 1119022 | 2
A023763 | 1119022 | 10

10 St. wurden bestellt, 1 St. geliefert und nochmals 2 St. geliefert.
Es müsste die Abfrage irgendwie umgestellt werden, dass nur die niedrigsten Zahlen 1 und 2 von der höchsten Zahl abgezogen werden. Damit ich sehen kann, 10 geliefert, 7 noch offen.
Ich habe es mit Max(ABFPosMenge) und Min(ABFPosMenge) schon probiert, bekomme aber keine Lösung damit.

Würde mir von Euch Profis etwas Hilfe geben?
Vielen Dank.

LG Harry
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.879 Beiträge
 
Delphi 13 Florence
 
#4

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 12:04
Bringt Fehler: 1 Parameter wurden erwartet, aber es wurden zu wenig Parameter übergeben.
Ich kann in meinem SQL zwar jetzt keinen Parameter entdecken, aber da ich mit Access eh schon ewig nichts mehr am Hut habe, bin ich da wohl auch nicht die richtige Adresse.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.610 Beiträge
 
Delphi 7 Professional
 
#5

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 12:13
Alles was Access nicht kennt, nennt es in der Fehlermeldung "Parameter", egal ob es nun ein Parameter ist oder nicht. Das ist zuweilen extrem irreführend.
  Mit Zitat antworten Zitat
Papaschlumpf73
Online

Registriert seit: 3. Mär 2014
Ort: Berlin
467 Beiträge
 
Delphi 12 Athens
 
#6

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 12:34
Probier mal ganz unten hinter der Klammer "as SubQuery" einzufügen:

ABFPosType in (0,7)
) as SubQuery
ORDER BY
ABFPosArtNr
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
226 Beiträge
 
Delphi 12 Athens
 
#7

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 14:54
Hallo und Danke an alle die mir helfen wollen.
Ich habe 2 Queries die genau das machen was sie sollen, nur müsste das in einer Abfrage untergebracht werden.
Die erste Abfrage holt mir alle offenen Aufträge mit ABFDocVisType = 1 und ABFPos ON ABFDok.ABFDocAuftragID = ABFPos.ABFPosDocID und bringt mir u.a. die bestellte Menge. OK.
Die zweite Abfrage bringt mir die bereits gelieferten Mengen mit Lieferschein ABFDocVisType = 2 und SUM(ABFPosMenge) AS Geliefert und ABFPos ON ABFDok.ABFDocID = ABFPos.ABFPosdocID.
Die Innerjoins sowie die ABFDocVisType sind unterschiedlich: 1 = Aufträge, 2 = Lieferschein, 3 = Rechnung etc.

Hier nochmal beide Abfragen:
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 hier die zweite:
Delphi-Quellcode:
SELECT
    ABFDocAuftragNr,
    ABFPosArtNr,
    SUM(ABFPosMenge) AS Geliefert
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;
Wahrscheinlich wird es noch deutlicher wenn man sich meine zuvor geposteten Screenshots ansieht.
Vielen lieben Dank nochmals für Eure Mühe.

LG Harry
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.879 Beiträge
 
Delphi 13 Florence
 
#8

AW: Ergebnis auf einen Datensatz reduzieren

  Alt 31. Mai 2024, 15:09
Im Prinzip habe ich auch nichts anderes gemacht als die beiden Abfragen zu kombinieren. Die erste Abfrage mit den "bestellt"-Werten habe ich um ein Feld "geliefert" ergänzt, dass durch ein Sub-Select realisiert wird. Offenbar gibt es aber bei Access ein Problem mit der verwendeten Syntax.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  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 07:24 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