Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Max(Datum) Min(Datum) (https://www.delphipraxis.net/174359-max-datum-min-datum.html)

Metallicwar 18. Apr 2013 16:29

Datenbank: ADS • Version: 10 • Zugriff über: Delphi

Max(Datum) Min(Datum)
 
Moin,
habe folgenden Datenbestand:
Code:
ID--Datum--Buchungsart--Buchung1--Buchung2
1--01.04.13--A--07:00--16:00
2--01.04.13--P--11:00--11:30
3--01.04.13--A--17:00--20:00
4--01.04.13--P--18:00--18:30
Ich möchte mir aber nur die früheste Kommen und die letzte Gehen Buchung zusammenfassen.
Buchungen der Buchungsart P Sollen nicht berücksichtigt werden.
Folgendes soll rauskommen:
Code:
A: 07:00 - 18:30
P: 11:00 - 11:30
P: 18:00 - 18:30
Kann mir bitte jemand einen Tipp geben.
Über min(Buchung1) und max(Buchung2) hab ich's schon probiert, aber dann fasst er auch die P Buchugnen zusammen.
Und über
Delphi-Quellcode:
IIF(b.BuchungsArt = 'A', min(Buchung1), Buchung1) as Buchung1,
IIF(b.BuchungsArt = 'A', max(Buchung2), Buchung2) as Buchung2,
hab ich probleme mit dem group by ..

sx2008 18. Apr 2013 16:48

AW: Max(Datum) Min(Datum)
 
Also du musst wohl nach Datum und Buchungsart gruppieren und die Buchungsarten getrennt behandeln:
SQL-Code:
(SELECT Datum, Buchungsart, Min(buchung1) as Startzeit, Max(buchungs2) as Endzeit FROM Buchungstabelle
WHERE Buchungsart = 'A'
GROUP BY Datum, Buchungsart)

UNION ALL

SELECT Datum, Buchungsart, buchung1 as Startzeit, buchungs2 as Endzeit FROM Buchungstabelle
WHERE Buchungsart <> 'A'
Falls diese Abfrage läuft, kann man die gesamte Datenmenge auch noch nach Datum sortieren.

Metallicwar 19. Apr 2013 07:23

AW: Max(Datum) Min(Datum)
 
Super, genau das hab ich gebraucht.
Jetzt muss ich das ganze nur noch in meinen bestehenden SQL einbauen.
Besten Dank, falls noch Fragen sein sollten melde ich mich nochmal.

MfG

Metallicwar 2. Mai 2013 12:50

AW: Max(Datum) Min(Datum)
 
Hi,
nochmal ne Frage zu meinem SQL.
Hab das UNION SELECT eingebaut.
Kann man den SQL noch kürzen und perfomanter machen:
Code:
SELECT ma_s.ID, ma_s.Personalnummer as Personalnr, ma_s.Nachname as Name,
ma_s.Vorname, bd.Datum, bd.Kuerzel, bd.Feiertag, a.Bezeichnung,
IIF(be.Pause = 0, null, ZMIF.MinToHour(be.Pause)) AS PauseH,
ZMIF.MinToIHour(be.Pause) as PauseIH, IIF(be.Tagesbrutto = 0, null,
ZMIF.MinToHour(be.Tagesbrutto)) AS TagesbruttoH,
ZMIF.MinToIHour(be.Tagesbrutto) as TagesbruttoIH, IIF(be.Mehrarbeit = 0, null,
ZMIF.MinToHour(be.Mehrarbeit)) AS MehrarbeitH,
ZMIF.MinToIHour(be.Mehrarbeit) as MehrarbeitIH, b.BuchungsArt,
min(b.Me1) as Me1, max(b.Me2) as Me2, b.Flag
FROM MA_Stammdaten ma_s
LEFT OUTER JOIN Abteilungen a ON  ma_s.ID_Abteilungen = a.ID
LEFT OUTER JOIN Buchungsdatei bd ON    ma_s.ID = bd.ID_MA_Stammdaten
LEFT OUTER JOIN Buchungen b ON    bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
AND    bd.Datum = b.Datum
LEFT OUTER JOIN FEHLTAGEDEFINITION ftd ON    bd.Fehltag = ftd.Kuerzel
LEFT OUTER JOIN B_Ergebnisse be ON     bd.ID = be.ID_Buchungsdatei
WHERE ma_s.ID IN (3) and Month(bd.Datum) = 2 and Year(bd.Datum) = 2013 
GROUP BY 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,18
UNION ALL
SELECT ma_s.ID, ma_s.Personalnummer as Personalnr, ma_s.Nachname as Name,
ma_s.Vorname, bd.Datum, bd.Kuerzel, bd.Feiertag, a.Bezeichnung,
IIF(be.Pause = 0, null, ZMIF.MinToHour(be.Pause)) AS PauseH,
ZMIF.MinToIHour(be.Pause) as PauseIH, IIF(be.Tagesbrutto = 0, null,
ZMIF.MinToHour(be.Tagesbrutto)) AS TagesbruttoH,
ZMIF.MinToIHour(be.Tagesbrutto) as TagesbruttoIH, IIF(be.Mehrarbeit = 0, null,
ZMIF.MinToHour(be.Mehrarbeit)) AS MehrarbeitH,
ZMIF.MinToIHour(be.Mehrarbeit) as MehrarbeitIH, b.BuchungsArt,
b.Me1 as Me1, b.Me2 as Me2, b.Flag
FROM MA_Stammdaten ma_s
LEFT OUTER JOIN Abteilungen a ON  ma_s.ID_Abteilungen = a.ID
LEFT OUTER JOIN Buchungsdatei bd ON    ma_s.ID = bd.ID_MA_Stammdaten
LEFT OUTER JOIN Buchungen b ON    bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
AND    bd.Datum = b.Datum
LEFT OUTER JOIN FEHLTAGEDEFINITION ftd ON    bd.Fehltag = ftd.Kuerzel
LEFT OUTER JOIN B_Ergebnisse be ON     bd.ID = be.ID_Buchungsdatei
WHERE ma_s.ID IN (3) and Month(bd.Datum) = 2 and Year(bd.Datum) = 2013 
ORDER By ma_s.ID

jobo 2. Mai 2013 13:21

AW: Max(Datum) Min(Datum)
 
Man kann es kann es zunächst netter formatieren, dann stirbt man nicht so schnell an Augenkrebs.

Code:
SELECT ma_s.ID, ma_s.Personalnummer as Personalnr, ma_s.Nachname as Name,
       ma_s.Vorname, bd.Datum, bd.Kuerzel, bd.Feiertag, a.Bezeichnung,
       IIF(be.Pause = 0, null, ZMIF.MinToHour(be.Pause)) AS PauseH,
       ZMIF.MinToIHour(be.Pause) as PauseIH,
       IIF(be.Tagesbrutto = 0, null, ZMIF.MinToHour(be.Tagesbrutto)) AS TagesbruttoH,
       ZMIF.MinToIHour(be.Tagesbrutto) as TagesbruttoIH,
       IIF(be.Mehrarbeit = 0, null, ZMIF.MinToHour(be.Mehrarbeit)) AS MehrarbeitH,
       ZMIF.MinToIHour(be.Mehrarbeit) as MehrarbeitIH, b.BuchungsArt,
       min(b.Me1) as Me1, max(b.Me2) as Me2, b.Flag
  FROM MA_Stammdaten ma_s
  LEFT OUTER JOIN Abteilungen a
    ON ma_s.ID_Abteilungen = a.ID
  LEFT OUTER JOIN Buchungsdatei bd
    ON ma_s.ID = bd.ID_MA_Stammdaten
  LEFT OUTER JOIN Buchungen b
    ON bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
   AND bd.Datum = b.Datum
  LEFT OUTER JOIN FEHLTAGEDEFINITION ftd
    ON bd.Fehltag = ftd.Kuerzel
  LEFT OUTER JOIN B_Ergebnisse be
    ON bd.ID = be.ID_Buchungsdatei
 WHERE ma_s.ID IN (3)
   and Month(bd.Datum) = 2
   and Year(bd.Datum) = 2013
 GROUP BY 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 18
UNION ALL
SELECT ma_s.ID, ma_s.Personalnummer as Personalnr, ma_s.Nachname as Name,
       ma_s.Vorname, bd.Datum, bd.Kuerzel, bd.Feiertag, a.Bezeichnung,
       IIF(be.Pause = 0, null, ZMIF.MinToHour(be.Pause)) AS PauseH,
       ZMIF.MinToIHour(be.Pause) as PauseIH,
       IIF(be.Tagesbrutto = 0, null, ZMIF.MinToHour(be.Tagesbrutto)) AS TagesbruttoH,
       ZMIF.MinToIHour(be.Tagesbrutto) as TagesbruttoIH,
       IIF(be.Mehrarbeit = 0, null, ZMIF.MinToHour(be.Mehrarbeit)) AS MehrarbeitH,
       ZMIF.MinToIHour(be.Mehrarbeit) as MehrarbeitIH, b.BuchungsArt,
       b.Me1 as Me1, b.Me2 as Me2, b.Flag
  FROM MA_Stammdaten ma_s
  LEFT OUTER JOIN Abteilungen a
    ON ma_s.ID_Abteilungen = a.ID
  LEFT OUTER JOIN Buchungsdatei bd
    ON ma_s.ID = bd.ID_MA_Stammdaten
  LEFT OUTER JOIN Buchungen b
    ON bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
   AND bd.Datum = b.Datum
  LEFT OUTER JOIN FEHLTAGEDEFINITION ftd
    ON bd.Fehltag = ftd.Kuerzel
  LEFT OUTER JOIN B_Ergebnisse be
    ON bd.ID = be.ID_Buchungsdatei
 WHERE ma_s.ID IN (3)
   and Month(bd.Datum) = 2
   and Year(bd.Datum) = 2013
 ORDER By ma_s.ID

Ich kenne mich mit ADS nicht aus, aber die üblichen Verdächtigen wären:
Das "in (3)" vielleicht durch = 3 ersetzen,
Die Year und Month Funktion ersetzen durch eine gleichwertige Bereichsabfrage:
Code:
 .."bd.datum" >= NiedrigsterDatumsWert
and .."bd.datum" <= HöchsterDatumsWert
oder between
Die Funktionen vermiesen wahrscheinlich den Indexzugriff auf das Datumsfeld (sofern hier Indizierung gegeben ist)

Generell hilft hier systematisch nur, den Ausführungsplan ausgeben zu lassen. Das RDBMS selbst weiß meist am besten, was es tut.

Metallicwar 3. Mai 2013 08:54

AW: Max(Datum) Min(Datum)
 
Hi jobo,
die ma_s.ID IN (3) kann ich nicht durch = ersetzen, da es auch sein kann, dass ich durch eine Funktion mehrere ID's bekommen, daher muss ich das ganze über IN lösen.
Das mit dem Datum werd ich umbauen.
Jetzt steh ich aber vor einem anderen Problem, vll kann mir da jmd helfen ...
Momentan werden in meiner Ergebnismenge nur Tage angezeigt, wo der Mitarbeiter eine Buchung hat.
Tabelle Buchungsdatei: Enthält für jeden Tag einen Eintrag
Tabelle Buchungen: Enthält nur Einträge an denen der MA gebucht hat.

Ich joine ja die Tabelle Buchugnen auf die Buchungsdatei und verknüpf sie über die ID des MA's als auch über das Datum. Liegt das Problem hier?

jobo 3. Mai 2013 10:20

AW: Max(Datum) Min(Datum)
 
Du arbeitest ausschließlich mit Outer Joins.
In Deinem Statement musst Du aber dafür sorgen, dass die Tabelle mit allen Tagen (Buchungsdatei) vollständig dargestellt wird -sozusagen als Master- und nicht schon durch vorgelagerte Outer joins gesiebt wird.
Dazu würde ich evtl. die Tabelle Buchungsdatei als Kerntabelle wählen und davon ausgehend die restlichen Subtabellen je nach Bedarf mit Full oder Outer Joins angliedern.

Olli73 3. Mai 2013 11:04

AW: Max(Datum) Min(Datum)
 
Versuch mal statt:
Code:
  FROM MA_Stammdaten ma_s
  LEFT OUTER JOIN Abteilungen a
    ON ma_s.ID_Abteilungen = a.ID
  LEFT OUTER JOIN Buchungsdatei bd
    ON ma_s.ID = bd.ID_MA_Stammdaten
  LEFT OUTER JOIN Buchungen b
    ON bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
   AND bd.Datum = b.Datum
  LEFT OUTER JOIN FEHLTAGEDEFINITION ftd
    ON bd.Fehltag = ftd.Kuerzel
  LEFT OUTER JOIN B_Ergebnisse be
    ON bd.ID = be.ID_Buchungsdatei
das hier:
Code:
  FROM MA_Stammdaten ma_s
  LEFT OUTER JOIN Abteilungen a
    ON ma_s.ID_Abteilungen = a.ID
  LEFT OUTER JOIN Buchungsdatei bd
       LEFT OUTER JOIN Buchungen b
         ON bd.ID_MA_Stammdaten = b.ID_MA_Stammdaten
        AND bd.Datum = b.Datum
       LEFT OUTER JOIN FEHLTAGEDEFINITION ftd
         ON bd.Fehltag = ftd.Kuerzel
       LEFT OUTER JOIN B_Ergebnisse be
         ON bd.ID = be.ID_Buchungsdatei
    ON ma_s.ID = bd.ID_MA_Stammdaten
Ist aber ungetestet!

p80286 3. Mai 2013 11:54

AW: Max(Datum) Min(Datum)
 
Zitat:

Zitat von jobo (Beitrag 1213825)
Ich kenne mich mit ADS nicht aus, aber die üblichen Verdächtigen wären:
Das "in (3)" vielleicht durch = 3 ersetzen,
Die Year und Month Funktion ersetzen durch eine gleichwertige Bereichsabfrage:
Code:
 .."bd.datum" >= NiedrigsterDatumsWert
and .."bd.datum" <= HöchsterDatumsWert

Eine weitere Möglichkeit wäre u.U
Code:
...
and to_char(bd.Datum,'YYYYMM')='201302'
...
kommt aber wie schon gesagt auf deine DB an.

Gruß
K-H

jobo 3. Mai 2013 13:17

AW: Max(Datum) Min(Datum)
 
to_char und jede andere Funktion über einem Datenbankfeld in einer Where-Clause würde aber die Indexverwendung verhindern, sofern kein Funktion-Index (oder vergleichbare Verfahren anderer Systeme) extra dafür angelegt wurde.
Im Prinzip nicht schlimm, erst Recht wenn dort eh kein Index definiert ist oder dieser aus anderen Gründen nicht greift bzw irrelevant ist.
Da es sich rein namentlich aber um große Kerntabellen zu handeln scheint und Performance gefragt war, sollte man sowas vermeiden.
Wie gesagt, keine Ahnung, was ADS da tolles zu bieten hat, aber die Problematik ist grundlegend und dürfte herstellerunabhängig gelten.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:08 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz