Einzelnen Beitrag anzeigen

Frickler

Registriert seit: 6. Mär 2007
Ort: Osnabrück
599 Beiträge
 
Delphi XE6 Enterprise
 
#5

AW: Löschen eines Datensatzes verhindern

  Alt 3. Apr 2020, 14:40
wir machen das meistens mit einem trigger, der eine exception auslöst


CREATE OR ALTER trigger angebot_bd0 for angebot
active before delete position 0
AS
begin
if (upper(coalesce(old.txt,''))<>'LOESCHEN') then
exception error '#BRPMSG#Löschen nur dann möglich, wenn im Angebot in der Bezeichnung LOESCHEN steht#BRPEND#';
end
Wir machen das an einer Stelle über eine USER_SESSION Kontextvariable. Hat sie den Wert XY, dann lässt der Trigger das Löschen zu. Dann haben wir noch einen After Delete Trigger, der die Kontextvariable zurück setzt, damit das Löschen nur einmal geht.
  Mit Zitat antworten Zitat