cubeSQL Fixes

Fixed critical issue where cubeSQL binding does not accept empty String/Text properties. SQLdeLite will instead NULL those fields if no value is present.
1701software · Jan 22, 2017 · 1515918 · 1515918
1 parent 74d7d9d
commit 1515918
Show file tree

Hide file tree

Showing 4 changed files with 18 additions and 3 deletions.
diff --git a/Examples/iOS_SQLite.xojo_binary_project b/Examples/iOS_SQLite.xojo_binary_project
diff --git a/Source/.SQLdeLite.xojo_uistate b/Source/.SQLdeLite.xojo_uistate
diff --git a/Source/SQLdeLite.xojo_code b/Source/SQLdeLite.xojo_code
@@ -74,9 +74,21 @@ Protected Module SQLdeLite
 		        ElseIf (__parameterInfo.FullName = "Int32") Then
 		          _psCube.BindInt(_count + 1, Parameters(_count).Value)
 		        ElseIf (__parameterInfo.FullName = "String") Then
-		          _psCube.BindText(_count + 1, Parameters(_count).Value)
+		          Dim ___valueString As String
+		          ___valueString = Parameters(_count).Value
+		          If (___valueString.Len = 0) Then // NULL the field if there is no String value as cubeSQL plugin will croak.
+		            _psCube.BindNull(_count + 1)
+		          Else
+		            _psCube.BindText(_count + 1, Parameters(_count).Value)
+		          End If
 		        ElseIf (__parameterInfo.FullName = "Text") Then
-		          _psCube.BindText(_count + 1, Parameters(_count).Value)
+		          Dim ___valueText As Text
+		          ___valueText = Parameters(_count).Value
+		          If (___valueText.Length = 0) Then // NULL the field if there is no String value as cubeSQL plugin will croak.
+		            _psCube.BindNull(_count + 1)
+		          Else
+		            _psCube.BindText(_count + 1,Parameters(_count).Value)
+		          End If
 		        End If
 
 		      End If
@@ -1145,6 +1157,8 @@ Protected Module SQLdeLite
 		SQLdeLite Release Notes
 		===================
 
+		Version 2.170122.0 - January 22nd, 2017
+		- cubeSQL plugin will freeze up when trying to bind empty String/Text parameters. Offset this by binding Null if the String/Text field is blank.
 		Version 2.1611.70 - November 7th, 2016
 		- The SQLdeLite.Record.CreateInsertStatement() method now escapes single quotes properly.
 		- Int64's are handled property in 64-bit builds.

diff --git a/Source/SQLdeLite.xojo_project b/Source/SQLdeLite.xojo_project
@@ -1,5 +1,5 @@
 Type=Desktop
-RBProjectVersion=2016.03
+RBProjectVersion=2016.041
 MinIDEVersion=20070100
 Class=App;App.xojo_code;&h36F27FFF;&h0;false
 Window=Window1;Window1.xojo_window;&h4BD4EFFF;&h0;false
@@ -39,5 +39,6 @@ OSXBundleID=com.redrockforensics.myapp
 DebuggerCommandLine=
 UseGDIPlus=False
 UseBuildsFolder=True
+CopyRedistNextToWindowsEXE=False
 IsWebProject=False
 OptimizationLevel=0