Hallo,

ich habe eine geschachtelte Struktur aufgebaut durch Verlinkung einer Tabelle mit sich selbst (als Untertabelle):

Textfeld "Name"
Zahl      "Wert"
=>        "Teil von"
<=        "enthaltene Teile"

Die Idee ist, dass sich "Wert" jeweils berechnet als Summe über alle enthaltenen Teile. Die Wertestruktur berechnet sich automatisch selbst, wenn ein Datensatz geändert wird:

if 'Teil von' then
   'Teil von'.(Wert := sum('enthaltene Teile'.Wert))
end

Sobald der Wert eines Kind-Datensatzes geändert wird, berechnet sich der Wert des Eltern-Datensatzes neu als Summe über alle Kinder. Das funktioniert sehr schön, solange es bei einer zweistufigen Hierarchie bleibt. Sobald aber auch der Eltern-Datensatz einen Großeltern-Eintrag über sich hat, greift das nicht mehr. Die Änderung des Eltern-Wertes löst nicht automatisch die Neuberechnung des Großeltern-Wertes aus. 

Ich habe mir daher folgendes überlegt:

function neuberechnen(x: tabelle) do
    'Teil von'.(Wert := sum('enthaltene Teile'.Wert));
    for y in 'enthaltene Teile' do
        neuberechnen(y)
    done
done;
neuberechnen(this)

Das funktioniert aber nicht. Die Funktion lässt sich nicht rekursiv in sich selbst verwenden, da sie ihre Definition noch nicht kennt. 

Hat jemand eine Idee?