SQl Abfrage sehr langsam

[tkhandel]

Hallo
ich habe eine SQL-Abfrage die im Client ausgeführt wird, und sehr langsam ist.
Wahrscheinlich wäre ja eine Storedprocedure viel schneller ich kriege es aber
einfach nicht hin.

Hat jemand einen TIP wie ich diese Abfrage, die mehrere Summen verschiedener Spalten
aus einer Tabelle abfragen soll, verbessern könnte:

Select
FahrerNr, b.Name,

(Select Sum(VKBG)
from Tagesumsatz x
where x.FahrerNr = TU.FahrerNr
and cast(Datum as Date) = :EingabeDatum) as Umsatz,

(Select Sum(VKBG)
from Tagesumsatz x
where x.FahrerNr = TU.FahrerNr
and cast(Datum as Date) = :EingabeDatum and Zahlart = 1) as Bar,

(Select Sum(VKBG)
from Tagesumsatz x
where x.FahrerNr = TU.FahrerNr
and cast(Datum as Date) = :EingabeDatum and Zahlart = 3) as Karte,

(Select Sum(VKBG)
from Tagesumsatz x
where x.FahrerNr = TU.FahrerNr
and cast(Datum as Date) = :EingabeDatum and Zahlart = 2) as LS

from Tagesumsatz TU left join Fahrer b on b.Nr = tu.FahrerNr

Group by FahrerNr, Name

[gubbe]

Als erstes würde ich mir anschauen, ob auf die relevanten Spalten aus dem Join und den Where-Bedingungen ein index gesetzt ist. Ist das der Fall oder hast Du darauf einen Einfluß?

[Delphi.Narium]

Meinst Du sinngemäß sowas?

SQL-Code:

select -- Zuletzt die Summen je FahrerNr bilden
  FahrerNr, 
  b.Name,
  Sum(Umsatz) as Umsatz,
  Sum(Bar) as Bar,
  Sum(Karte) as Karte,
  Sum(LS) as LS
from (
  select -- FahrerNr, Name und Umsatz nach Zahlart separieren
    FahrerNr, 
    b.Name,
    VKBG as Umsatz,
    case when Zahlart = 1 then VKBG else 0 end as Bar,
    case when Zahlart = 3 then VKBG else 0 end as Karte,
    case when Zahlart = 2 then VKBG else 0 end as LS
  from (
    select -- uns interessieren nur die Daten zum EingabeDatum
      FahrerNr,
      VKBG
    from Tagesumsatz 
    where cast(Datum as Date) = :EingabeDatum
  ) TU  
  -- nur die Fahrerdaten zum EingabeDatum dazu holen,
  -- anstatt zuerst alle Fahrerdaten zu beliebigem Datum zusammensuchen
  -- und dann erst die zum EingabeDatum zu separieren.
  left join Fahrer b on b.Nr = tu.FahrerNr
) a
Group by 
  FahrerNr, 
  Name;

(nur hingedaddelt, deshalb kann ich den einen oder anderen Schreib- bzw. Syntaxfehler nicht ausschließen)

[Papaschlumpf73]

Und die folgende Zeile würde ich genau andersrum machen:

where cast(Datum as Date) = :EingabeDatum

Also nicht (für Mio. Datensätze) das Feld "Datum" in einen anderen Datentyp casten, sondern den Parameter :EingabeDatum einmal in den Datentyp vom Feld "Datum" casten.

[Jasocul]

Zitat von Papaschlumpf73:

Und die folgende Zeile würde ich genau andersrum machen:

where cast(Datum as Date) = :EingabeDatum

Also nicht (für Mio. Datensätze) das Feld "Datum" in einen anderen Datentyp casten, sondern den Parameter :EingabeDatum einmal in den Datentyp vom Feld "Datum" casten.

Vor allem wenn auf dem Datumsfeld ein Index ist, wird dieser durch das Cast sehr wahrscheinlich ingoriert. Kein Index = langsam

[Uwe Raabe]

Zitat von Papaschlumpf73:

Und die folgende Zeile würde ich genau andersrum machen:

where cast(Datum as Date) = :EingabeDatum

Also nicht (für Mio. Datensätze) das Feld "Datum" in einen anderen Datentyp casten, sondern den Parameter :EingabeDatum einmal in den Datentyp vom Feld "Datum" casten.

Das muss nicht unbedingt funktionieren, z.B. wenn das Feld einen Time-Anteil hat, der beim CAST(Datum as DATE) auf 0 gesetzt wird.

[Jumpy]

Keine Ahnung, ob es das besser macht, aber man kann Delphi.Nariums abfrage noch einkürzen:

SQL-Code:

select
    t.FahrerNr, 
    b.Name,
    Sum(VKBG) as Umsatz,
    Sum(case when Zahlart = 1 then VKBG else 0 end) as Bar,
    Sum(case when Zahlart = 3 then VKBG else 0 end) as Karte,
    Sum(case when Zahlart = 2 then VKBG else 0 end) as LS
From Tagesumsatz t
Left join Fahrer b on b.Nr = tu.FahrerNr
Where cast(Datum as Date) = :EingabeDatum
Group by 
  FahrerNr, Name;

[tkhandel]

Danke für die vielen Antworten,
werde es heute Abend mal probieren.
die Spalte Datum ist tatsächlich DateTime Feld.

[joachimd]

wenn DateTime, dann wird über cast(datum as date) die Optimierung umgangen.