AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Records mit einem Unique Key in Lücke aufrücken lassen
Thema durchsuchen
Ansicht
Themen-Optionen

Records mit einem Unique Key in Lücke aufrücken lassen

Ein Thema von QuickAndDirty · begonnen am 30. Dez 2022 · letzter Beitrag vom 17. Apr 2023
 
QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.985 Beiträge
 
Delphi 12 Athens
 
#1

Records mit einem Unique Key in Lücke aufrücken lassen

  Alt 30. Dez 2022, 12:49
Datenbank: FB und MSSQL • Version: 2.5 und ? • Zugriff über: Firedac
Hallo wie kann ich Records in einem Feld mit Unique Key am Besten aufrücken lassen?
Wichtig dafür ist, dass keine SQL dialekt spezifischen fuktionen benutzt werden dürfen.
Z.b. Firebird hat "order by" in Updates aber leider hat MSSQL das nicht und irgendwie hat das keiner.

Angebnommen ich habe eine Tabelle
Code:
Gruppen
mit Feldern wie
Code:
ID INT, GruppenID INT, Position INT
und ein Unique Key für
Code:
GruppenID, Position
Wenn ich jetzt einen Record lösche möchte ich das die Records mit einer höheren Position in der Gruppe in die Lücke aufrücken.

Code:
UPDATE GRUPPEN
SET POSITION = POSITION-1 
WHERE GRUPPENID = :GRUPPENID
  AND POSITION > :POSITION
Ohne Unique Key geht das, aber mit Unique Key kann es zu Key Violations kommen je nach dem in welcher Reihenfolge die Updates durchgeführt werden.

Ich mache es jetzt quasi "von hand" in der richtigen reihen folge und es sieht aus wie viel zu viel Aufwand für ein einfaches löschen eines Datensatzes...

Gibt es einen besseren weg??????

Ich hab schon überlegt es wie folgt zu machen
Code:
UPDATE GRUPPEN
SET POSITION = POSITION * (-1)
WHERE GRUPPENID = :GRUPPENID
  AND POSITION > :POSITION;

UPDATE GRUPPEN
SET POSITION = ( POSITION * (-1) ) -1 
WHERE GRUPPENID = :GRUPPENID
  AND POSITION < 0;
also erstmal die werte auf negative werte setzen und sie dann auf den gewollten wert setzen um Duplikate zu vermeiden.

Vieleicht macht es auch sinn für den zweck die Tabelle und den Unique Key zu erweitern um ein feld
Code:
OLDPOSITION INT
Dann könnte man es so machen.
Code:
UPDATE GRUPPEN
SET OLDPOSITION = POSITION
WHERE GRUPPENID = :GRUPPENID
  AND POSITION > :POSITION;

UPDATE GRUPPEN
SET POSITION = OLDPOSITION-1
WHERE GRUPPENID = :GRUPPENID
  AND OLDPOSITION> :POSITION;

UPDATE GRUPPEN
SET OLDPOSITION = NULL
WHERE GRUPPENID = :GRUPPENID;
Durch OLDPOSITION im Unique Key hätte man für das aufrücken etwas spielraum und mit dem NULL setzen von OLD position würde man die UNIQUE KEY Constraint auf Position wieder aktivieren...

Gibt's ein verfahren das quasi der Industrie-standard ist?
Andreas
Monads? Wtf are Monads?

Geändert von QuickAndDirty (30. Dez 2022 um 12:55 Uhr)
  Mit Zitat antworten Zitat
 


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 17:53 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz