Einzelnen Beitrag anzeigen

OLLI_T

Registriert seit: 13. Okt 2003
Ort: Nähe Wetzlar / Hessen
143 Beiträge
 
Delphi 5 Enterprise
 
#10

Re: SQL Problem mit Interbase

  Alt 20. Nov 2003, 12:34
Hallo TouchDown!

Mist, da gibt es ein Problem mit der StoPro. Du kannst damit nur definierte Ergebnisse aber keine Datenmengen zurückbekommmen.

Du musst den SQL also in zwei Teile aufsplitten:

Ein IBSQL im Delphi-Programm liefert Dir zunächst die KundenID´s:

SQL-Code:
Select K.KUNDEID FROM KUNDEN K
WHERE (K.PBETREUER=-59 OR K.FBETREUER=-59 OR K.WBETREUER=-59)
Die KundenID übergibst Du an die StoPro, deren Kern dann etwa so aussehen sollte:

SQL-Code:
FOR Select PRODUKTID, BEDARF, OLB, ANDERE
FROM NUTZUNG
WHERE KUNDEID = :G_KUNDEID
INTO :V_PRODUKTID, :V_BEDARF, :V_OLB, :V_ANDERE
DO
BEGIN
  If (:V_PRODUKTID > 0) Then
  Begin
    If :V_BEDARF = "T" Then
       :R_Sum_Bedarf = :R_Sum_Bedarf + 1
    ...
  End
End
Das mag zwar nicht sehr elegant aussehen aber ich habe schon des öfteren festgestellt, dass Inner Joins viel schneller ausgeführt werden, wenn ich die in zwei Teile aufsplitte!

Hoffe Dir weitergeholfen zu haben und wünsche viel Erfolg

Gruss

OLLI
No Pain No Gain!
  Mit Zitat antworten Zitat