MS

2023-07-20 14:12:24 +02:00
parent c2deb54f11
commit ea5ea5f205
64 changed files with 8139 additions and 7996 deletions
--- a/app/DD-Record-Organizer/DD_DMSDataSet.Designer.vb
+++ b/app/DD-Record-Organizer/DD_DMSDataSet.Designer.vb
@@ -8957,14 +8957,6 @@ Partial Public Class DD_DMSDataSet
        
        Private columnEMAIL As Global.System.Data.DataColumn
        
-        Private columnLOGGED_IN As Global.System.Data.DataColumn
-        
-        Private columnLOGGED_WHERE As Global.System.Data.DataColumn
-        
-        Private columnLOG_IN_WHEN As Global.System.Data.DataColumn
-        
-        Private columnLOG_OUT_WHEN As Global.System.Data.DataColumn
-        
        Private columnADDED_WHO As Global.System.Data.DataColumn
        
        Private columnADDED_WHEN As Global.System.Data.DataColumn
@@ -9060,38 +9052,6 @@ Partial Public Class DD_DMSDataSet
            End Get
        End Property
        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public ReadOnly Property LOGGED_INColumn() As Global.System.Data.DataColumn
-            Get
-                Return Me.columnLOGGED_IN
-            End Get
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public ReadOnly Property LOGGED_WHEREColumn() As Global.System.Data.DataColumn
-            Get
-                Return Me.columnLOGGED_WHERE
-            End Get
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public ReadOnly Property LOG_IN_WHENColumn() As Global.System.Data.DataColumn
-            Get
-                Return Me.columnLOG_IN_WHEN
-            End Get
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public ReadOnly Property LOG_OUT_WHENColumn() As Global.System.Data.DataColumn
-            Get
-                Return Me.columnLOG_OUT_WHEN
-            End Get
-        End Property
-        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn
@@ -9209,27 +9169,9 @@ Partial Public Class DD_DMSDataSet
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Overloads Function AddTBDD_USERRow( _
-                    ByVal PRENAME As String,  _
-                    ByVal NAME As String,  _
-                    ByVal USERNAME As String,  _
-                    ByVal EMAIL As String,  _
-                    ByVal LOGGED_IN As Boolean,  _
-                    ByVal LOGGED_WHERE As String,  _
-                    ByVal LOG_IN_WHEN As Date,  _
-                    ByVal LOG_OUT_WHEN As Date,  _
-                    ByVal ADDED_WHO As String,  _
-                    ByVal ADDED_WHEN As Date,  _
-                    ByVal CHANGED_WHO As String,  _
-                    ByVal CHANGED_WHEN As Date,  _
-                    ByVal LANGUAGE As String,  _
-                    ByVal COMMENT As String,  _
-                    ByVal SHORTNAME As String,  _
-                    ByVal WAN_ENVIRONMENT As Boolean,  _
-                    ByVal DATE_FORMAT As String,  _
-                    ByVal GENERAL_VIEWER As String) As TBDD_USERRow
+        Public Overloads Function AddTBDD_USERRow(ByVal PRENAME As String, ByVal NAME As String, ByVal USERNAME As String, ByVal EMAIL As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal LANGUAGE As String, ByVal COMMENT As String, ByVal SHORTNAME As String, ByVal WAN_ENVIRONMENT As Boolean, ByVal DATE_FORMAT As String, ByVal GENERAL_VIEWER As String) As TBDD_USERRow
            Dim rowTBDD_USERRow As TBDD_USERRow = CType(Me.NewRow,TBDD_USERRow)
-            Dim columnValuesArray() As Object = New Object() {Nothing, PRENAME, NAME, USERNAME, EMAIL, LOGGED_IN, LOGGED_WHERE, LOG_IN_WHEN, LOG_OUT_WHEN, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, LANGUAGE, COMMENT, SHORTNAME, WAN_ENVIRONMENT, DATE_FORMAT, GENERAL_VIEWER}
+            Dim columnValuesArray() As Object = New Object() {Nothing, PRENAME, NAME, USERNAME, EMAIL, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, LANGUAGE, COMMENT, SHORTNAME, WAN_ENVIRONMENT, DATE_FORMAT, GENERAL_VIEWER}
            rowTBDD_USERRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowTBDD_USERRow)
            Return rowTBDD_USERRow
@@ -9263,10 +9205,6 @@ Partial Public Class DD_DMSDataSet
            Me.columnNAME = MyBase.Columns("NAME")
            Me.columnUSERNAME = MyBase.Columns("USERNAME")
            Me.columnEMAIL = MyBase.Columns("EMAIL")
-            Me.columnLOGGED_IN = MyBase.Columns("LOGGED_IN")
-            Me.columnLOGGED_WHERE = MyBase.Columns("LOGGED_WHERE")
-            Me.columnLOG_IN_WHEN = MyBase.Columns("LOG_IN_WHEN")
-            Me.columnLOG_OUT_WHEN = MyBase.Columns("LOG_OUT_WHEN")
            Me.columnADDED_WHO = MyBase.Columns("ADDED_WHO")
            Me.columnADDED_WHEN = MyBase.Columns("ADDED_WHEN")
            Me.columnCHANGED_WHO = MyBase.Columns("CHANGED_WHO")
@@ -9292,14 +9230,6 @@ Partial Public Class DD_DMSDataSet
            MyBase.Columns.Add(Me.columnUSERNAME)
            Me.columnEMAIL = New Global.System.Data.DataColumn("EMAIL", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEMAIL)
-            Me.columnLOGGED_IN = New Global.System.Data.DataColumn("LOGGED_IN", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
-            MyBase.Columns.Add(Me.columnLOGGED_IN)
-            Me.columnLOGGED_WHERE = New Global.System.Data.DataColumn("LOGGED_WHERE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
-            MyBase.Columns.Add(Me.columnLOGGED_WHERE)
-            Me.columnLOG_IN_WHEN = New Global.System.Data.DataColumn("LOG_IN_WHEN", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
-            MyBase.Columns.Add(Me.columnLOG_IN_WHEN)
-            Me.columnLOG_OUT_WHEN = New Global.System.Data.DataColumn("LOG_OUT_WHEN", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
-            MyBase.Columns.Add(Me.columnLOG_OUT_WHEN)
            Me.columnADDED_WHO = New Global.System.Data.DataColumn("ADDED_WHO", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnADDED_WHO)
            Me.columnADDED_WHEN = New Global.System.Data.DataColumn("ADDED_WHEN", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
@@ -9330,9 +9260,6 @@ Partial Public Class DD_DMSDataSet
            Me.columnUSERNAME.AllowDBNull = false
            Me.columnUSERNAME.MaxLength = 50
            Me.columnEMAIL.MaxLength = 100
-            Me.columnLOGGED_IN.AllowDBNull = false
-            Me.columnLOGGED_IN.DefaultValue = CType(false,Boolean)
-            Me.columnLOGGED_WHERE.MaxLength = 50
            Me.columnADDED_WHO.AllowDBNull = false
            Me.columnADDED_WHO.MaxLength = 50
            Me.columnCHANGED_WHO.MaxLength = 50
@@ -9833,6 +9760,14 @@ Partial Public Class DD_DMSDataSet
        
        Private columnCOMMENT As Global.System.Data.DataColumn
        
+        Private columnECM_FK_ID As Global.System.Data.DataColumn
+        
+        Private columnAD_SYNC As Global.System.Data.DataColumn
+        
+        Private columnINTERNAL As Global.System.Data.DataColumn
+        
+        Private columnACTIVE As Global.System.Data.DataColumn
+        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Sub New()
@@ -9924,6 +9859,38 @@ Partial Public Class DD_DMSDataSet
            End Get
        End Property
        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property ECM_FK_IDColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnECM_FK_ID
+            End Get
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property AD_SYNCColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnAD_SYNC
+            End Get
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property INTERNALColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnINTERNAL
+            End Get
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn
+            Get
+                Return Me.columnACTIVE
+            End Get
+        End Property
+        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Browsable(false)>  _
@@ -9961,9 +9928,9 @@ Partial Public Class DD_DMSDataSet
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Overloads Function AddTBDD_USER_GROUPSRow(ByVal NAME As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal COMMENT As String) As TBDD_USER_GROUPSRow
+        Public Overloads Function AddTBDD_USER_GROUPSRow(ByVal NAME As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal COMMENT As String, ByVal ECM_FK_ID As Integer, ByVal AD_SYNC As Boolean, ByVal INTERNAL As Boolean, ByVal ACTIVE As Boolean) As TBDD_USER_GROUPSRow
            Dim rowTBDD_USER_GROUPSRow As TBDD_USER_GROUPSRow = CType(Me.NewRow,TBDD_USER_GROUPSRow)
-            Dim columnValuesArray() As Object = New Object() {Nothing, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COMMENT}
+            Dim columnValuesArray() As Object = New Object() {Nothing, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COMMENT, ECM_FK_ID, AD_SYNC, INTERNAL, ACTIVE}
            rowTBDD_USER_GROUPSRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowTBDD_USER_GROUPSRow)
            Return rowTBDD_USER_GROUPSRow
@@ -9999,6 +9966,10 @@ Partial Public Class DD_DMSDataSet
            Me.columnCHANGED_WHO = MyBase.Columns("CHANGED_WHO")
            Me.columnCHANGED_WHEN = MyBase.Columns("CHANGED_WHEN")
            Me.columnCOMMENT = MyBase.Columns("COMMENT")
+            Me.columnECM_FK_ID = MyBase.Columns("ECM_FK_ID")
+            Me.columnAD_SYNC = MyBase.Columns("AD_SYNC")
+            Me.columnINTERNAL = MyBase.Columns("INTERNAL")
+            Me.columnACTIVE = MyBase.Columns("ACTIVE")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
@@ -10018,6 +9989,14 @@ Partial Public Class DD_DMSDataSet
            MyBase.Columns.Add(Me.columnCHANGED_WHEN)
            Me.columnCOMMENT = New Global.System.Data.DataColumn("COMMENT", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCOMMENT)
+            Me.columnECM_FK_ID = New Global.System.Data.DataColumn("ECM_FK_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnECM_FK_ID)
+            Me.columnAD_SYNC = New Global.System.Data.DataColumn("AD_SYNC", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnAD_SYNC)
+            Me.columnINTERNAL = New Global.System.Data.DataColumn("INTERNAL", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnINTERNAL)
+            Me.columnACTIVE = New Global.System.Data.DataColumn("ACTIVE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
+            MyBase.Columns.Add(Me.columnACTIVE)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
            Me.columnGUID.AutoIncrement = true
            Me.columnGUID.AutoIncrementSeed = -1
@@ -10026,10 +10005,13 @@ Partial Public Class DD_DMSDataSet
            Me.columnGUID.ReadOnly = true
            Me.columnGUID.Unique = true
            Me.columnNAME.MaxLength = 50
-            Me.columnADDED_WHO.AllowDBNull = false
            Me.columnADDED_WHO.MaxLength = 50
            Me.columnCHANGED_WHO.MaxLength = 50
            Me.columnCOMMENT.MaxLength = 200
+            Me.columnECM_FK_ID.AllowDBNull = false
+            Me.columnAD_SYNC.AllowDBNull = false
+            Me.columnINTERNAL.AllowDBNull = false
+            Me.columnACTIVE.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
@@ -26913,62 +26895,6 @@ Partial Public Class DD_DMSDataSet
            End Set
        End Property
        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Property LOGGED_IN() As Boolean
-            Get
-                Return CType(Me(Me.tableTBDD_USER.LOGGED_INColumn),Boolean)
-            End Get
-            Set
-                Me(Me.tableTBDD_USER.LOGGED_INColumn) = value
-            End Set
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Property LOGGED_WHERE() As String
-            Get
-                Try 
-                    Return CType(Me(Me.tableTBDD_USER.LOGGED_WHEREColumn),String)
-                Catch e As Global.System.InvalidCastException
-                    Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte LOGGED_WHERE in Tabelle TBDD_USER ist DBNull.", e)
-                End Try
-            End Get
-            Set
-                Me(Me.tableTBDD_USER.LOGGED_WHEREColumn) = value
-            End Set
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Property LOG_IN_WHEN() As Date
-            Get
-                Try 
-                    Return CType(Me(Me.tableTBDD_USER.LOG_IN_WHENColumn),Date)
-                Catch e As Global.System.InvalidCastException
-                    Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte LOG_IN_WHEN in Tabelle TBDD_USER ist DBNull.", e)
-                End Try
-            End Get
-            Set
-                Me(Me.tableTBDD_USER.LOG_IN_WHENColumn) = value
-            End Set
-        End Property
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Property LOG_OUT_WHEN() As Date
-            Get
-                Try 
-                    Return CType(Me(Me.tableTBDD_USER.LOG_OUT_WHENColumn),Date)
-                Catch e As Global.System.InvalidCastException
-                    Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte LOG_OUT_WHEN in Tabelle TBDD_USER ist DBNull.", e)
-                End Try
-            End Get
-            Set
-                Me(Me.tableTBDD_USER.LOG_OUT_WHENColumn) = value
-            End Set
-        End Property
-        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ADDED_WHO() As String
@@ -27135,42 +27061,6 @@ Partial Public Class DD_DMSDataSet
            Me(Me.tableTBDD_USER.EMAILColumn) = Global.System.Convert.DBNull
        End Sub
        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Function IsLOGGED_WHERENull() As Boolean
-            Return Me.IsNull(Me.tableTBDD_USER.LOGGED_WHEREColumn)
-        End Function
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Sub SetLOGGED_WHERENull()
-            Me(Me.tableTBDD_USER.LOGGED_WHEREColumn) = Global.System.Convert.DBNull
-        End Sub
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Function IsLOG_IN_WHENNull() As Boolean
-            Return Me.IsNull(Me.tableTBDD_USER.LOG_IN_WHENColumn)
-        End Function
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Sub SetLOG_IN_WHENNull()
-            Me(Me.tableTBDD_USER.LOG_IN_WHENColumn) = Global.System.Convert.DBNull
-        End Sub
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Function IsLOG_OUT_WHENNull() As Boolean
-            Return Me.IsNull(Me.tableTBDD_USER.LOG_OUT_WHENColumn)
-        End Function
-        
-        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
-        Public Sub SetLOG_OUT_WHENNull()
-            Me(Me.tableTBDD_USER.LOG_OUT_WHENColumn) = Global.System.Convert.DBNull
-        End Sub
-        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function IsADDED_WHENNull() As Boolean
@@ -27437,7 +27327,11 @@ Partial Public Class DD_DMSDataSet
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Property ADDED_WHO() As String
            Get
-                Return CType(Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn),String)
+                Try 
+                    Return CType(Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn),String)
+                Catch e As Global.System.InvalidCastException
+                    Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHO in Tabelle TBDD_USER_GROUPS ist DBNull.", e)
+                End Try
            End Get
            Set
                Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn) = value
@@ -27504,6 +27398,50 @@ Partial Public Class DD_DMSDataSet
            End Set
        End Property
        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property ECM_FK_ID() As Integer
+            Get
+                Return CType(Me(Me.tableTBDD_USER_GROUPS.ECM_FK_IDColumn),Integer)
+            End Get
+            Set
+                Me(Me.tableTBDD_USER_GROUPS.ECM_FK_IDColumn) = value
+            End Set
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property AD_SYNC() As Boolean
+            Get
+                Return CType(Me(Me.tableTBDD_USER_GROUPS.AD_SYNCColumn),Boolean)
+            End Get
+            Set
+                Me(Me.tableTBDD_USER_GROUPS.AD_SYNCColumn) = value
+            End Set
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property INTERNAL() As Boolean
+            Get
+                Return CType(Me(Me.tableTBDD_USER_GROUPS.INTERNALColumn),Boolean)
+            End Get
+            Set
+                Me(Me.tableTBDD_USER_GROUPS.INTERNALColumn) = value
+            End Set
+        End Property
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Property ACTIVE() As Boolean
+            Get
+                Return CType(Me(Me.tableTBDD_USER_GROUPS.ACTIVEColumn),Boolean)
+            End Get
+            Set
+                Me(Me.tableTBDD_USER_GROUPS.ACTIVEColumn) = value
+            End Set
+        End Property
+        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function IsNAMENull() As Boolean
@@ -27516,6 +27454,18 @@ Partial Public Class DD_DMSDataSet
            Me(Me.tableTBDD_USER_GROUPS.NAMEColumn) = Global.System.Convert.DBNull
        End Sub
        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Function IsADDED_WHONull() As Boolean
+            Return Me.IsNull(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn)
+        End Function
+        
+        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
+        Public Sub SetADDED_WHONull()
+            Me(Me.tableTBDD_USER_GROUPS.ADDED_WHOColumn) = Global.System.Convert.DBNull
+        End Sub
+        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")>  _
        Public Function IsADDED_WHENNull() As Boolean
@@ -42125,10 +42075,6 @@ Namespace DD_DMSDataSetTableAdapters
            tableMapping.ColumnMappings.Add("NAME", "NAME")
            tableMapping.ColumnMappings.Add("USERNAME", "USERNAME")
            tableMapping.ColumnMappings.Add("EMAIL", "EMAIL")
-            tableMapping.ColumnMappings.Add("LOGGED_IN", "LOGGED_IN")
-            tableMapping.ColumnMappings.Add("LOGGED_WHERE", "LOGGED_WHERE")
-            tableMapping.ColumnMappings.Add("LOG_IN_WHEN", "LOG_IN_WHEN")
-            tableMapping.ColumnMappings.Add("LOG_OUT_WHEN", "LOG_OUT_WHEN")
            tableMapping.ColumnMappings.Add("ADDED_WHO", "ADDED_WHO")
            tableMapping.ColumnMappings.Add("ADDED_WHEN", "ADDED_WHEN")
            tableMapping.ColumnMappings.Add("CHANGED_WHO", "CHANGED_WHO")
@@ -42149,24 +42095,25 @@ Namespace DD_DMSDataSetTableAdapters
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_USER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         (PRENAME, NAME, USERNAME, EMAIL, "& _ 
                "LOGGED_IN, ADDED_WHO, LANGUAGE, SHORTNAME, COMMENT, WAN_ENVIRONMENT, DATE_FORMAT"& _ 
-                ", GENERAL_VIEWER)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES        (@PRENAME,@NAME,@USERNAME,@EMAIL,@LOGGED_IN, 0,"& _ 
-                "@ADDED_WHO, 1,@LANGUAG,@SHORTNAME,@COMMENT,@WAN_ENVIRONMENT,@DATE_FORMAT,@GENERA"& _ 
-                "L_VIEWER);       "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PRENAME, NAME, USERNAME, EMAIL, LOGGED_IN, LOGGE"& _ 
-                "D_WHERE, LOG_IN_WHEN, LOG_OUT_WHEN, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_"& _ 
-                "WHEN FROM TBDD_USER WHERE (GUID = SCOPE_IDENTITY())"
+                ", GENERAL_VIEWER, MODULE_WD_GLOBALHOOK, MODULE_DDCBSEARCHER)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES        (@PR"& _ 
+                "ENAME,@NAME,@USERNAME,@EMAIL,@LOGGED_IN, 0,@ADDED_WHO, 1,@LANGUAG,@SHORTNAME,@CO"& _ 
+                "MMENT,@WAN_ENVIRONMENT,@DATE_FORMAT,@GENERAL_VIEWER);        "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PREN"& _ 
+                "AME, NAME, USERNAME, EMAIL, LOGGED_IN, LOGGED_WHERE, LOG_IN_WHEN, LOG_OUT_WHEN, "& _ 
+                "ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER WHERE (GUID = SC"& _ 
+                "OPE_IDENTITY())"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PRENAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "PRENAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@USERNAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "USERNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EMAIL", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "EMAIL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LOGGED_IN", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "LOGGED_IN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LANGUAG", Global.System.Data.SqlDbType.VarChar, 5, Global.System.Data.ParameterDirection.Input, 0, 0, "LANGUAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SHORTNAME", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "SHORTNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WAN_ENVIRONMENT", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "WAN_ENVIRONMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DATE_FORMAT", Global.System.Data.SqlDbType.VarChar, 10, Global.System.Data.ParameterDirection.Input, 0, 0, "DATE_FORMAT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
-            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GENERAL_VIEWER", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "GENERAL_VIEWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 5, Global.System.Data.ParameterDirection.Input, 0, 0, "LANGUAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LANGUAG", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SHORTNAME", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "WAN_ENVIRONMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 10, Global.System.Data.ParameterDirection.Input, 0, 0, "DATE_FORMAT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WAN_ENVIRONMENT", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "GENERAL_VIEWER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DATE_FORMAT", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "MODULE_WD_GLOBALHOOK", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GENERAL_VIEWER", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "MODULE_DDCBSEARCHER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE       TBDD_USER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET                PRENAME = @PRENAME, NAME = @NAME, USER"& _ 
@@ -42205,14 +42152,13 @@ Namespace DD_DMSDataSetTableAdapters
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
            Me._commandCollection(0).Connection = Me.Connection
-            Me._commandCollection(0).CommandText = ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      SELECT        T.GUID, T.PRENAME, T.NAME, T.USERNAME, T.EM"& _ 
-                "AIL, T.LOGGED_IN, T.LOGGED_WHERE, T.LOG_IN_WHEN, T.LOG_OUT_WHEN, T.ADDED_WHO, T."& _ 
-                "ADDED_WHEN, T.CHANGED_WHO, T.CHANGED_WHEN,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      T.LANGUAGE, T."& _ 
-                "COMMENT, T.SHORTNAME, T.WAN_ENVIRONMENT, T.DATE_FORMAT, T.GENERAL_VIEWER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"      "& _ 
-                "                FROM            TBDD_USER T INNER JOIN TBDD_USER_MODULES T1 ON T"& _ 
-                ".GUID = T1.USER_ID INNER JOIN TBDD_MODULES T2 ON T1.MODULE_ID = T2.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"       "& _ 
-                "               WHERE T2.SHORT_NAME = 'ADDI'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      ORDER BY USER"& _ 
-                "NAME"
+            Me._commandCollection(0).CommandText = "SELECT        T.GUID, T.PRENAME, T.NAME, T.USERNAME, T.EMAIL, T.ADDED_WHO, T.ADDE"& _ 
+                "D_WHEN, T.CHANGED_WHO, T.CHANGED_WHEN, T.LANGUAGE, T.COMMENT, T.SHORTNAME, T.WAN"& _ 
+                "_ENVIRONMENT, T.DATE_FORMAT, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         T.GENERAL_VIEWER"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM  "& _ 
+                "          TBDD_USER AS T INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         TBDD_USER_MODULES "& _ 
+                "AS T1 ON T.GUID = T1.USER_ID INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         TBDD_MODULES A"& _ 
+                "S T2 ON T1.MODULE_ID = T2.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (T2.SHORT_NAME = 'ADDI')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY "& _ 
+                "T.USERNAME"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
@@ -42293,7 +42239,7 @@ Namespace DD_DMSDataSetTableAdapters
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
-        Public Overloads Overridable Function Insert(ByVal PRENAME As String, ByVal NAME As String, ByVal USERNAME As String, ByVal EMAIL As String, ByVal LOGGED_IN As Boolean, ByVal ADDED_WHO As String, ByVal LANGUAG As String, ByVal SHORTNAME As String, ByVal COMMENT As String, ByVal WAN_ENVIRONMENT As Boolean, ByVal DATE_FORMAT As String, ByVal GENERAL_VIEWER As String) As Integer
+        Public Overloads Overridable Function Insert(ByVal PRENAME As String, ByVal NAME As String, ByVal USERNAME As String, ByVal EMAIL As String, ByVal LOGGED_IN As Boolean, ByVal ADDED_WHO As String, ByVal LANGUAG As String, ByVal SHORTNAME As Boolean, ByVal COMMENT As String, ByVal WAN_ENVIRONMENT As String, ByVal DATE_FORMAT As Boolean, ByVal GENERAL_VIEWER As Boolean) As Integer
            If (PRENAME Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
@@ -42321,31 +42267,23 @@ Namespace DD_DMSDataSetTableAdapters
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(ADDED_WHO,String)
            End If
            If (LANGUAG Is Nothing) Then
-                Throw New Global.System.ArgumentNullException("LANGUAG")
+                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(LANGUAG,String)
            End If
-            If (SHORTNAME Is Nothing) Then
-                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
-            Else
-                Me.Adapter.InsertCommand.Parameters(7).Value = CType(SHORTNAME,String)
-            End If
+            Me.Adapter.InsertCommand.Parameters(7).Value = CType(SHORTNAME,Boolean)
            If (COMMENT Is Nothing) Then
-                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
+                Throw New Global.System.ArgumentNullException("COMMENT")
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(COMMENT,String)
            End If
-            Me.Adapter.InsertCommand.Parameters(9).Value = CType(WAN_ENVIRONMENT,Boolean)
-            If (DATE_FORMAT Is Nothing) Then
-                Throw New Global.System.ArgumentNullException("DATE_FORMAT")
+            If (WAN_ENVIRONMENT Is Nothing) Then
+                Throw New Global.System.ArgumentNullException("WAN_ENVIRONMENT")
            Else
-                Me.Adapter.InsertCommand.Parameters(10).Value = CType(DATE_FORMAT,String)
-            End If
-            If (GENERAL_VIEWER Is Nothing) Then
-                Throw New Global.System.ArgumentNullException("GENERAL_VIEWER")
-            Else
-                Me.Adapter.InsertCommand.Parameters(11).Value = CType(GENERAL_VIEWER,String)
+                Me.Adapter.InsertCommand.Parameters(9).Value = CType(WAN_ENVIRONMENT,String)
            End If
+            Me.Adapter.InsertCommand.Parameters(10).Value = CType(DATE_FORMAT,Boolean)
+            Me.Adapter.InsertCommand.Parameters(11).Value = CType(GENERAL_VIEWER,Boolean)
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
@@ -42923,6 +42861,10 @@ Namespace DD_DMSDataSetTableAdapters
            tableMapping.ColumnMappings.Add("CHANGED_WHO", "CHANGED_WHO")
            tableMapping.ColumnMappings.Add("CHANGED_WHEN", "CHANGED_WHEN")
            tableMapping.ColumnMappings.Add("COMMENT", "COMMENT")
+            tableMapping.ColumnMappings.Add("ECM_FK_ID", "ECM_FK_ID")
+            tableMapping.ColumnMappings.Add("AD_SYNC", "AD_SYNC")
+            tableMapping.ColumnMappings.Add("INTERNAL", "INTERNAL")
+            tableMapping.ColumnMappings.Add("ACTIVE", "ACTIVE")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
            Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -42931,20 +42873,20 @@ Namespace DD_DMSDataSetTableAdapters
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
            Me._adapter.InsertCommand.Connection = Me.Connection
-            Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         (NAME, ADDED_WHO, COMMENT)"& _ 
-                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES        (@NAME,@ADDED_WHO,@COMMENT);  "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO, AD"& _ 
-                "DED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_ID"& _ 
-                "ENTITY())"
+            Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                         (NAME, ADDED_WHO, COMMENT)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VAL"& _ 
+                "UES        (@NAME,@ADDED_WHO,@COMMENT);   "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, ADDED_WHO, ADDED_"& _ 
+                "WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WHERE (GUID = SCOPE_IDENTI"& _ 
+                "TY())"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
            Me._adapter.UpdateCommand.Connection = Me.Connection
-            Me._adapter.UpdateCommand.CommandText = "UPDATE       TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET                NAME = @NAME, CHANGED_WHO = @CH"& _ 
-                "ANGED_WHO, COMMENT = @COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID = @Original_GUID);  "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT G"& _ 
-                "UID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUP"& _ 
-                "S WHERE (GUID = @GUID)"
+            Me._adapter.UpdateCommand.CommandText = "UPDATE       TBDD_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET                NAME = @NAME, CHANGED_WHO = @CHANGED"& _ 
+                "_WHO, COMMENT = @COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (GUID = @Original_GUID);   "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID,"& _ 
+                " NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBDD_USER_GROUPS WH"& _ 
+                "ERE (GUID = @GUID)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -42967,7 +42909,8 @@ Namespace DD_DMSDataSetTableAdapters
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT        GUID, NAME, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COMME"& _ 
-                "NT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBDD_USER_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NAME"
+                "NT, ECM_FK_ID, AD_SYNC, INTERNAL, ACTIVE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM            TBDD_GROUPS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY "& _ 
+                "NAME"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
@@ -43055,7 +42998,7 @@ Namespace DD_DMSDataSetTableAdapters
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NAME,String)
            End If
            If (ADDED_WHO Is Nothing) Then
-                Throw New Global.System.ArgumentNullException("ADDED_WHO")
+                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(ADDED_WHO,String)
            End If
@@ -51935,11 +51878,10 @@ Namespace DD_DMSDataSetTableAdapters
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT        GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A"& _ 
                "DDED_WHEN, CHANGED_WHO, CHANGED_WHEN, NAME, COMMENT, PARENT_NODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM          "& _ 
-                "  TBPMO_STRUCTURE_NODES_CONFIGURATION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (ENTITY_ID in (SELECT FORM_I"& _ 
-                "D FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE CONSTRUCT_ID = @CONSTRUCT_ID  ))"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORD"& _ 
-                "ER BY ENTITY_ID, TYPE_NODE"
+                "  TBPMO_STRUCTURE_NODES_CONFIGURATION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE        (ENTITY_ID = @ENTITY_ID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"OR"& _ 
+                "DER BY ENTITY_ID, TYPE_NODE"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
-            Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONSTRUCT_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
+            Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT        GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A"& _ 
@@ -51953,9 +51895,9 @@ Namespace DD_DMSDataSetTableAdapters
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
-        Public Overloads Overridable Function Fill(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal CONSTRUCT_ID As Integer) As Integer
+        Public Overloads Overridable Function Fill(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal ENTITY_ID As Integer) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
-            Me.Adapter.SelectCommand.Parameters(0).Value = CType(CONSTRUCT_ID,Integer)
+            Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
@@ -51967,9 +51909,9 @@ Namespace DD_DMSDataSetTableAdapters
         Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
-        Public Overloads Overridable Function GetData(ByVal CONSTRUCT_ID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
+        Public Overloads Overridable Function GetData(ByVal ENTITY_ID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
-            Me.Adapter.SelectCommand.Parameters(0).Value = CType(CONSTRUCT_ID,Integer)
+            Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
            Dim dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable = New DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable()
            Me.Adapter.Fill(dataTable)
            Return dataTable