Small fixes

This commit is contained in:
Jonathan Jenne 2019-07-31 17:11:13 +02:00
parent 71559c9ca5
commit 28d5e590b4
8 changed files with 5375 additions and 865 deletions

View File

@ -45,10 +45,15 @@ Public Class ClassProfileFilter
End Property
Public Sub New(ProfileDatatable As DataTable, WindowDatatable As DataTable)
Try
_DebugData = New DebugData()
_ProfileTable = ProfileDatatable
_WindowTable = WindowDatatable
_Profiles = TransformProfiles()
Catch ex As Exception
Logger.Error(ex)
Throw ex
End Try
End Sub
Public Function ToList() As List(Of ProfileData)
@ -121,34 +126,6 @@ Public Class ClassProfileFilter
p.Windows = oWindows
Next
'Dim oProfiles = _Profiles.Select(Function(p As ProfileData)
' Dim oWindows As List(Of WindowData) = p.Windows
' p.Windows = oWindows.
' Where(Function(w)
' Try
' If w.Regex = String.Empty Then Return True
' Dim oRegex As New Regex(w.Regex)
' Dim oMatch = oRegex.Match(WindowTitle)
' If oMatch.Success Then
' 'TODO: Add Debug Data
' Return True
' Else
' Return False
' End If
' Catch ex As Exception
' Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, WindowTitle)
' Logger.Error(ex)
' Return False
' End Try
' End Function).
' ToList()
' Return p
' End Function)
Return oProfiles
End Function

View File

@ -705,10 +705,6 @@ Partial Public Class MyDataset
Private columnPROFILE_TYPE As Global.System.Data.DataColumn
Private columnSQL_COUNT_DOCS As Global.System.Data.DataColumn
Private columnSQL_COUNT_DATA As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Sub New()
@ -832,22 +828,6 @@ Partial Public Class MyDataset
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public ReadOnly Property SQL_COUNT_DOCSColumn() As Global.System.Data.DataColumn
Get
Return Me.columnSQL_COUNT_DOCS
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public ReadOnly Property SQL_COUNT_DATAColumn() As Global.System.Data.DataColumn
Get
Return Me.columnSQL_COUNT_DATA
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
@ -885,9 +865,9 @@ Partial Public Class MyDataset
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Overloads Function AddTBCW_PROFILESRow(ByVal NAME As String, ByVal COMMENT As String, ByVal WD_SEARCH As String, ByVal REGEX_EXPRESSION As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ACTIVE As Boolean, ByVal PROFILE_TYPE As Short, ByVal SQL_COUNT_DOCS As String, ByVal SQL_COUNT_DATA As String) As TBCW_PROFILESRow
Public Overloads Function AddTBCW_PROFILESRow(ByVal NAME As String, ByVal COMMENT As String, ByVal WD_SEARCH As String, ByVal REGEX_EXPRESSION As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ACTIVE As Boolean, ByVal PROFILE_TYPE As Short) As TBCW_PROFILESRow
Dim rowTBCW_PROFILESRow As TBCW_PROFILESRow = CType(Me.NewRow,TBCW_PROFILESRow)
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE, SQL_COUNT_DOCS, SQL_COUNT_DATA}
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE}
rowTBCW_PROFILESRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBCW_PROFILESRow)
Return rowTBCW_PROFILESRow
@ -927,8 +907,6 @@ Partial Public Class MyDataset
Me.columnCHANGED_WHEN = MyBase.Columns("CHANGED_WHEN")
Me.columnACTIVE = MyBase.Columns("ACTIVE")
Me.columnPROFILE_TYPE = MyBase.Columns("PROFILE_TYPE")
Me.columnSQL_COUNT_DOCS = MyBase.Columns("SQL_COUNT_DOCS")
Me.columnSQL_COUNT_DATA = MyBase.Columns("SQL_COUNT_DATA")
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -956,10 +934,6 @@ Partial Public Class MyDataset
MyBase.Columns.Add(Me.columnACTIVE)
Me.columnPROFILE_TYPE = New Global.System.Data.DataColumn("PROFILE_TYPE", GetType(Short), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnPROFILE_TYPE)
Me.columnSQL_COUNT_DOCS = New Global.System.Data.DataColumn("SQL_COUNT_DOCS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSQL_COUNT_DOCS)
Me.columnSQL_COUNT_DATA = New Global.System.Data.DataColumn("SQL_COUNT_DATA", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSQL_COUNT_DATA)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AutoIncrement = true
Me.columnGUID.AllowDBNull = false
@ -979,10 +953,6 @@ Partial Public Class MyDataset
Me.columnACTIVE.AllowDBNull = false
Me.columnACTIVE.DefaultValue = CType(false,Boolean)
Me.columnPROFILE_TYPE.AllowDBNull = false
Me.columnSQL_COUNT_DOCS.AllowDBNull = false
Me.columnSQL_COUNT_DOCS.MaxLength = 2147483647
Me.columnSQL_COUNT_DATA.AllowDBNull = false
Me.columnSQL_COUNT_DATA.MaxLength = 2147483647
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -4935,28 +4905,6 @@ Partial Public Class MyDataset
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property SQL_COUNT_DOCS() As String
Get
Return CType(Me(Me.tableTBCW_PROFILES.SQL_COUNT_DOCSColumn),String)
End Get
Set
Me(Me.tableTBCW_PROFILES.SQL_COUNT_DOCSColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Property SQL_COUNT_DATA() As String
Get
Return CType(Me(Me.tableTBCW_PROFILES.SQL_COUNT_DATAColumn),String)
End Get
Set
Me(Me.tableTBCW_PROFILES.SQL_COUNT_DATAColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
Public Function IsCOMMENTNull() As Boolean
@ -6955,29 +6903,53 @@ Namespace MyDatasetTableAdapters
tableMapping.ColumnMappings.Add("CHANGED_WHEN", "CHANGED_WHEN")
tableMapping.ColumnMappings.Add("ACTIVE", "ACTIVE")
tableMapping.ColumnMappings.Add("PROFILE_TYPE", "PROFILE_TYPE")
tableMapping.ColumnMappings.Add("SQL_COUNT_DOCS", "SQL_COUNT_DOCS")
tableMapping.ColumnMappings.Add("SQL_COUNT_DATA", "SQL_COUNT_DATA")
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBCW_PROFILES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.DeleteCommand.CommandText = "DELETE FROM [TBCW_PROFILES] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Origi"& _
"nal_NAME) AND ((@IsNull_COMMENT = 1 AND [COMMENT] IS NULL) OR ([COMMENT] = @Orig"& _
"inal_COMMENT)) AND ([WD_SEARCH] = @Original_WD_SEARCH) AND ([REGEX_EXPRESSION] ="& _
" @Original_REGEX_EXPRESSION) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNu"& _
"ll_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_W"& _
"HEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO]"& _
" = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS "& _
"NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([ACTIVE] = @Original_AC"& _
"TIVE) AND ([PROFILE_TYPE] = @Original_PROFILE_TYPE))"
Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
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.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_COMMENT", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_COMMENT", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_REGEX_EXPRESSION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_EXPRESSION", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ADDED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ACTIVE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PROFILE_TYPE", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_TYPE", 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 TBCW_PROFILES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, COMMENT, WD_SEARCH, RE"& _
"GEX_EXPRESSION, ADDED_WHO, ACTIVE, PROFILE_TYPE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@COMMENT,"& _
"@WD_SEARCH,@REGEX_EXPRESSION,@ADDED_WHO,@ACTIVE,@PROFILE_TYPE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUI"& _
"D, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WH"& _
"O, CHANGED_WHEN FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())"
Me._adapter.InsertCommand.CommandText = "INSERT INTO [TBCW_PROFILES] ([NAME], [COMMENT], [WD_SEARCH], [REGEX_EXPRESSION], "& _
"[ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN], [ACTIVE], [PROFILE_TYP"& _
"E]) VALUES (@NAME, @COMMENT, @WD_SEARCH, @REGEX_EXPRESSION, @ADDED_WHO, @ADDED_W"& _
"HEN, @CHANGED_WHO, @CHANGED_WHEN, @ACTIVE, @PROFILE_TYPE);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, C"& _
"OMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED"& _
"_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())"
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, 100, 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("@COMMENT", 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("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_EXPRESSION", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_EXPRESSION", 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("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFILE_TYPE", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_TYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 0, 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("@COMMENT", Global.System.Data.SqlDbType.VarChar, 0, 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("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_EXPRESSION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_EXPRESSION", 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, 0, 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("@ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFILE_TYPE", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFILE_TYPE", 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 TBCW_PROFILES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, COMMENT = @COMMENT, "& _
@ -7011,9 +6983,8 @@ Namespace MyDatasetTableAdapters
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 = "SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_"& _
"WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, SQL_COUNT_DOCS, SQL_COUNT_DATA, PROFILE"& _
"_TYPE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBCW_PROFILES"
Me._commandCollection(0).CommandText = "SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, C"& _
"HANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub
@ -7073,8 +7044,58 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer
Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_NAME As String, ByVal Original_COMMENT As String, ByVal Original_WD_SEARCH As String, ByVal Original_REGEX_EXPRESSION As String, ByVal Original_ADDED_WHO As String, ByVal Original_ADDED_WHEN As Global.System.Nullable(Of Date), ByVal Original_CHANGED_WHO As String, ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal Original_ACTIVE As Boolean, ByVal Original_PROFILE_TYPE As Short) As Integer
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
If (Original_NAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("Original_NAME")
Else
Me.Adapter.DeleteCommand.Parameters(1).Value = CType(Original_NAME,String)
End If
If (Original_COMMENT Is Nothing) Then
Me.Adapter.DeleteCommand.Parameters(2).Value = CType(1,Object)
Me.Adapter.DeleteCommand.Parameters(3).Value = Global.System.DBNull.Value
Else
Me.Adapter.DeleteCommand.Parameters(2).Value = CType(0,Object)
Me.Adapter.DeleteCommand.Parameters(3).Value = CType(Original_COMMENT,String)
End If
If (Original_WD_SEARCH Is Nothing) Then
Throw New Global.System.ArgumentNullException("Original_WD_SEARCH")
Else
Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_WD_SEARCH,String)
End If
If (Original_REGEX_EXPRESSION Is Nothing) Then
Throw New Global.System.ArgumentNullException("Original_REGEX_EXPRESSION")
Else
Me.Adapter.DeleteCommand.Parameters(5).Value = CType(Original_REGEX_EXPRESSION,String)
End If
If (Original_ADDED_WHO Is Nothing) Then
Throw New Global.System.ArgumentNullException("Original_ADDED_WHO")
Else
Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_ADDED_WHO,String)
End If
If (Original_ADDED_WHEN.HasValue = true) Then
Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_ADDED_WHEN.Value,Date)
Else
Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
End If
If (Original_CHANGED_WHO Is Nothing) Then
Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
Else
Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_CHANGED_WHO,String)
End If
If (Original_CHANGED_WHEN.HasValue = true) Then
Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_CHANGED_WHEN.Value,Date)
Else
Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
End If
Me.Adapter.DeleteCommand.Parameters(13).Value = CType(Original_ACTIVE,Boolean)
Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_PROFILE_TYPE,Short)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then
@ -7094,7 +7115,7 @@ Namespace MyDatasetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.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 NAME As String, ByVal COMMENT As String, ByVal WD_SEARCH As String, ByVal REGEX_EXPRESSION As String, ByVal ADDED_WHO As String, ByVal ACTIVE As Boolean, ByVal PROFILE_TYPE As Short) As Integer
Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal COMMENT As String, ByVal WD_SEARCH As String, ByVal REGEX_EXPRESSION As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Global.System.Nullable(Of Date), ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal ACTIVE As Boolean, ByVal PROFILE_TYPE As Short) As Integer
If (NAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("NAME")
Else
@ -7120,8 +7141,23 @@ Namespace MyDatasetTableAdapters
Else
Me.Adapter.InsertCommand.Parameters(4).Value = CType(ADDED_WHO,String)
End If
Me.Adapter.InsertCommand.Parameters(5).Value = CType(ACTIVE,Boolean)
Me.Adapter.InsertCommand.Parameters(6).Value = CType(PROFILE_TYPE,Short)
If (ADDED_WHEN.HasValue = true) Then
Me.Adapter.InsertCommand.Parameters(5).Value = CType(ADDED_WHEN.Value,Date)
Else
Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
End If
If (CHANGED_WHO Is Nothing) Then
Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
Else
Me.Adapter.InsertCommand.Parameters(6).Value = CType(CHANGED_WHO,String)
End If
If (CHANGED_WHEN.HasValue = true) Then
Me.Adapter.InsertCommand.Parameters(7).Value = CType(CHANGED_WHEN.Value,Date)
Else
Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
End If
Me.Adapter.InsertCommand.Parameters(8).Value = CType(ACTIVE,Boolean)
Me.Adapter.InsertCommand.Parameters(9).Value = CType(PROFILE_TYPE,Short)
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

View File

@ -12,34 +12,47 @@
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBCW_PROFILES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM TBCW_PROFILES
WHERE (GUID = @Original_GUID)</CommandText>
<CommandText>DELETE FROM [TBCW_PROFILES] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME) AND ((@IsNull_COMMENT = 1 AND [COMMENT] IS NULL) OR ([COMMENT] = @Original_COMMENT)) AND ([WD_SEARCH] = @Original_WD_SEARCH) AND ([REGEX_EXPRESSION] = @Original_REGEX_EXPRESSION) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([ACTIVE] = @Original_ACTIVE) AND ([PROFILE_TYPE] = @Original_PROFILE_TYPE))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_COMMENT" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_ADDED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO TBCW_PROFILES
(NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ACTIVE, PROFILE_TYPE)
VALUES (@NAME,@COMMENT,@WD_SEARCH,@REGEX_EXPRESSION,@ADDED_WHO,@ACTIVE,@PROFILE_TYPE);
SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<CommandText>INSERT INTO [TBCW_PROFILES] ([NAME], [COMMENT], [WD_SEARCH], [REGEX_EXPRESSION], [ADDED_WHO], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN], [ACTIVE], [PROFILE_TYPE]) VALUES (@NAME, @COMMENT, @WD_SEARCH, @REGEX_EXPRESSION, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @ACTIVE, @PROFILE_TYPE);
SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="COMMENT" ColumnName="COMMENT" DataSourceName="" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="WD_SEARCH" ColumnName="WD_SEARCH" DataSourceName="" DataTypeServer="varchar(250)" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="250" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_EXPRESSION" ColumnName="REGEX_EXPRESSION" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROFILE_TYPE" ColumnName="PROFILE_TYPE" DataSourceName="" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@COMMENT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="COMMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@WD_SEARCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="WD_SEARCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_EXPRESSION" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@PROFILE_TYPE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="PROFILE_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, SQL_COUNT_DOCS, SQL_COUNT_DATA, PROFILE_TYPE
FROM TBCW_PROFILES</CommandText>
<CommandText>SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, PROFILE_TYPE FROM TBCW_PROFILES</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
@ -77,8 +90,6 @@ SELECT GUID, NAME, COMMENT, WD_SEARCH, REGEX_EXPRESSION, ADDED_WHO, ADDED_WHEN,
<Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
<Mapping SourceColumn="ACTIVE" DataSetColumn="ACTIVE" />
<Mapping SourceColumn="PROFILE_TYPE" DataSetColumn="PROFILE_TYPE" />
<Mapping SourceColumn="SQL_COUNT_DOCS" DataSetColumn="SQL_COUNT_DOCS" />
<Mapping SourceColumn="SQL_COUNT_DATA" DataSetColumn="SQL_COUNT_DATA" />
</Mappings>
<Sources />
</TableAdapter>
@ -646,7 +657,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
<xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="TBCW_PROFILES" msprop:Generator_TableClassName="TBCW_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILES" msprop:Generator_RowChangedName="TBCW_PROFILESRowChanged" msprop:Generator_TablePropName="TBCW_PROFILES" msprop:Generator_RowDeletingName="TBCW_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILESRowDeleted" msprop:Generator_RowClassName="TBCW_PROFILESRow" msprop:Generator_UserTableName="TBCW_PROFILES" msprop:Generator_RowEvArgName="TBCW_PROFILESRowChangeEvent">
<xs:element name="TBCW_PROFILES" msprop:Generator_TableClassName="TBCW_PROFILESDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILES" msprop:Generator_TablePropName="TBCW_PROFILES" msprop:Generator_RowDeletingName="TBCW_PROFILESRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILESRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILESRowDeleted" msprop:Generator_UserTableName="TBCW_PROFILES" msprop:Generator_RowChangedName="TBCW_PROFILESRowChanged" msprop:Generator_RowEvArgName="TBCW_PROFILESRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROFILESRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -696,24 +707,10 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
<xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
<xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" default="false" />
<xs:element name="PROFILE_TYPE" msprop:Generator_ColumnVarNameInTable="columnPROFILE_TYPE" msprop:Generator_ColumnPropNameInRow="PROFILE_TYPE" msprop:Generator_ColumnPropNameInTable="PROFILE_TYPEColumn" msprop:Generator_UserColumnName="PROFILE_TYPE" type="xs:short" />
<xs:element name="SQL_COUNT_DOCS" msprop:Generator_ColumnVarNameInTable="columnSQL_COUNT_DOCS" msprop:Generator_ColumnPropNameInRow="SQL_COUNT_DOCS" msprop:Generator_ColumnPropNameInTable="SQL_COUNT_DOCSColumn" msprop:Generator_UserColumnName="SQL_COUNT_DOCS">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="SQL_COUNT_DATA" msprop:Generator_ColumnVarNameInTable="columnSQL_COUNT_DATA" msprop:Generator_ColumnPropNameInRow="SQL_COUNT_DATA" msprop:Generator_ColumnPropNameInTable="SQL_COUNT_DATAColumn" msprop:Generator_UserColumnName="SQL_COUNT_DATA">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_USER_PROFILE" msprop:Generator_TableClassName="TBCW_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_USER_PROFILE" msprop:Generator_RowChangedName="TBCW_USER_PROFILERowChanged" msprop:Generator_TablePropName="TBCW_USER_PROFILE" msprop:Generator_RowDeletingName="TBCW_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_USER_PROFILERowDeleted" msprop:Generator_RowClassName="TBCW_USER_PROFILERow" msprop:Generator_UserTableName="TBCW_USER_PROFILE" msprop:Generator_RowEvArgName="TBCW_USER_PROFILERowChangeEvent">
<xs:element name="TBCW_USER_PROFILE" msprop:Generator_TableClassName="TBCW_USER_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_USER_PROFILE" msprop:Generator_TablePropName="TBCW_USER_PROFILE" msprop:Generator_RowDeletingName="TBCW_USER_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_USER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_USER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_USER_PROFILERowDeleted" msprop:Generator_UserTableName="TBCW_USER_PROFILE" msprop:Generator_RowChangedName="TBCW_USER_PROFILERowChanged" msprop:Generator_RowEvArgName="TBCW_USER_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBCW_USER_PROFILERow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -730,7 +727,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWUSER_PROFILE" msprop:Generator_TableClassName="VWUSER_PROFILEDataTable" msprop:Generator_TableVarName="tableVWUSER_PROFILE" msprop:Generator_TablePropName="VWUSER_PROFILE" msprop:Generator_RowDeletingName="VWUSER_PROFILERowDeleting" msprop:Generator_RowChangingName="VWUSER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWUSER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWUSER_PROFILERowDeleted" msprop:Generator_UserTableName="VWUSER_PROFILE" msprop:Generator_RowChangedName="VWUSER_PROFILERowChanged" msprop:Generator_RowEvArgName="VWUSER_PROFILERowChangeEvent" msprop:Generator_RowClassName="VWUSER_PROFILERow">
<xs:element name="VWUSER_PROFILE" msprop:Generator_TableClassName="VWUSER_PROFILEDataTable" msprop:Generator_TableVarName="tableVWUSER_PROFILE" msprop:Generator_RowChangedName="VWUSER_PROFILERowChanged" msprop:Generator_TablePropName="VWUSER_PROFILE" msprop:Generator_RowDeletingName="VWUSER_PROFILERowDeleting" msprop:Generator_RowChangingName="VWUSER_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWUSER_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWUSER_PROFILERowDeleted" msprop:Generator_RowClassName="VWUSER_PROFILERow" msprop:Generator_UserTableName="VWUSER_PROFILE" msprop:Generator_RowEvArgName="VWUSER_PROFILERowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -759,7 +756,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_User" msprop:Generator_TableClassName="TBWH_UserDataTable" msprop:Generator_TableVarName="tableTBWH_User" msprop:Generator_RowChangedName="TBWH_UserRowChanged" msprop:Generator_TablePropName="TBWH_User" msprop:Generator_RowDeletingName="TBWH_UserRowDeleting" msprop:Generator_RowChangingName="TBWH_UserRowChanging" msprop:Generator_RowEvHandlerName="TBWH_UserRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_UserRowDeleted" msprop:Generator_RowClassName="TBWH_UserRow" msprop:Generator_UserTableName="TBWH_User" msprop:Generator_RowEvArgName="TBWH_UserRowChangeEvent">
<xs:element name="TBWH_User" msprop:Generator_TableClassName="TBWH_UserDataTable" msprop:Generator_TableVarName="tableTBWH_User" msprop:Generator_TablePropName="TBWH_User" msprop:Generator_RowDeletingName="TBWH_UserRowDeleting" msprop:Generator_RowChangingName="TBWH_UserRowChanging" msprop:Generator_RowEvHandlerName="TBWH_UserRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_UserRowDeleted" msprop:Generator_UserTableName="TBWH_User" msprop:Generator_RowChangedName="TBWH_UserRowChanged" msprop:Generator_RowEvArgName="TBWH_UserRowChangeEvent" msprop:Generator_RowClassName="TBWH_UserRow">
<xs:complexType>
<xs:sequence>
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
@ -771,7 +768,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCW_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILE_PROCESS" msprop:Generator_TablePropName="TBCW_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCW_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILE_PROCESSRowDeleted" msprop:Generator_UserTableName="TBCW_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCW_PROFILE_PROCESSRowChanged" msprop:Generator_RowEvArgName="TBCW_PROFILE_PROCESSRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROFILE_PROCESSRow">
<xs:element name="TBCW_PROFILE_PROCESS" msprop:Generator_TableClassName="TBCW_PROFILE_PROCESSDataTable" msprop:Generator_TableVarName="tableTBCW_PROFILE_PROCESS" msprop:Generator_RowChangedName="TBCW_PROFILE_PROCESSRowChanged" msprop:Generator_TablePropName="TBCW_PROFILE_PROCESS" msprop:Generator_RowDeletingName="TBCW_PROFILE_PROCESSRowDeleting" msprop:Generator_RowChangingName="TBCW_PROFILE_PROCESSRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROFILE_PROCESSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROFILE_PROCESSRowDeleted" msprop:Generator_RowClassName="TBCW_PROFILE_PROCESSRow" msprop:Generator_UserTableName="TBCW_PROFILE_PROCESS" msprop:Generator_RowEvArgName="TBCW_PROFILE_PROCESSRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -794,7 +791,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_PROF_DATA_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DATA_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DATA_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DATA_SEARCHRowChanged" msprop:Generator_TablePropName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DATA_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DATA_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DATA_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DATA_SEARCHRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_DATA_SEARCHRow" msprop:Generator_UserTableName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowEvArgName="TBCW_PROF_DATA_SEARCHRowChangeEvent">
<xs:element name="TBCW_PROF_DATA_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DATA_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DATA_SEARCH" msprop:Generator_TablePropName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DATA_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DATA_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DATA_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DATA_SEARCHRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_DATA_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DATA_SEARCHRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_DATA_SEARCHRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_DATA_SEARCHRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -842,7 +839,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_PROF_DOC_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DOC_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DOC_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DOC_SEARCHRowChanged" msprop:Generator_TablePropName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DOC_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DOC_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DOC_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DOC_SEARCHRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_DOC_SEARCHRow" msprop:Generator_UserTableName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowEvArgName="TBCW_PROF_DOC_SEARCHRowChangeEvent">
<xs:element name="TBCW_PROF_DOC_SEARCH" msprop:Generator_TableClassName="TBCW_PROF_DOC_SEARCHDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_DOC_SEARCH" msprop:Generator_TablePropName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowDeletingName="TBCW_PROF_DOC_SEARCHRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_DOC_SEARCHRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_DOC_SEARCHRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_DOC_SEARCHRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_DOC_SEARCH" msprop:Generator_RowChangedName="TBCW_PROF_DOC_SEARCHRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_DOC_SEARCHRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_DOC_SEARCHRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -890,7 +887,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_GROUP_PROFILE" msprop:Generator_TableClassName="TBCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_GROUP_PROFILE" msprop:Generator_RowChangedName="TBCW_GROUP_PROFILERowChanged" msprop:Generator_TablePropName="TBCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="TBCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_GROUP_PROFILERowDeleted" msprop:Generator_RowClassName="TBCW_GROUP_PROFILERow" msprop:Generator_UserTableName="TBCW_GROUP_PROFILE" msprop:Generator_RowEvArgName="TBCW_GROUP_PROFILERowChangeEvent">
<xs:element name="TBCW_GROUP_PROFILE" msprop:Generator_TableClassName="TBCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableTBCW_GROUP_PROFILE" msprop:Generator_TablePropName="TBCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="TBCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="TBCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_GROUP_PROFILERowDeleted" msprop:Generator_UserTableName="TBCW_GROUP_PROFILE" msprop:Generator_RowChangedName="TBCW_GROUP_PROFILERowChanged" msprop:Generator_RowEvArgName="TBCW_GROUP_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBCW_GROUP_PROFILERow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -907,7 +904,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_GROUP" msprop:Generator_TableClassName="TBWH_GROUPDataTable" msprop:Generator_TableVarName="tableTBWH_GROUP" msprop:Generator_RowChangedName="TBWH_GROUPRowChanged" msprop:Generator_TablePropName="TBWH_GROUP" msprop:Generator_RowDeletingName="TBWH_GROUPRowDeleting" msprop:Generator_RowChangingName="TBWH_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBWH_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_GROUPRowDeleted" msprop:Generator_RowClassName="TBWH_GROUPRow" msprop:Generator_UserTableName="TBWH_GROUP" msprop:Generator_RowEvArgName="TBWH_GROUPRowChangeEvent">
<xs:element name="TBWH_GROUP" msprop:Generator_TableClassName="TBWH_GROUPDataTable" msprop:Generator_TableVarName="tableTBWH_GROUP" msprop:Generator_TablePropName="TBWH_GROUP" msprop:Generator_RowDeletingName="TBWH_GROUPRowDeleting" msprop:Generator_RowChangingName="TBWH_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBWH_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_GROUPRowDeleted" msprop:Generator_UserTableName="TBWH_GROUP" msprop:Generator_RowChangedName="TBWH_GROUPRowChanged" msprop:Generator_RowEvArgName="TBWH_GROUPRowChangeEvent" msprop:Generator_RowClassName="TBWH_GROUPRow">
<xs:complexType>
<xs:sequence>
<xs:element name="ID" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:string" minOccurs="0" />
@ -915,7 +912,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWCW_GROUP_PROFILE" msprop:Generator_TableClassName="VWCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableVWCW_GROUP_PROFILE" msprop:Generator_RowChangedName="VWCW_GROUP_PROFILERowChanged" msprop:Generator_TablePropName="VWCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="VWCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="VWCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWCW_GROUP_PROFILERowDeleted" msprop:Generator_RowClassName="VWCW_GROUP_PROFILERow" msprop:Generator_UserTableName="VWCW_GROUP_PROFILE" msprop:Generator_RowEvArgName="VWCW_GROUP_PROFILERowChangeEvent">
<xs:element name="VWCW_GROUP_PROFILE" msprop:Generator_TableClassName="VWCW_GROUP_PROFILEDataTable" msprop:Generator_TableVarName="tableVWCW_GROUP_PROFILE" msprop:Generator_TablePropName="VWCW_GROUP_PROFILE" msprop:Generator_RowDeletingName="VWCW_GROUP_PROFILERowDeleting" msprop:Generator_RowChangingName="VWCW_GROUP_PROFILERowChanging" msprop:Generator_RowEvHandlerName="VWCW_GROUP_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="VWCW_GROUP_PROFILERowDeleted" msprop:Generator_UserTableName="VWCW_GROUP_PROFILE" msprop:Generator_RowChangedName="VWCW_GROUP_PROFILERowChanged" msprop:Generator_RowEvArgName="VWCW_GROUP_PROFILERowChangeEvent" msprop:Generator_RowClassName="VWCW_GROUP_PROFILERow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -929,7 +926,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_PROFILE_TYPE" msprop:Generator_TableClassName="TBWH_PROFILE_TYPEDataTable" msprop:Generator_TableVarName="tableTBWH_PROFILE_TYPE" msprop:Generator_TablePropName="TBWH_PROFILE_TYPE" msprop:Generator_RowDeletingName="TBWH_PROFILE_TYPERowDeleting" msprop:Generator_RowChangingName="TBWH_PROFILE_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBWH_PROFILE_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_PROFILE_TYPERowDeleted" msprop:Generator_UserTableName="TBWH_PROFILE_TYPE" msprop:Generator_RowChangedName="TBWH_PROFILE_TYPERowChanged" msprop:Generator_RowEvArgName="TBWH_PROFILE_TYPERowChangeEvent" msprop:Generator_RowClassName="TBWH_PROFILE_TYPERow">
<xs:element name="TBWH_PROFILE_TYPE" msprop:Generator_TableClassName="TBWH_PROFILE_TYPEDataTable" msprop:Generator_TableVarName="tableTBWH_PROFILE_TYPE" msprop:Generator_RowChangedName="TBWH_PROFILE_TYPERowChanged" msprop:Generator_TablePropName="TBWH_PROFILE_TYPE" msprop:Generator_RowDeletingName="TBWH_PROFILE_TYPERowDeleting" msprop:Generator_RowChangingName="TBWH_PROFILE_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBWH_PROFILE_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_PROFILE_TYPERowDeleted" msprop:Generator_RowClassName="TBWH_PROFILE_TYPERow" msprop:Generator_UserTableName="TBWH_PROFILE_TYPE" msprop:Generator_RowEvArgName="TBWH_PROFILE_TYPERowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="TYPE_ID" msprop:Generator_ColumnVarNameInTable="columnTYPE_ID" msprop:Generator_ColumnPropNameInRow="TYPE_ID" msprop:Generator_ColumnPropNameInTable="TYPE_IDColumn" msprop:Generator_UserColumnName="TYPE_ID" type="xs:short" default="0" />
@ -937,7 +934,7 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBCW_PROF_REL_WINDOW" msprop:Generator_TableClassName="TBCW_PROF_REL_WINDOWDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_WINDOW" msprop:Generator_TablePropName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowDeletingName="TBCW_PROF_REL_WINDOWRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_WINDOWRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_WINDOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_WINDOWRowDeleted" msprop:Generator_UserTableName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowChangedName="TBCW_PROF_REL_WINDOWRowChanged" msprop:Generator_RowEvArgName="TBCW_PROF_REL_WINDOWRowChangeEvent" msprop:Generator_RowClassName="TBCW_PROF_REL_WINDOWRow">
<xs:element name="TBCW_PROF_REL_WINDOW" msprop:Generator_TableClassName="TBCW_PROF_REL_WINDOWDataTable" msprop:Generator_TableVarName="tableTBCW_PROF_REL_WINDOW" msprop:Generator_RowChangedName="TBCW_PROF_REL_WINDOWRowChanged" msprop:Generator_TablePropName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowDeletingName="TBCW_PROF_REL_WINDOWRowDeleting" msprop:Generator_RowChangingName="TBCW_PROF_REL_WINDOWRowChanging" msprop:Generator_RowEvHandlerName="TBCW_PROF_REL_WINDOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBCW_PROF_REL_WINDOWRowDeleted" msprop:Generator_RowClassName="TBCW_PROF_REL_WINDOWRow" msprop:Generator_UserTableName="TBCW_PROF_REL_WINDOW" msprop:Generator_RowEvArgName="TBCW_PROF_REL_WINDOWRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -1031,9 +1028,9 @@ SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPB
</xs:element>
<xs:annotation>
<xs:appinfo>
<msdata:Relationship name="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DATA_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DATA_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DATA_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
<msdata:Relationship name="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DOC_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DOC_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DOC_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
<msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_WINDOW" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_WINDOW" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_WINDOWRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" />
<msdata:Relationship name="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DATA_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DATA_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DATA_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
<msdata:Relationship name="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_DOC_SEARCH" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_DOC_SEARCH" msprop:Generator_ChildPropName="GetTBCW_PROF_DOC_SEARCHRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_ParentPropName="TBCW_PROFILESRow" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF" msprop:Generator_UserParentTable="TBCW_PROFILES" />
<msdata:Relationship name="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msdata:parent="TBCW_PROFILES" msdata:child="TBCW_PROF_REL_WINDOW" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBCW_PROF_REL_WINDOW" msprop:Generator_ChildPropName="GetTBCW_PROF_REL_WINDOWRows" msprop:Generator_UserRelationName="FK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_RelationVarName="relationFK_TBCW_PROF_REL_CONTROL_PROF_ID" msprop:Generator_UserParentTable="TBCW_PROFILES" msprop:Generator_ParentPropName="TBCW_PROFILESRow" />
</xs:appinfo>
</xs:annotation>
</xs:schema>

View File

@ -6,7 +6,7 @@
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-54" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:TBCW_PROFILES" ZOrder="15" X="15" Y="-44" Height="286" Width="240" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBCW_PROFILES" ZOrder="15" X="13" Y="-44" Height="286" Width="240" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBCW_USER_PROFILE" ZOrder="7" X="377" Y="500" Height="172" Width="271" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
<Shape ID="DesignTable:VWUSER_PROFILE" ZOrder="14" X="1049" Y="11" Height="250" Width="191" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="24" SplitterPosition="142" />
<Shape ID="DesignTable:TBCW_PROFILE_PROCESS" ZOrder="12" X="20" Y="585" Height="172" Width="294" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
@ -14,16 +14,16 @@
<Shape ID="DesignTable:TBCW_PROF_DOC_SEARCH" ZOrder="9" X="377" Y="99" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBCW_GROUP_PROFILE" ZOrder="6" X="683" Y="500" Height="172" Width="281" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
<Shape ID="DesignTable:VWCW_GROUP_PROFILE" ZOrder="4" X="1252" Y="5" Height="248" Width="218" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBCW_PROF_REL_WINDOW" ZOrder="2" X="10" Y="270" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBWH_User" ZOrder="13" X="1221" Y="436" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="139" />
<Shape ID="DesignTable:TBWH_GROUP" ZOrder="5" X="1049" Y="422" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:TBWH_PROFILE_TYPE" ZOrder="3" X="1010" Y="511" Height="67" Width="190" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:TBCW_PROF_REL_WINDOW" ZOrder="2" X="10" Y="270" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
</Shapes>
<Connectors>
<Connector ID="DesignRelation:FK_TBCW_PROF_DATA_SEARCH_PROF_IF" ZOrder="10" LineWidth="11">
<RoutePoints>
<Point>
<X>255</X>
<X>253</X>
<Y>11</Y>
</Point>
<Point>
@ -35,7 +35,7 @@
<Connector ID="DesignRelation:FK_TBCW_PROF_DOC_SEARCH_PROF_IF" ZOrder="8" LineWidth="11">
<RoutePoints>
<Point>
<X>255</X>
<X>253</X>
<Y>140</Y>
</Point>
<Point>
@ -47,11 +47,11 @@
<Connector ID="DesignRelation:FK_TBCW_PROF_REL_CONTROL_PROF_ID" ZOrder="1" LineWidth="11">
<RoutePoints>
<Point>
<X>135</X>
<X>133</X>
<Y>242</Y>
</Point>
<Point>
<X>135</X>
<X>133</X>
<Y>270</Y>
</Point>
</RoutePoints>

View File

@ -1,6 +1,6 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmAdministration
Inherits System.Windows.Forms.Form
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()>
@ -77,20 +77,6 @@ Partial Class frmAdministration
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colNAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.TBCW_PROFILESBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.TBCW_PROFILESBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.TBWH_UserBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.VWUSER_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBCW_PROFILESTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILESTableAdapter()
@ -115,15 +101,6 @@ Partial Class frmAdministration
Me.TBWH_PROFILE_TYPEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TabPageProcessAssignment = New DevExpress.XtraTab.XtraTabPage()
Me.CtrlApplicationAssignment1 = New DD_Clipboard_Watcher.ctrlApplicationAssignment()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonProcessAssign = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonProcessDelete = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowAssign = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowDelete = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonWindowSave = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.TabPageUserAssignment = New DevExpress.XtraTab.XtraTabPage()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.GridControlUserInProfile = New DevExpress.XtraGrid.GridControl()
@ -141,11 +118,7 @@ Partial Class frmAdministration
Me.GridColumn3 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.Label2 = New System.Windows.Forms.Label()
Me.btnRemoveUserFromProfile = New System.Windows.Forms.Button()
Me.btnAddUserToProfile = New System.Windows.Forms.Button()
Me.TabPageGroupAssignment = New DevExpress.XtraTab.XtraTabPage()
Me.btnRemoveGroupFromProfile = New System.Windows.Forms.Button()
Me.btnAddGroupToProfile = New System.Windows.Forms.Button()
Me.SplitContainer2 = New System.Windows.Forms.SplitContainer()
Me.GridControlGroupInProfile = New DevExpress.XtraGrid.GridControl()
Me.VWCW_GROUP_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
@ -217,6 +190,29 @@ Partial Class frmAdministration
Me.TBCW_PROF_DATA_SEARCHTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_DATA_SEARCHTableAdapter()
Me.TBCW_PROF_DOC_SEARCHTableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROF_DOC_SEARCHTableAdapter()
Me.VWCW_GROUP_PROFILETableAdapter = New DD_Clipboard_Watcher.MyDatasetTableAdapters.VWCW_GROUP_PROFILETableAdapter()
Me.RibbonControl2 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem7 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem8 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem9 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem10 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem11 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem12 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem13 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem14 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup6 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup7 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label()
COMMENTLabel = New System.Windows.Forms.Label()
@ -257,8 +253,6 @@ Partial Class frmAdministration
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControlProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TBCW_PROFILESBindingNavigator.SuspendLayout()
CType(Me.TBWH_UserBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip1.SuspendLayout()
@ -271,7 +265,6 @@ Partial Class frmAdministration
Me.TabPageGeneralSettings.SuspendLayout()
CType(Me.TBWH_PROFILE_TYPEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageProcessAssignment.SuspendLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageUserAssignment.SuspendLayout()
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer1.Panel1.SuspendLayout()
@ -301,6 +294,7 @@ Partial Class frmAdministration
Me.BindingNavigator2.SuspendLayout()
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPageBasicSettings.SuspendLayout()
CType(Me.RibbonControl2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'GUIDLabel
@ -776,10 +770,10 @@ Partial Class frmAdministration
'
Me.GridControlProfiles.DataSource = Me.TBCW_PROFILESBindingSource
Me.GridControlProfiles.Dock = System.Windows.Forms.DockStyle.Left
Me.GridControlProfiles.Location = New System.Drawing.Point(0, 25)
Me.GridControlProfiles.Location = New System.Drawing.Point(0, 0)
Me.GridControlProfiles.MainView = Me.GridView1
Me.GridControlProfiles.Name = "GridControlProfiles"
Me.GridControlProfiles.Size = New System.Drawing.Size(239, 563)
Me.GridControlProfiles.Size = New System.Drawing.Size(225, 592)
Me.GridControlProfiles.TabIndex = 18
Me.GridControlProfiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
@ -817,129 +811,6 @@ Partial Class frmAdministration
Me.colNAME.VisibleIndex = 1
Me.colNAME.Width = 100
'
'TBCW_PROFILESBindingNavigator
'
Me.TBCW_PROFILESBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
Me.TBCW_PROFILESBindingNavigator.AutoSize = False
Me.TBCW_PROFILESBindingNavigator.BindingSource = Me.TBCW_PROFILESBindingSource
Me.TBCW_PROFILESBindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.TBCW_PROFILESBindingNavigator.CountItemFormat = "von {0} Profilen"
Me.TBCW_PROFILESBindingNavigator.DeleteItem = Nothing
Me.TBCW_PROFILESBindingNavigator.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.TBCW_PROFILESBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBCW_PROFILESBindingNavigatorSaveItem, Me.ToolStripButton1})
Me.TBCW_PROFILESBindingNavigator.Location = New System.Drawing.Point(0, 0)
Me.TBCW_PROFILESBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.TBCW_PROFILESBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.TBCW_PROFILESBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.TBCW_PROFILESBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.TBCW_PROFILESBindingNavigator.Name = "TBCW_PROFILESBindingNavigator"
Me.TBCW_PROFILESBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
Me.TBCW_PROFILESBindingNavigator.Size = New System.Drawing.Size(1291, 25)
Me.TBCW_PROFILESBindingNavigator.TabIndex = 1
Me.TBCW_PROFILESBindingNavigator.Text = "BindingNavigator1"
'
'BindingNavigatorAddNewItem
'
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorAddNewItem.Text = "Neu hinzufügen"
'
'BindingNavigatorCountItem
'
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(88, 22)
Me.BindingNavigatorCountItem.Text = "von {0} Profilen"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
'
'BindingNavigatorMoveFirstItem
'
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
'
'BindingNavigatorMovePreviousItem
'
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
'
'BindingNavigatorSeparator
'
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorPositionItem
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
'
'BindingNavigatorSeparator1
'
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorMoveNextItem
'
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
'
'BindingNavigatorMoveLastItem
'
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
'
'BindingNavigatorSeparator2
'
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorDeleteItem
'
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorDeleteItem.Text = "Löschen"
'
'TBCW_PROFILESBindingNavigatorSaveItem
'
Me.TBCW_PROFILESBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.TBCW_PROFILESBindingNavigatorSaveItem.Image = CType(resources.GetObject("TBCW_PROFILESBindingNavigatorSaveItem.Image"), System.Drawing.Image)
Me.TBCW_PROFILESBindingNavigatorSaveItem.Name = "TBCW_PROFILESBindingNavigatorSaveItem"
Me.TBCW_PROFILESBindingNavigatorSaveItem.Size = New System.Drawing.Size(23, 22)
Me.TBCW_PROFILESBindingNavigatorSaveItem.Text = "Daten speichern"
'
'ToolStripButton1
'
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.refresh_16xLG
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton1.Text = "ToolStripButton1"
'
'TBWH_UserBindingSource
'
Me.TBWH_UserBindingSource.DataMember = "TBWH_User"
@ -969,9 +840,9 @@ Partial Class frmAdministration
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.statuslabel})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 616)
Me.StatusStrip1.Location = New System.Drawing.Point(0, 742)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(1297, 22)
Me.StatusStrip1.Size = New System.Drawing.Size(1378, 22)
Me.StatusStrip1.TabIndex = 1
Me.StatusStrip1.Text = "StatusStrip1"
'
@ -1053,10 +924,10 @@ Partial Class frmAdministration
'XtraTabControl2
'
Me.XtraTabControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl2.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl2.Location = New System.Drawing.Point(0, 122)
Me.XtraTabControl2.Name = "XtraTabControl2"
Me.XtraTabControl2.SelectedTabPage = Me.TabPageProfiles
Me.XtraTabControl2.Size = New System.Drawing.Size(1297, 616)
Me.XtraTabControl2.Size = New System.Drawing.Size(1378, 620)
Me.XtraTabControl2.TabIndex = 25
Me.XtraTabControl2.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.TabPageProfiles, Me.TabPageBasicSettings})
'
@ -1064,18 +935,17 @@ Partial Class frmAdministration
'
Me.TabPageProfiles.Controls.Add(Me.XtraTabControl3)
Me.TabPageProfiles.Controls.Add(Me.GridControlProfiles)
Me.TabPageProfiles.Controls.Add(Me.TBCW_PROFILESBindingNavigator)
Me.TabPageProfiles.Name = "TabPageProfiles"
Me.TabPageProfiles.Size = New System.Drawing.Size(1291, 588)
Me.TabPageProfiles.Size = New System.Drawing.Size(1372, 592)
Me.TabPageProfiles.Text = "Profil Verwaltung"
'
'XtraTabControl3
'
Me.XtraTabControl3.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl3.Location = New System.Drawing.Point(239, 25)
Me.XtraTabControl3.Location = New System.Drawing.Point(225, 0)
Me.XtraTabControl3.Name = "XtraTabControl3"
Me.XtraTabControl3.SelectedTabPage = Me.TabPageGeneralSettings
Me.XtraTabControl3.Size = New System.Drawing.Size(1052, 563)
Me.XtraTabControl3.Size = New System.Drawing.Size(1147, 592)
Me.XtraTabControl3.TabIndex = 21
Me.XtraTabControl3.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.TabPageGeneralSettings, Me.TabPageProcessAssignment, Me.TabPageUserAssignment, Me.TabPageGroupAssignment, Me.TabPageData, Me.TabPageDocuments})
'
@ -1105,7 +975,7 @@ Partial Class frmAdministration
Me.TabPageGeneralSettings.Controls.Add(ADDED_WHOLabel)
Me.TabPageGeneralSettings.Controls.Add(Me.ADDED_WHOTextBox)
Me.TabPageGeneralSettings.Name = "TabPageGeneralSettings"
Me.TabPageGeneralSettings.Size = New System.Drawing.Size(1046, 535)
Me.TabPageGeneralSettings.Size = New System.Drawing.Size(1141, 568)
Me.TabPageGeneralSettings.Text = "Allgemein"
'
'PROFILE_TYPEComboBox
@ -1128,107 +998,28 @@ Partial Class frmAdministration
'TabPageProcessAssignment
'
Me.TabPageProcessAssignment.Controls.Add(Me.CtrlApplicationAssignment1)
Me.TabPageProcessAssignment.Controls.Add(Me.RibbonControl1)
Me.TabPageProcessAssignment.Name = "TabPageProcessAssignment"
Me.TabPageProcessAssignment.Size = New System.Drawing.Size(1046, 535)
Me.TabPageProcessAssignment.Size = New System.Drawing.Size(1141, 568)
Me.TabPageProcessAssignment.Text = "Anwendungs Zuordnung"
'
'CtrlApplicationAssignment1
'
Me.CtrlApplicationAssignment1.Dock = System.Windows.Forms.DockStyle.Fill
Me.CtrlApplicationAssignment1.Location = New System.Drawing.Point(0, 95)
Me.CtrlApplicationAssignment1.Location = New System.Drawing.Point(0, 0)
Me.CtrlApplicationAssignment1.Name = "CtrlApplicationAssignment1"
Me.CtrlApplicationAssignment1.Size = New System.Drawing.Size(1046, 440)
Me.CtrlApplicationAssignment1.Size = New System.Drawing.Size(1141, 568)
Me.CtrlApplicationAssignment1.TabIndex = 2
'
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.BarButtonProcessAssign, Me.BarButtonProcessDelete, Me.BarButtonWindowAssign, Me.BarButtonWindowDelete, Me.BarButtonWindowSave})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 6
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.Size = New System.Drawing.Size(1046, 95)
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
Me.RibbonControl1.ToolbarLocation = DevExpress.XtraBars.Ribbon.RibbonQuickAccessToolbarLocation.Hidden
'
'BarButtonProcessAssign
'
Me.BarButtonProcessAssign.Caption = "Zuordnen"
Me.BarButtonProcessAssign.Id = 1
Me.BarButtonProcessAssign.ImageOptions.Image = CType(resources.GetObject("BarButtonProcessAssign.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonProcessAssign.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonProcessAssign.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonProcessAssign.Name = "BarButtonProcessAssign"
'
'BarButtonProcessDelete
'
Me.BarButtonProcessDelete.Caption = "Zuordnung löschen"
Me.BarButtonProcessDelete.Id = 2
Me.BarButtonProcessDelete.ImageOptions.Image = CType(resources.GetObject("BarButtonProcessDelete.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonProcessDelete.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonProcessDelete.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonProcessDelete.Name = "BarButtonProcessDelete"
'
'BarButtonWindowAssign
'
Me.BarButtonWindowAssign.Caption = "Zuordnen"
Me.BarButtonWindowAssign.Id = 3
Me.BarButtonWindowAssign.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowAssign.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowAssign.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowAssign.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowAssign.Name = "BarButtonWindowAssign"
'
'BarButtonWindowDelete
'
Me.BarButtonWindowDelete.Caption = "Zuordnung löschen"
Me.BarButtonWindowDelete.Id = 4
Me.BarButtonWindowDelete.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowDelete.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowDelete.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowDelete.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowDelete.Name = "BarButtonWindowDelete"
'
'BarButtonWindowSave
'
Me.BarButtonWindowSave.Caption = "Speichern"
Me.BarButtonWindowSave.Id = 5
Me.BarButtonWindowSave.ImageOptions.Image = CType(resources.GetObject("BarButtonWindowSave.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonWindowSave.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonWindowSave.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonWindowSave.Name = "BarButtonWindowSave"
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
Me.RibbonPage1.Name = "RibbonPage1"
Me.RibbonPage1.Text = "Anwendungszuordnung"
'
'RibbonPageGroup1
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonProcessAssign)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonProcessDelete)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "Prozess Zuordnung"
'
'RibbonPageGroup2
'
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowAssign)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowDelete)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonWindowSave)
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
Me.RibbonPageGroup2.Text = "Fenster Zuordnung"
'
'TabPageUserAssignment
'
Me.TabPageUserAssignment.Controls.Add(Me.SplitContainer1)
Me.TabPageUserAssignment.Controls.Add(Me.btnRemoveUserFromProfile)
Me.TabPageUserAssignment.Controls.Add(Me.btnAddUserToProfile)
Me.TabPageUserAssignment.Name = "TabPageUserAssignment"
Me.TabPageUserAssignment.Size = New System.Drawing.Size(1046, 535)
Me.TabPageUserAssignment.Size = New System.Drawing.Size(1141, 564)
Me.TabPageUserAssignment.Text = "Benutzer Zuordnung"
'
'SplitContainer1
'
Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Top
Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer1.Location = New System.Drawing.Point(0, 0)
Me.SplitContainer1.Name = "SplitContainer1"
Me.SplitContainer1.Orientation = System.Windows.Forms.Orientation.Horizontal
@ -1242,8 +1033,8 @@ Partial Class frmAdministration
'
Me.SplitContainer1.Panel2.Controls.Add(Me.GridControlUserNotInProfile)
Me.SplitContainer1.Panel2.Controls.Add(Me.Label2)
Me.SplitContainer1.Size = New System.Drawing.Size(1046, 481)
Me.SplitContainer1.SplitterDistance = 239
Me.SplitContainer1.Size = New System.Drawing.Size(1141, 564)
Me.SplitContainer1.SplitterDistance = 280
Me.SplitContainer1.TabIndex = 98
'
'GridControlUserInProfile
@ -1253,7 +1044,7 @@ Partial Class frmAdministration
Me.GridControlUserInProfile.Location = New System.Drawing.Point(0, 25)
Me.GridControlUserInProfile.MainView = Me.GridViewUserInProfile
Me.GridControlUserInProfile.Name = "GridControlUserInProfile"
Me.GridControlUserInProfile.Size = New System.Drawing.Size(1046, 214)
Me.GridControlUserInProfile.Size = New System.Drawing.Size(1141, 255)
Me.GridControlUserInProfile.TabIndex = 93
Me.GridControlUserInProfile.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUserInProfile})
'
@ -1322,7 +1113,7 @@ Partial Class frmAdministration
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(0, 0)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(1046, 25)
Me.Label1.Size = New System.Drawing.Size(1141, 25)
Me.Label1.TabIndex = 94
Me.Label1.Text = "Zugeordnete Benutzer:"
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1335,7 +1126,7 @@ Partial Class frmAdministration
Me.GridControlUserNotInProfile.MainView = Me.GridViewUserNotInProfile
Me.GridControlUserNotInProfile.Name = "GridControlUserNotInProfile"
Me.GridControlUserNotInProfile.ShowOnlyPredefinedDetails = True
Me.GridControlUserNotInProfile.Size = New System.Drawing.Size(1046, 213)
Me.GridControlUserNotInProfile.Size = New System.Drawing.Size(1141, 255)
Me.GridControlUserNotInProfile.TabIndex = 96
Me.GridControlUserNotInProfile.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewUserNotInProfile})
'
@ -1403,80 +1194,22 @@ Partial Class frmAdministration
Me.Label2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(0, 0)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(1046, 25)
Me.Label2.Size = New System.Drawing.Size(1141, 25)
Me.Label2.TabIndex = 97
Me.Label2.Text = "Nicht zugeordnete Benutzer:"
Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'btnRemoveUserFromProfile
'
Me.btnRemoveUserFromProfile.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnRemoveUserFromProfile.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.btnRemoveUserFromProfile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnRemoveUserFromProfile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnRemoveUserFromProfile.Location = New System.Drawing.Point(525, 504)
Me.btnRemoveUserFromProfile.Name = "btnRemoveUserFromProfile"
Me.btnRemoveUserFromProfile.Size = New System.Drawing.Size(256, 28)
Me.btnRemoveUserFromProfile.TabIndex = 95
Me.btnRemoveUserFromProfile.Text = "Benutzer vom ausgewählten Profil entfernen"
Me.btnRemoveUserFromProfile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnRemoveUserFromProfile.UseVisualStyleBackColor = True
'
'btnAddUserToProfile
'
Me.btnAddUserToProfile.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnAddUserToProfile.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.startwithoutdebugging_6556
Me.btnAddUserToProfile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAddUserToProfile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnAddUserToProfile.Location = New System.Drawing.Point(787, 504)
Me.btnAddUserToProfile.Name = "btnAddUserToProfile"
Me.btnAddUserToProfile.Size = New System.Drawing.Size(256, 28)
Me.btnAddUserToProfile.TabIndex = 95
Me.btnAddUserToProfile.Text = "Benutzer zu ausgewähltem Profil hinzufügen"
Me.btnAddUserToProfile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnAddUserToProfile.UseVisualStyleBackColor = True
'
'TabPageGroupAssignment
'
Me.TabPageGroupAssignment.AutoScroll = True
Me.TabPageGroupAssignment.Controls.Add(Me.btnRemoveGroupFromProfile)
Me.TabPageGroupAssignment.Controls.Add(Me.btnAddGroupToProfile)
Me.TabPageGroupAssignment.Controls.Add(Me.SplitContainer2)
Me.TabPageGroupAssignment.Name = "TabPageGroupAssignment"
Me.TabPageGroupAssignment.Size = New System.Drawing.Size(1046, 535)
Me.TabPageGroupAssignment.Size = New System.Drawing.Size(1141, 564)
Me.TabPageGroupAssignment.Text = "Gruppen Zuordnung"
'
'btnRemoveGroupFromProfile
'
Me.btnRemoveGroupFromProfile.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnRemoveGroupFromProfile.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.cancel
Me.btnRemoveGroupFromProfile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnRemoveGroupFromProfile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnRemoveGroupFromProfile.Location = New System.Drawing.Point(526, 504)
Me.btnRemoveGroupFromProfile.Name = "btnRemoveGroupFromProfile"
Me.btnRemoveGroupFromProfile.Size = New System.Drawing.Size(256, 28)
Me.btnRemoveGroupFromProfile.TabIndex = 96
Me.btnRemoveGroupFromProfile.Text = "Gruppe vom ausgewählten Profil entfernen"
Me.btnRemoveGroupFromProfile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnRemoveGroupFromProfile.UseVisualStyleBackColor = True
'
'btnAddGroupToProfile
'
Me.btnAddGroupToProfile.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnAddGroupToProfile.Image = Global.DD_Clipboard_Watcher.My.Resources.Resources.startwithoutdebugging_6556
Me.btnAddGroupToProfile.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAddGroupToProfile.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnAddGroupToProfile.Location = New System.Drawing.Point(788, 504)
Me.btnAddGroupToProfile.Name = "btnAddGroupToProfile"
Me.btnAddGroupToProfile.Size = New System.Drawing.Size(256, 28)
Me.btnAddGroupToProfile.TabIndex = 97
Me.btnAddGroupToProfile.Text = "Gruppe zu ausgewähltem Profil hinzufügen"
Me.btnAddGroupToProfile.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnAddGroupToProfile.UseVisualStyleBackColor = True
'
'SplitContainer2
'
Me.SplitContainer2.Dock = System.Windows.Forms.DockStyle.Top
Me.SplitContainer2.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer2.Location = New System.Drawing.Point(0, 0)
Me.SplitContainer2.Name = "SplitContainer2"
Me.SplitContainer2.Orientation = System.Windows.Forms.Orientation.Horizontal
@ -1490,8 +1223,8 @@ Partial Class frmAdministration
'
Me.SplitContainer2.Panel2.Controls.Add(Me.GridControlGroupNotInProfile)
Me.SplitContainer2.Panel2.Controls.Add(Me.Label10)
Me.SplitContainer2.Size = New System.Drawing.Size(1046, 483)
Me.SplitContainer2.SplitterDistance = 238
Me.SplitContainer2.Size = New System.Drawing.Size(1141, 564)
Me.SplitContainer2.SplitterDistance = 277
Me.SplitContainer2.TabIndex = 0
'
'GridControlGroupInProfile
@ -1501,7 +1234,7 @@ Partial Class frmAdministration
Me.GridControlGroupInProfile.Location = New System.Drawing.Point(0, 25)
Me.GridControlGroupInProfile.MainView = Me.GridViewGroupInProfile
Me.GridControlGroupInProfile.Name = "GridControlGroupInProfile"
Me.GridControlGroupInProfile.Size = New System.Drawing.Size(1046, 213)
Me.GridControlGroupInProfile.Size = New System.Drawing.Size(1141, 252)
Me.GridControlGroupInProfile.TabIndex = 1
Me.GridControlGroupInProfile.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewGroupInProfile})
'
@ -1549,7 +1282,7 @@ Partial Class frmAdministration
Me.Label9.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label9.Location = New System.Drawing.Point(0, 0)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(1046, 25)
Me.Label9.Size = New System.Drawing.Size(1141, 25)
Me.Label9.TabIndex = 0
Me.Label9.Text = "Zugeordnete Gruppen"
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1561,7 +1294,7 @@ Partial Class frmAdministration
Me.GridControlGroupNotInProfile.Location = New System.Drawing.Point(0, 25)
Me.GridControlGroupNotInProfile.MainView = Me.GridViewGroupNotInProfile
Me.GridControlGroupNotInProfile.Name = "GridControlGroupNotInProfile"
Me.GridControlGroupNotInProfile.Size = New System.Drawing.Size(1046, 216)
Me.GridControlGroupNotInProfile.Size = New System.Drawing.Size(1141, 258)
Me.GridControlGroupNotInProfile.TabIndex = 1
Me.GridControlGroupNotInProfile.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewGroupNotInProfile})
'
@ -1606,7 +1339,7 @@ Partial Class frmAdministration
Me.Label10.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label10.Location = New System.Drawing.Point(0, 0)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(1046, 25)
Me.Label10.Size = New System.Drawing.Size(1141, 25)
Me.Label10.TabIndex = 1
Me.Label10.Text = "Nicht zugeordnete Gruppen:"
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1640,7 +1373,7 @@ Partial Class frmAdministration
Me.TabPageData.Controls.Add(CHANGED_WHENLabel1)
Me.TabPageData.Controls.Add(Me.CHANGED_WHENDateTimePicker)
Me.TabPageData.Name = "TabPageData"
Me.TabPageData.Size = New System.Drawing.Size(1046, 535)
Me.TabPageData.Size = New System.Drawing.Size(1141, 564)
Me.TabPageData.Text = "Daten-Suchen"
'
'BindingNavigator1
@ -1659,7 +1392,7 @@ Partial Class frmAdministration
Me.BindingNavigator1.MovePreviousItem = Me.BindingNavigatorMovePreviousItem1
Me.BindingNavigator1.Name = "BindingNavigator1"
Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem1
Me.BindingNavigator1.Size = New System.Drawing.Size(1046, 25)
Me.BindingNavigator1.Size = New System.Drawing.Size(1141, 25)
Me.BindingNavigator1.TabIndex = 22
Me.BindingNavigator1.Text = "BindingNavigator1"
'
@ -1799,7 +1532,7 @@ Partial Class frmAdministration
Me.TextBox1.Multiline = True
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
Me.TextBox1.Size = New System.Drawing.Size(724, 124)
Me.TextBox1.Size = New System.Drawing.Size(724, 232)
Me.TextBox1.TabIndex = 7
'
'SQL_COMMANDTextBox
@ -1906,7 +1639,7 @@ Partial Class frmAdministration
Me.TabPageDocuments.Controls.Add(CHANGED_WHENLabel2)
Me.TabPageDocuments.Controls.Add(Me.CHANGED_WHENDateTimePicker1)
Me.TabPageDocuments.Name = "TabPageDocuments"
Me.TabPageDocuments.Size = New System.Drawing.Size(1046, 535)
Me.TabPageDocuments.Size = New System.Drawing.Size(1141, 564)
Me.TabPageDocuments.Text = "Dokument-Suchen"
'
'BindingNavigator2
@ -1925,7 +1658,7 @@ Partial Class frmAdministration
Me.BindingNavigator2.MovePreviousItem = Me.BindingNavigatorMovePreviousItem2
Me.BindingNavigator2.Name = "BindingNavigator2"
Me.BindingNavigator2.PositionItem = Me.BindingNavigatorPositionItem2
Me.BindingNavigator2.Size = New System.Drawing.Size(1046, 25)
Me.BindingNavigator2.Size = New System.Drawing.Size(1141, 25)
Me.BindingNavigator2.TabIndex = 22
Me.BindingNavigator2.Text = "BindingNavigator2"
'
@ -2062,7 +1795,7 @@ Partial Class frmAdministration
Me.TextBox2.Multiline = True
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
Me.TextBox2.Size = New System.Drawing.Size(724, 124)
Me.TextBox2.Size = New System.Drawing.Size(724, 232)
Me.TextBox2.TabIndex = 7
'
'SQL_COMMANDTextBox1
@ -2144,7 +1877,7 @@ Partial Class frmAdministration
'
Me.TabPageBasicSettings.Controls.Add(Me.GroupBox5)
Me.TabPageBasicSettings.Name = "TabPageBasicSettings"
Me.TabPageBasicSettings.Size = New System.Drawing.Size(1291, 588)
Me.TabPageBasicSettings.Size = New System.Drawing.Size(1372, 596)
Me.TabPageBasicSettings.Text = "Grundeinstellungen"
'
'TBCW_PROF_DATA_SEARCHTableAdapter
@ -2159,25 +1892,201 @@ Partial Class frmAdministration
'
Me.VWCW_GROUP_PROFILETableAdapter.ClearBeforeFill = True
'
'RibbonControl2
'
Me.RibbonControl2.ExpandCollapseItem.Id = 0
Me.RibbonControl2.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl2.ExpandCollapseItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItem8, Me.BarButtonItem9, Me.BarButtonItem10, Me.BarButtonItem11, Me.BarButtonItem12, Me.BarButtonItem13, Me.BarButtonItem14})
Me.RibbonControl2.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl2.MaxItemId = 15
Me.RibbonControl2.Name = "RibbonControl2"
Me.RibbonControl2.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage2})
Me.RibbonControl2.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl2.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl2.Size = New System.Drawing.Size(1378, 122)
'
'BarButtonItem1
'
Me.BarButtonItem1.Caption = "Neues Profil"
Me.BarButtonItem1.Id = 1
Me.BarButtonItem1.ImageOptions.Image = CType(resources.GetObject("BarButtonItem1.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem1.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "Profil löschen"
Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem2.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'BarButtonItem3
'
Me.BarButtonItem3.Caption = "Speichern"
Me.BarButtonItem3.Id = 3
Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem3.Name = "BarButtonItem3"
'
'BarButtonItem4
'
Me.BarButtonItem4.Caption = "Profile neu laden"
Me.BarButtonItem4.Id = 4
Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem4.Name = "BarButtonItem4"
'
'BarButtonItem5
'
Me.BarButtonItem5.Caption = "Zuordnen"
Me.BarButtonItem5.Id = 5
Me.BarButtonItem5.ImageOptions.Image = CType(resources.GetObject("BarButtonItem5.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem5.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem5.Name = "BarButtonItem5"
'
'BarButtonItem6
'
Me.BarButtonItem6.Caption = "Zuordnung löschen"
Me.BarButtonItem6.Id = 6
Me.BarButtonItem6.ImageOptions.Image = CType(resources.GetObject("BarButtonItem6.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem6.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem6.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem6.Name = "BarButtonItem6"
'
'BarButtonItem7
'
Me.BarButtonItem7.Caption = "Zuordnen"
Me.BarButtonItem7.Id = 7
Me.BarButtonItem7.ImageOptions.Image = CType(resources.GetObject("BarButtonItem7.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem7.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem7.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem7.Name = "BarButtonItem7"
'
'BarButtonItem8
'
Me.BarButtonItem8.Caption = "Zuordnung löschen"
Me.BarButtonItem8.Id = 8
Me.BarButtonItem8.ImageOptions.Image = CType(resources.GetObject("BarButtonItem8.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem8.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem8.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem8.Name = "BarButtonItem8"
'
'BarButtonItem9
'
Me.BarButtonItem9.Caption = "Speichern"
Me.BarButtonItem9.Id = 9
Me.BarButtonItem9.ImageOptions.Image = CType(resources.GetObject("BarButtonItem9.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem9.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem9.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem9.Name = "BarButtonItem9"
'
'BarButtonItem10
'
Me.BarButtonItem10.Caption = "BarButtonItem10"
Me.BarButtonItem10.Id = 10
Me.BarButtonItem10.Name = "BarButtonItem10"
'
'BarButtonItem11
'
Me.BarButtonItem11.Caption = "Benutzer Zuordnen"
Me.BarButtonItem11.Id = 11
Me.BarButtonItem11.ImageOptions.Image = CType(resources.GetObject("BarButtonItem11.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem11.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem11.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem11.Name = "BarButtonItem11"
'
'BarButtonItem12
'
Me.BarButtonItem12.Caption = "Zuordnung löschen"
Me.BarButtonItem12.Id = 12
Me.BarButtonItem12.ImageOptions.Image = CType(resources.GetObject("BarButtonItem12.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem12.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem12.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem12.Name = "BarButtonItem12"
'
'BarButtonItem13
'
Me.BarButtonItem13.Caption = "Gruppe zuordnen"
Me.BarButtonItem13.Id = 13
Me.BarButtonItem13.ImageOptions.Image = CType(resources.GetObject("BarButtonItem13.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem13.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem13.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem13.Name = "BarButtonItem13"
'
'BarButtonItem14
'
Me.BarButtonItem14.Caption = "Zuordnung löschen"
Me.BarButtonItem14.Id = 14
Me.BarButtonItem14.ImageOptions.Image = CType(resources.GetObject("BarButtonItem14.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem14.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem14.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem14.Name = "BarButtonItem14"
'
'RibbonPage2
'
Me.RibbonPage2.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup3, Me.RibbonPageGroup6, Me.RibbonPageGroup7, Me.RibbonPageGroup2, Me.RibbonPageGroup1})
Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "RibbonPage2"
'
'RibbonPageGroup3
'
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem3)
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem2)
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem4)
Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
Me.RibbonPageGroup3.Text = "Profil Verwaltung"
'
'RibbonPageGroup6
'
Me.RibbonPageGroup6.ItemLinks.Add(Me.BarButtonItem5)
Me.RibbonPageGroup6.ItemLinks.Add(Me.BarButtonItem6)
Me.RibbonPageGroup6.Name = "RibbonPageGroup6"
Me.RibbonPageGroup6.Text = "Prozess Zuordnung"
'
'RibbonPageGroup7
'
Me.RibbonPageGroup7.ItemLinks.Add(Me.BarButtonItem7)
Me.RibbonPageGroup7.ItemLinks.Add(Me.BarButtonItem8)
Me.RibbonPageGroup7.ItemLinks.Add(Me.BarButtonItem9)
Me.RibbonPageGroup7.Name = "RibbonPageGroup7"
Me.RibbonPageGroup7.Text = "Fenster Zuordnung"
'
'RibbonPageGroup2
'
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem11)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem12)
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
Me.RibbonPageGroup2.Text = "Benutzer Zuordnung"
'
'RibbonPageGroup1
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem13)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem14)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "Gruppen Zuordnung"
'
'RibbonPageGroup4
'
Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
Me.RibbonPageGroup4.Text = "Prozess Zuordnung"
'
'RibbonPageGroup5
'
Me.RibbonPageGroup5.Name = "RibbonPageGroup5"
Me.RibbonPageGroup5.Text = "Prozess Zuordnung"
'
'frmAdministration
'
Me.Appearance.Options.UseFont = True
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1297, 638)
Me.ClientSize = New System.Drawing.Size(1378, 764)
Me.Controls.Add(Me.XtraTabControl2)
Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.RibbonControl2)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmAdministration"
Me.Ribbon = Me.RibbonControl2
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Administration"
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControlProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
Me.TBCW_PROFILESBindingNavigator.ResumeLayout(False)
Me.TBCW_PROFILESBindingNavigator.PerformLayout()
CType(Me.TBWH_UserBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.VWUSER_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip1.ResumeLayout(False)
@ -2193,8 +2102,6 @@ Partial Class frmAdministration
Me.TabPageGeneralSettings.PerformLayout()
CType(Me.TBWH_PROFILE_TYPEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageProcessAssignment.ResumeLayout(False)
Me.TabPageProcessAssignment.PerformLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageUserAssignment.ResumeLayout(False)
Me.SplitContainer1.Panel1.ResumeLayout(False)
Me.SplitContainer1.Panel2.ResumeLayout(False)
@ -2228,6 +2135,7 @@ Partial Class frmAdministration
Me.BindingNavigator2.PerformLayout()
CType(Me.TBCW_PROF_DOC_SEARCHBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPageBasicSettings.ResumeLayout(False)
CType(Me.RibbonControl2, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -2236,19 +2144,6 @@ Partial Class frmAdministration
Friend WithEvents TBCW_PROFILESBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBCW_PROFILESTableAdapter As DD_Clipboard_Watcher.MyDatasetTableAdapters.TBCW_PROFILESTableAdapter
Friend WithEvents TableAdapterManager As DD_Clipboard_Watcher.MyDatasetTableAdapters.TableAdapterManager
Friend WithEvents TBCW_PROFILESBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents TBCW_PROFILESBindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
Friend WithEvents GUIDTextBox As System.Windows.Forms.TextBox
Friend WithEvents NAMETextBox As System.Windows.Forms.TextBox
Friend WithEvents COMMENTTextBox As System.Windows.Forms.TextBox
@ -2276,7 +2171,6 @@ Partial Class frmAdministration
Friend WithEvents Label6 As Label
Friend WithEvents Label5 As Label
Friend WithEvents ToolTip1 As ToolTip
Friend WithEvents ToolStripButton1 As ToolStripButton
Friend WithEvents ACTIVECheckBox As CheckBox
Friend WithEvents GroupBox5 As GroupBox
Friend WithEvents XtraTabControl2 As DevExpress.XtraTab.XtraTabControl
@ -2302,8 +2196,6 @@ Partial Class frmAdministration
Friend WithEvents GridColumn3 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents Label2 As Label
Friend WithEvents btnAddUserToProfile As Button
Friend WithEvents btnRemoveUserFromProfile As Button
Friend WithEvents PROFILE_TYPEComboBox As ComboBox
Friend WithEvents TabPageData As DevExpress.XtraTab.XtraTabPage
Friend WithEvents TBCW_PROF_DATA_SEARCHBindingSource As BindingSource
@ -2362,8 +2254,6 @@ Partial Class frmAdministration
Friend WithEvents TextBox1 As TextBox
Friend WithEvents TextBox2 As TextBox
Friend WithEvents TabPageGroupAssignment As DevExpress.XtraTab.XtraTabPage
Friend WithEvents btnRemoveGroupFromProfile As Button
Friend WithEvents btnAddGroupToProfile As Button
Friend WithEvents SplitContainer2 As SplitContainer
Friend WithEvents GridControlGroupInProfile As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewGroupInProfile As DevExpress.XtraGrid.Views.Grid.GridView
@ -2379,14 +2269,28 @@ Partial Class frmAdministration
Friend WithEvents colID1 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colNAME3 As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents TBWH_PROFILE_TYPEBindingSource As BindingSource
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents BarButtonProcessAssign As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonProcessDelete As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents CtrlApplicationAssignment1 As ctrlApplicationAssignment
Friend WithEvents BarButtonWindowAssign As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonWindowDelete As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonWindowSave As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonControl2 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup6 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem6 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem7 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem8 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem9 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPageGroup7 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BarButtonItem10 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem11 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem12 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem13 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem14 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
End Class

File diff suppressed because it is too large Load Diff

View File

@ -1,6 +1,5 @@
Imports DD_LIB_Standards
Public Class frmAdministration
Private SelectedProcessName As String
Class ProfileType
@ -12,12 +11,9 @@ Public Class frmAdministration
End Function
End Class
Dim PID As Integer
Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Load_Profiles()
Load_ProfileTypes()
Load_Logs()
lbllicenseCount.Text = LICENSE_COUNT
If LICENSE_DATE.ToString.Contains("2099") Then
@ -28,7 +24,7 @@ Public Class frmAdministration
End Sub
Private Sub TBCW_PROFILESBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBCW_PROFILESBindingNavigatorSaveItem.Click
Private Sub TBCW_PROFILESBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs)
Save_Profile()
clsHotkey.Refresh_Profile_Links()
@ -60,11 +56,6 @@ Public Class frmAdministration
Next
End Sub
Sub Load_Logs()
End Sub
Sub Save_Profile()
Try
Me.TBCW_PROFILESBindingSource.EndEdit()
@ -132,7 +123,7 @@ Public Class frmAdministration
End Sub
Private Sub btnAddUser2Profile_Click(sender As Object, e As EventArgs) Handles btnAddUserToProfile.Click
Private Sub btnAddUser2Profile_Click(sender As Object, e As EventArgs)
Try
Try
Dim i As Integer = CInt(GUIDTextBox.Text)
@ -209,7 +200,7 @@ Public Class frmAdministration
End Try
End Sub
Private Sub btndeleteUserConstructorRel_Click(sender As Object, e As EventArgs) Handles btnRemoveUserFromProfile.Click
Private Sub btndeleteUserConstructorRel_Click(sender As Object, e As EventArgs)
Try
Dim ID = GridViewUserInProfile.GetFocusedRowCellValue(GridViewUserInProfile.Columns("GUID"))
Try
@ -256,31 +247,6 @@ Public Class frmAdministration
End If
End Sub
Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorDeleteItem.Click
Dim swl = String.Format("EXEC PRCW_DELETE_PROFILE {0}", GUIDTextBox.Text)
Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
' wenn Speichern ja
If result = MsgBoxResult.Yes Then
If clsDatabase.Execute_non_Query(swl) = True Then
Load_Profiles()
End If
End If
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
Load_Profiles()
Refresh_ProfileData()
Try
Dim ID = CInt(GUIDTextBox.Text)
Catch ex As Exception
Exit Sub
End Try
Refresh_Free_Users(GUIDTextBox.Text)
Refresh_Free_Groups(GUIDTextBox.Text)
End Sub
Private Sub TBCW_PROF_DATA_SEARCHBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBCW_PROF_DATA_SEARCHBindingSource.AddingNew
MyDataset.TBCW_PROF_DATA_SEARCH.ADDED_WHOColumn.DefaultValue = Environment.UserName
MyDataset.TBCW_PROF_DATA_SEARCH.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
@ -300,20 +266,136 @@ Public Class frmAdministration
End Try
End Sub
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
Try
TBCW_PROF_DOC_SEARCHBindingSource.EndEdit()
If Not IsNothing(MyDataset.TBCW_PROF_DOC_SEARCH.GetChanges) Then
CHANGED_WHOTextBox2.Text = Environment.UserName
TBCW_PROF_DOC_SEARCHBindingSource.EndEdit()
TBCW_PROF_DOC_SEARCHTableAdapter.Update(MyDataset.TBCW_PROF_DOC_SEARCH)
Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs)
MyDataset.TBCW_PROF_REL_WINDOW.ADDED_WHOColumn.DefaultValue = Environment.UserName
MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
MyDataset.TBCW_PROF_REL_WINDOW.PROCESS_NAMEColumn.DefaultValue = SelectedProcessName
End Sub
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
TBCW_PROFILESBindingSource.AddNew()
End Sub
Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
Save_Profile()
clsHotkey.Refresh_Profile_Links()
TableAdapterManager.UpdateAll(Me.MyDataset)
End Sub
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
Dim swl = String.Format("EXEC PRCW_DELETE_PROFILE {0}", GUIDTextBox.Text)
Dim result As MsgBoxResult = MsgBox("Sind Sie sicher, dass Sie das Profil löschen wollen?", MsgBoxStyle.YesNo, "Bestätigung erforderlich:")
' wenn Speichern ja
If result = MsgBoxResult.Yes Then
If clsDatabase.Execute_non_Query(swl) = True Then
Load_Profiles()
End If
End If
End Sub
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
Load_Profiles()
Refresh_ProfileData()
Try
Dim ID = CInt(GUIDTextBox.Text)
Catch ex As Exception
MsgBox("Unexpected Error in Save Data Search: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Exit Sub
End Try
Refresh_Free_Users(GUIDTextBox.Text)
Refresh_Free_Groups(GUIDTextBox.Text)
End Sub
Private Sub BarButtonItem5_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem5.ItemClick
If CtrlApplicationAssignment1.Process_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonItem6_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem6.ItemClick
If MsgBox($"Wollen Sie den Prozess löschen?" & vbNewLine & "Dies wird alle Fenster löschen, die diesem Prozess zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Process_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
If CtrlApplicationAssignment1.Window_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonItem8_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem8.ItemClick
If MsgBox($"Wollen Sie die Fenster-Zuordnung löschen?", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Process_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster-Zuordnung gelöscht - " & Now.ToString, Color.Yellow)
Status_Changed("Fenster-Zuordnung gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonItem11_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem11.ItemClick
Try
Try
Dim i As Integer = CInt(GUIDTextBox.Text)
Catch ex As Exception
Exit Sub
End Try
For Each row As DataRow In MyDataset.TBWH_User.Rows
If row.Item(0) = CBool(True) Then
Dim insert = String.Format("INSERT INTO TBCW_USER_PROFILE (PROFILE_ID,USER_ID) VALUES ({0},{1})", GUIDTextBox.Text, row.Item(5))
If clsDatabase.Execute_non_Query(insert) = False Then
MsgBox("Could not insert the User-Definition....Check the logfile!", MsgBoxStyle.Exclamation)
End If
End If
Next
For Each row As DataRow In MyDataset.TBWH_User.Rows
row.Item(0) = CBool(False)
Next
If GUIDTextBox.Text <> "" Then
Refresh_Free_Users(GUIDTextBox.Text)
Refresh_ProfileData()
End If
Catch ex As Exception
MsgBox("Unexpected Error while adding user-rights: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub btnAddGroupToProfile_Click(sender As Object, e As EventArgs) Handles btnAddGroupToProfile.Click
Private Sub BarButtonItem12_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem12.ItemClick
Try
Dim ID = GridViewUserInProfile.GetFocusedRowCellValue(GridViewUserInProfile.Columns("GUID"))
Try
Dim I As Integer = CInt(ID)
Catch ex As Exception
Exit Sub
End Try
Dim del = String.Format("DELETE FROM TBCW_USER_PROFILE WHERE GUID = {0}", ID)
If clsDatabase.Execute_non_Query(del) = True Then
Refresh_ProfileData()
If GUIDTextBox.Text <> "" Then
Refresh_Free_Users(GUIDTextBox.Text)
End If
End If
Catch ex As Exception
MsgBox("Unexpected Error in deleting ProfileUserRelation: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub BarButtonItem13_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem13.ItemClick
Try
Dim oSelectedGroups = GridViewGroupNotInProfile.GetSelectedRows()
@ -336,7 +418,7 @@ Public Class frmAdministration
End Try
End Sub
Private Sub btnRemoveGroupFromProfile_Click(sender As Object, e As EventArgs) Handles btnRemoveGroupFromProfile.Click
Private Sub BarButtonItem14_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem14.ItemClick
Try
Dim oSelectedGroups = GridViewGroupInProfile.GetSelectedRows()
@ -359,79 +441,7 @@ Public Class frmAdministration
End Try
End Sub
Private Sub ToolStripButton6_Click(sender As Object, e As EventArgs)
Dim oForm As New frmProcessCapture()
Dim oResult = oForm.ShowDialog()
If oResult = DialogResult.OK Then
Try
Dim oProcessName As String = oForm.ProcessName
If oProcessName <> "" Then
Dim insert = String.Format("INSERT INTO TBCW_PROFILE_PROCESS (PROFILE_ID,PROC_NAME,ADDED_WHO) VALUES ({0},'{1}','{2}')", GUIDTextBox.Text, oProcessName, Environment.UserName)
If clsDatabase.Execute_non_Query(insert) = False Then
MsgBox("Could not insert the Process-Profile-Link....Check the logfile!", MsgBoxStyle.Exclamation)
End If
End If
Load_Profile_Process()
clsHotkey.Refresh_Profile_Links()
Catch ex As Exception
MsgBox("Unexpected Error while adding Process-Profile-link: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End If
End Sub
Private Sub TBCW_PROF_REL_WINDOWBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs)
MyDataset.TBCW_PROF_REL_WINDOW.ADDED_WHOColumn.DefaultValue = Environment.UserName
MyDataset.TBCW_PROF_REL_WINDOW.PROFILE_IDColumn.DefaultValue = GUIDTextBox.Text
MyDataset.TBCW_PROF_REL_WINDOW.PROCESS_NAMEColumn.DefaultValue = SelectedProcessName
End Sub
Private Sub BarButtonProcessAssign_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonProcessAssign.ItemClick
If CtrlApplicationAssignment1.Process_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonProcessDelete_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonProcessDelete.ItemClick
If MsgBox($"Wollen Sie den Prozess löschen?" & vbNewLine & "Dies wird alle Fenster löschen, die diesem Prozess zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Process_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of process!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Prozess gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowAssign_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowAssign.ItemClick
If CtrlApplicationAssignment1.Window_CreateAssignment(GUIDTextBox.Text) = False Then
MsgBox("Error while assigning window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowDelete_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowDelete.ItemClick
If MsgBox($"Wollen Sie das Fenster löschen?" & vbNewLine & "Dies wird alle Controls löschen, die diesem Fenster zugeordnet sind!", MsgBoxStyle.Exclamation Or MsgBoxStyle.YesNo, "Prozess löschen") = MsgBoxResult.No Then
Exit Sub
End If
If CtrlApplicationAssignment1.Window_DeleteAssignment() = False Then
MsgBox("Error while deleting assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gelöscht - " & Now.ToString, Color.Yellow)
End Sub
Private Sub BarButtonWindowSave_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonWindowSave.ItemClick
If CtrlApplicationAssignment1.Window_SaveAssignment() = False Then
MsgBox("Error while saving assignment of window!", MsgBoxStyle.Critical, "Clipboard Watcher")
End If
Status_Changed("Fenster gespeichert - " & Now.ToString, Color.Yellow)
Private Sub XtraTabControl3_SelectedPageChanged(sender As Object, e As DevExpress.XtraTab.TabPageChangedEventArgs) Handles XtraTabControl3.SelectedPageChanged
'TODO
End Sub
End Class

View File

@ -22,8 +22,14 @@ Public Class frmStart
Dim ClipboardContents As String = Clipboard.GetText()
Dim WindowTitle As String = clsHotkey.GetCaption()
Dim oProfileFilter As ClassProfileFilter
Dim oProfileFilter As New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW)
Try
oProfileFilter = New ClassProfileFilter(DT_USER_PROFILES, DTPROFILE_REL_WINDOW)
Catch ex As Exception
MsgBox("Fehler beim Laden der Profile. Möglicherweise liegt ein Konfigurationsfehler vor.")
Exit Sub
End Try
Dim oProfiles = oProfileFilter.Profiles.AsEnumerable()