Access2Base - tdf#121342 Increase number of recordsets
RecordsetMax attribute of Database object is increased by 1
at each Recordset opening.
It is reset to zero at each database opening.
While the database remains open it is increased without limit.
Make it a Long type i.o. an Integer one.
Change-Id: Ifc9854cddc1917e4336c0c0c5aa1048623de2a49
diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba
index 7f1d5e7..cbaa965 100644
--- a/wizards/source/access2base/Database.xba
+++ b/wizards/source/access2base/Database.xba
@@ -34,7 +34,7 @@ Private _ColumnTypesAlias() As Variant ' To what should a field whose o
Private _BinaryStream As Boolean ' False = binary fields must NOT be streamed f.i. via ReadAllBytes or WriteAllBytes
Private Form As Object ' com.sun.star.form.XForm
Private FormName As String
Private RecordsetMax As Integer
Private RecordsetMax As Long ' To make unique names in Collection below (See bug # 121342)
Private RecordsetsColl As Object ' Collection of active recordsets
REM -----------------------------------------------------------------------------------------------------------------------
