Deine Funktion soll einen Dezimalwert zurückgeben, allerdings gibst du ein Recordset zurück !!

Mach einen "Select into" und gib eine Variable zurück.