MS Anpassung final indices

2021-02-17 09:23:52 +01:00
parent 4e69a97582
commit 903e5e5c81
11 changed files with 131 additions and 122 deletions
--- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb
+++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb
@@ -133,13 +133,18 @@
                End Try

            ElseIf type = INDEX_TYPE_FLOAT Then
-                value = NotNull(Of Double)(value, 0)
-
-                If value = String.Empty Then
+                If value = "SQL-Command" Then
                    props.FloatValue = 0
                Else
-                    props.FloatValue = Double.Parse(value)
+                    value = NotNull(Of Double)(value, 0)
+
+                    If value = String.Empty Then
+                        props.FloatValue = 0
+                    Else
+                        props.FloatValue = Double.Parse(value)
+                    End If
                End If
+
            ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then
                value = NotNull(value, "False")