Unter der Voraussetzung, dass "ID" numerisch ist, kannst du folgendes Versuchen:
Delphi-Quellcode:
MainMod.Behandlungssumme.Close;
MainMod.Behandlungssumme.Parameters.ParamByName('ID').AsInteger := MainMod.Behandlungen.FieldByName('ID').AsInteger;
MainMod.Behandlungssumme.Open;
Die Benutzung von ".value" ist dasselbe, wie ".AsVariant", was auch aus Performance-Sicht nicht optimal ist.
Wenn du zum Beispiel in deiner Tabelle "Behandlungen" keine Ergebnis hast, bekommst du für Value ein "Null". Bei AsInteger bekommt man in dem Fall eine "0" geliefert.