Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Update / Insert über mehrere Tabellen (https://www.delphipraxis.net/156596-update-insert-ueber-mehrere-tabellen.html)

bwolf 8. Dez 2010 09:09

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

Update / Insert über mehrere Tabellen
 
Hallo,

ich habe eine Tabelle (z.B. "Mitarbeiter") die mit meheren anderen Tabellen in Verbindung steht (z.B. Mitarbeiter_Zusatz, Mitarbeiter_Akte etc). Die Verknüpfung der Tabellen ist 1:1.

Wenn nun ein neuer Mitarbeiter angelegt wird soll natürlich auch in den verknüpften Tabellen die dazueghörigen Datensätze angelegt werden, und bei einem Update sollen sie upgedated werden.

Ist es möglich, das mit Datenbankkomponenten zu erledigen, oder muß das von Hand erledigt werden?

Neutral General 8. Dez 2010 09:21

AW: Update / Insert über mehrere Tabellen
 
Hallo,

Sowas würde denke ich mal mit Triggern funktionieren.

joachimd 8. Dez 2010 09:24

AW: Update / Insert über mehrere Tabellen
 
Zitat:

Zitat von bwolf (Beitrag 1067039)
Hallo,

ich habe eine Tabelle (z.B. "Mitarbeiter") die mit meheren anderen Tabellen in Verbindung steht (z.B. Mitarbeiter_Zusatz, Mitarbeiter_Akte etc). Die Verknüpfung der Tabellen ist 1:1.

Wenn nun ein neuer Mitarbeiter angelegt wird soll natürlich auch in den verknüpften Tabellen die dazueghörigen Datensätze angelegt werden, und bei einem Update sollen sie upgedated werden.

Ist es möglich, das mit Datenbankkomponenten zu erledigen, oder muß das von Hand erledigt werden?

entweder direkt vom Programm aus mit einem Script:
SQL-Code:
Insert into Mitarbeiter (id, feld1) values (10,'test');
insert into mitarbeiter_zusatz(id, feld1) values(10,'irgendwas');
insert into mitarbeiter_Akte(id, feld1) values(10,'irgendwas anderes');
oder aber über einen Trigger:
SQL-Code:
create trigger trig_ins on mitarbeiter after insert
begin
  insert into mitarbeiter_zusatz(id) select id from __new;
  insert into mitarbeiter_Akte(id) select id from __new;
end;
aber: warum ist das nötig? Ich würde die Zusatz-Tabellen nur füllen, wenn diese wirklich benötigt werden. Statt INNER JOINS dann OUTER JOINS verwenden und es tut nicht weh, falls mal ein Mitarbeiter nicht in den Zusatz-Tabellen gefunden wird (ist eh anzuraten!).
Statt einem Update könntest Du dann im Programm ein MERGE verwenden:
SQL-Code:
MERGE mitarbeiter_zusatz on id=10
  WHEN MATCHED THEN UPDATE SET feld1=wert1,feld2=wert2
  WHEN NOT MATCHED THEN INSERT(id,feld1,feld2) VALUES(10,wert1,wert2);

mkinzler 8. Dez 2010 09:27

AW: Update / Insert über mehrere Tabellen
 
Ich würde die Datensätze nicht automatisch anlegen, dann könntest du deren Felder auch gleich in die "Haupttabelle" aufnehmen

bwolf 8. Dez 2010 09:29

AW: Update / Insert über mehrere Tabellen
 
Vielen Dank für die schnellen Antworten.
Also wie es scheint sind die VCL-Komponenten für den Datenbankzugriff für solche Geschichten nicht ausgelegt...

Aber das mit dem Merge hört sich sehr interessant an, werde ich mir mal genauer ansehen.

MrSpock 8. Dez 2010 14:37

AW: Update / Insert über mehrere Tabellen
 
Hallo,

bai FibPlus gibt es das TFIBUpdateObject, dass u.a. folgendes bietet:

Zitat:

The use of the TpFIBUpdateObject components allows controlling data updates very flexibly. For example it enables to use different updates for different records without using CachedUpdates and OnUpdateRecord
. For this it is enough to set the Active property of necessary TpFIBUpdateObject objects in True or False. Besides it is possible to execute a data updating of several tables at once in multitable query or to update data in a context of another transaction (or even in a different database).


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:12 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