AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi MSSQL: Datensatz fehlt
Thema durchsuchen
Ansicht
Themen-Optionen

MSSQL: Datensatz fehlt

Ein Thema von haentschman · begonnen am 17. Dez 2020 · letzter Beitrag vom 18. Dez 2020
Antwort Antwort
Seite 2 von 3     12 3      
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.115 Beiträge
 
Delphi 12 Athens
 
#11

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 14:46
OK, dass ist dann bissl blöd.
Joar, Referenzen einfügen oder wenn's nicht geht dann mit Triggern an beiden Tabellen den Zustand prüfen.

.alles im Live Betrieb.
Ja wann denn sonst?

Mehr Spannung bei der Arbeit.




Aber hey Corona ... nun hast Zeit das schnell zu machen, bis Januar, wenn wieder gearbeitet wird.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

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

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 14:52
Zitat:
nun hast Zeit das schnell zu machen, bis Januar, wenn wieder gearbeitet wird.
...morgen letzter Tag.
  Mit Zitat antworten Zitat
Delphi.Narium

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

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 15:00
Eigentlich sollte es sogar im Livebetrieb möglich sein, einen Trigger zu erstellen, der das Löschen von Datensätzen verbietet:
SQL-Code:
CREATE TRIGGER trTabellennameOnDelete ON Tabellenname
FOR DELETE AS
  RAISERROR('Das Löschen von Datensätzen ist nicht zulässig!', 16, 1)
  ROLLBACK
END
Und kann heute bzw. morgen, am letzten Tag, noch erstellt werden
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.115 Beiträge
 
Delphi 12 Athens
 
#14

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 15:13
Vergiss das IF nicht, wo geprüft wird ob Masterdaten nicht vorhanden, bzw. Detaildaten vorhanden sind.
Außerdem nicht nur beim DELETE, sondern auch beim UPDATE, wenn die "Referenzen" sich ändern. (und vielleicht beim INSERT, um ungültige Referenzen garnicht erst erstellen zu können)

Und jupp ... schnell schnell, dat schaffst schon noch. (das Wasserfall-Model ... nach mir die Sintflut)


Alternativ, wenn du das Verhalten nicht sofort ändern willst, dann nur einen Trigger, der beim Löschen die IDs/Referenzen nur in "...-DELETED" umbenennt (also im Trigger das DELETE in ein UPDATE abändern),
bzw. den Datensatz als Sicherhungskopie in eine andere Tabelle kopiert.
Dann kannst das Gelöschte schnell wiederherstellen lassen.

Oder allgemein einen Trigger, der ein Änderungslog zu wichtigen Tabellen erstellt.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (17. Dez 2020 um 15:18 Uhr)
  Mit Zitat antworten Zitat
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.174 Beiträge
 
Delphi 11 Alexandria
 
#15

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 15:14
Es wird wohl Szenarien geben, wo das Löschen zulässig ist.

Wie gesagt, ev kann man das RAISERROR davon abhängig machen, ob es noch Detaildatensätze gibt. Aber wenn die Software zB zuerst den Master löscht + dann die Details, weil es keine RefIntChecks gibt, geht das so nicht.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.115 Beiträge
 
Delphi 12 Athens
 
#16

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 15:21
Aber wenn die Software zB zuerst den Master löscht + dann die Details, weil es keine RefIntChecks gibt, geht das so nicht.
Bei Transaktionen kann man den Trigger eventuell erst als After-Statement oder Bevor-Commit laufen lassen, dann ist die Reihenfolge egal. (geht bei einigen DBMS)

Genauso, wie man auch bei Referenzen die Checks vorübergehend deaktivieren kann. (z.B. für einen Import in unbestimmter Reihenfolge)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (17. Dez 2020 um 15:29 Uhr)
  Mit Zitat antworten Zitat
Delphi.Narium

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

AW: MSSQL: Datensatz fehlt

  Alt 17. Dez 2020, 15:40
Mein Vorschlag geht nur erstmal dahin, dass Löschen zu verbieten.

Das man dann ggfls. auch Logiken für Sonderfälle benötigt, sollte absolut klar sein.

Es ist nur erstmal ein Workaround, um das "unmotivierte Verschwinden von Mastersätzen" zu verhindern.

Und natürlich bekommen (erstmal) Master und Detail jeweils ihren entsprechenden Trigger.

Löschen darf (laut Eingangspost) nur der Admin.

Der Trigger braucht also letztlich irgend einen Hinweis darauf, wie er den Admin erkennen kann.

Nach dem bisherigen Wissensstand scheint mir eine datenbankseitige Abhängigkeit zu fehlen, die sicherstellt, dass kein Master gelöscht werden kann, wenn es noch Details gibt.
Ob Details gelöscht werden dürfen, kann ich dem Thread momentan nicht entnehmen.

Zitat von haentschman:
Ich bin schon der Meinung, ein Log schreiben zu müssen. (AfterDelete)
Warum nach dem Auftreten des Fehlers was ins Log schreiben?

Warum nicht im BeforeDelete 'ne Exception werfen, per MessageDLG "Willst Du wirklich?" fragen oder einfach per Cancel ... das Löschen verhindern.

Wenn ich etwas nicht will, dann versuche ich es vorher zu verhindern und nicht nachher irgendwie zu reparieren.

OK: Im BeforeDelete etwas für den Workflow sinnvolles machen und ggfls. das Löschen verhindern. Im AfterDelete protokollieren (falls denn doch ausnahmsweise gelöscht werden durfte).

Und der Smiley hinter meinem
Zitat:
Und kann heute bzw. morgen, am letzten Tag, noch erstellt werden
sollte darauf hinweisen, dass das nicht wirklich ernsthaft heute oder morgen umzusetzen ist. Also keinesfalls ein
Zitat von himitsu:
Und jupp ... schnell schnell, dat schaffst schon noch. (das Wasserfall-Model ... nach mir die Sintflut)
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

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

AW: MSSQL: Datensatz fehlt

  Alt 18. Dez 2020, 05:39
Moin...
Zitat:
Eigentlich sollte es sogar im Livebetrieb möglich sein, einen Trigger zu erstellen
Klar..das bezog sich auf die komplette Umstellung der DB.
Zitat:
Aber wenn die Software zB zuerst den Master löscht + dann die Details, weil es keine RefIntChecks gibt, geht das so nicht
Zitat:
Nach dem bisherigen Wissensstand scheint mir eine datenbankseitige Abhängigkeit zu fehlen, die sicherstellt, dass kein Master gelöscht werden kann, wenn es noch Details gibt.
So sieht es aus...
Zitat:
das Wasserfall-Model ... nach mir die Sintflut
...wen trifft die Sintflut? Ich bin der einzige auf der Insel...



Nachtrag:

* Trigger erstellt, der eine Exception auslöst und ein Rollback macht.
* Selbst ich (Admin) könnte keine Addresse löschen, wenn "Vorgänge" zu dieser Addresse vorhanden sind. (über Navigator)
* Ctrl-Entf geht auch bei DevExpress! ...Umgehung meiner Prüfung! Supiii.
* Wenigstens kann ich aus dem CallStack sehen daß ein "KeyDown" stattgefunden hat.

Jetzt heißt es warten...
Miniaturansicht angehängter Grafiken
general.png   callstack.png   loeschen.png  

Geändert von haentschman (18. Dez 2020 um 06:38 Uhr)
  Mit Zitat antworten Zitat
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.174 Beiträge
 
Delphi 11 Alexandria
 
#19

AW: MSSQL: Datensatz fehlt

  Alt 18. Dez 2020, 08:00
BTW: Welches Tool erzeugt dir den CallStack?
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.537 Beiträge
 
Delphi 11 Alexandria
 
#20

AW: MSSQL: Datensatz fehlt

  Alt 18. Dez 2020, 08:06
Das sieht nach MadExcept aus.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  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 12:08 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