AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi SQL: Update mit Select und IF/CASE in der Bedingung
Thema durchsuchen
Ansicht
Themen-Optionen

SQL: Update mit Select und IF/CASE in der Bedingung

Ein Thema von haentschman · begonnen am 8. Jun 2020 · letzter Beitrag vom 18. Jun 2020
Antwort Antwort
Seite 2 von 3     12 3      
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.009 Beiträge
 
Delphi 12 Athens
 
#11

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 8. Jun 2020, 09:11
PS: Das B.Adr ist nicht NULL sondern ''
OK, und so (ohne reale Daten kann man das hier nicht testen)?
Code:
(select SUM(B.Brutto) as Summe from BEL B
             where
               (B.Art = 'BLUBB' or B.Art = 'BLA') and
                ((B.Adr > '' and B.Adr = ADR.Adr) or
                 (B.Adr = '' and B.KDNR = ADR.Adr))
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#12

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 8. Jun 2020, 09:24
Nach 5 Minuten habe ich abgebrochen...

Ich mache mal ein SQL mit 2 Tabelle und Daten...


Nachtrag:
Code:
create table ADR
(
  ID int identity(0,1) not null,
  Adr varchar(20),
  AdrValue int
)
create table BEL
(
  ID int identity(0,1) not null,
  Adr varchar(20),
  KDNR varchar(10),
  BelValue int
)
GO
SET IDENTITY_INSERT ADR ON
insert into ADR (ID, Adr, AdrValue) values (1, 'Bla', 0)
insert into ADR (ID, Adr, AdrValue) values (2, 'Blubb', 0)
SET IDENTITY_INSERT ADR OFF

SET IDENTITY_INSERT BEL ON
insert into BEL (ID, Adr, KDNR, BelValue) values (1, 'Bla', '', 1)
insert into BEL (ID, Adr, KDNR, BelValue) values (2, 'Bla', '', 2)
insert into BEL (ID, Adr, KDNR, BelValue) values (3, 'Bla', '', 3)
insert into BEL (ID, Adr, KDNR, BelValue) values (4, '', 'Bla', 4)
insert into BEL (ID, Adr, KDNR, BelValue) values (5, 'Blubb', '', 2)
insert into BEL (ID, Adr, KDNR, BelValue) values (6, 'Blubb', '', 3)
SET IDENTITY_INSERT BEL OFF
GO
Original SQL Bedingung:
Code:
UPDATE
  ADR
SET
  AdrValue = (select SUM(B.BelValue) as Summe from BEL B
                where
             b.Adr = ADR.Adr)
Egebnis:
Bla = 6 -> Erwartet 10 incl. KDNR = Bla
Blubb = 5

Geändert von haentschman ( 8. Jun 2020 um 10:16 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#13

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 8. Jun 2020, 10:21
Danke an Alle...

Der Preis geht an Uwe. Mit meiner Test DB kommt das erwartete Ergebnis raus. Meiner DB fehlt mit Sicherheit nur ein Index was die Laufzeit erklärt.

Nachtrag:
Das Ergebnis ist korrekt.

DB: 3GB
-> relevante Daten 8000 Datensätze (Update)
* ohne Index (fehlende Felder): nach 5 Minuten abgebrochen
* Index mit allen relevanten Feldern / einzeln oder zusammengesetzt: 22s
* Index mit nur einer Bedingung (wie früher): 1s


Ideen für Optimierung?

Geändert von haentschman ( 8. Jun 2020 um 11:34 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#14

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 9. Jun 2020, 07:08
Moin...

Update:
sowohl mit:
Code:
((B.Adr > '' and B.Adr = ADR.Adr) or
 (B.Adr = '' and B.KDNR = ADR.Adr))),
als auch mit:
Code:
Adr.Adr = case
  when B.Adr > ''
  then B.Adr   
  else B.KDNR
end),
...war die Geschwindigkeit langsam. (trotz aller Indizies und neu erstellt komplett 15min/8000DS)

Zusammengesetzte Werte aus getrennten SQL: (komplett 2s/8000DS)
Code:
UPDATE
  ADR
SET
  AdrValue = (select SUM(B.BelValue) as Summe from BEL B
                where B.Adr = ADR.Adr)
              +
             (select SUM(B.BelValue) as Summe from BEL B
                where B.KDNR = ADR.Adr)
Könnte das mir jemand logisch erklären?
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#15

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 9. Jun 2020, 07:31
Beim Case muss ja für jeden Datensatz Berechnungen durchgeführt werden. Im 2. Fall kann man hingegen direkt auf die Indizes setzen.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#16

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 9. Jun 2020, 08:03
Hallöle...
Zitat:
Im 2. Fall kann man hingegen direkt auf die Indizes setzen.
Ok...aber das das soviel ausmacht? Again what learned...
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.415 Beiträge
 
Delphi 7 Professional
 
#17

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 9. Jun 2020, 10:16
Was passiert denn bei
SQL-Code:
UPDATE
  ADR
SET
  AdrValue = select SUM(B.BelValue) as Summe from BEL B where IIF(B.Adr='', B.KDNR, B.Adr) = ADR.Adr
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#18

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 9. Jun 2020, 10:27
Danke...
Ich muß dich aber vertrösten... Ich melde mich wenn ich das probiert habe.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.292 Beiträge
 
Delphi 12 Athens
 
#19

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 17. Jun 2020, 09:56
Update 1:
Zitat:
IIF(B.Adr='', B.KDNR, B.Adr)
Zitat:
Meldung 195, Ebene 15, Status 10, Zeile 11
IFF wird nicht als Name einer integrierten Funktion erkannt.


Update 2:
Code:
UPDATE
  ADR
SET
  AdrValue = (select SUM(B.BelValue) as Summe from BEL B
                where B.Adr = ADR.Adr)
              +
             (select SUM(B.BelValue) as Summe from BEL B
                where B.KDNR = ADR.Adr)
...geht plötzlich nicht mehr. Beide Subselects liefern Werte, aber das Update(AdrValue) ist NULL...
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#20

AW: SQL: Update mit Select und IF/CASE in der Bedingung

  Alt 17. Jun 2020, 12:07
Also wenn eine der Summen NULL ist, weil keine Datensätze zum Summieren da sind, dann ist auch die Summe der Addition NULL, oder?
Also muss noch ein Coalesce, NVL, .. rein, weiß nicht was fb da genau mag.

P.S:
"Beide Select liefern Werte" müsste dazu allerdings im Einzelfall nicht erfüllt sein. (Während es generell, also ohne Datensatzbeschränkung, Werte liefert)
Gruß, Jo
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 3     12 3      


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 20:05 Uhr.
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