Einzelnen Beitrag anzeigen

alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#15

Re: [SQL] Baumstruktur bzw. Teilbaum löschen?

  Alt 2. Dez 2009, 15:22
Rekursiv... ich hör immer rekursiv... Rekursive Aufrufe sind in RDBMS unerwünscht, weil sie den Stack belasten und potentielle Kandidaten für einen Absturz infolge Endlosrekursion sind. Daher gibt es z.B. in MSSQL eine maximale Aufruftiefe...

Wenn die optimale Methode mit den Foreign Keys und dem kaskadierten löschen nicht funktioniert, dann geht es auch so (MSSQL Dialekt)

SQL-Code:
create procedure DeleteSubTree @ID int
as

declare @Done bit
-- Temporäre Arbeitstabelle erstellen. Sie enthält die zu löschenden Knoten
create table #IdsToDelete (ID int)
-- Damit das nicht ewig dauert, einen Index
create index tmpIndex on #IdsToDelete (ID)

-- Erstmal den Knoten, den wir löschen wollen
insert into #IdsToDelete (ID) values (@ID)

set @Done = 0
while (@Done = 0) begin
-- Alle Knoten, dessen Vorgänger in der Arbeitstabelle sind, in die Arbeitstabelle einfügen
  insert into #IdsToDelete
    select ParentID from TreeStructure
     where ID in (select ID from #IdsToDelete)

-- Alle Knoten im Baum löschem, die sich in der Arbeitstabelle befinden
  delete from TreeStructure
    where ID in (select ID from #IdsToDelete)
  if (@@ROWS_AFFECTED = 0) set @Done = 1
-- Hier könnte man noch die Knoten aus der Arbeitstabelle löschen, die nicht
-- mehr in der Baumstruktur existieren, aber das fast immer ein Mehraufwand
-- Ausnahme: Sehr große Baumstrukturen
end
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat