diff --git a/app/DD_PM_WINDREAM/ClassDragDrop.vb b/app/DD_PM_WINDREAM/ClassDragDrop.vb index fd48f38..b36b079 100644 --- a/app/DD_PM_WINDREAM/ClassDragDrop.vb +++ b/app/DD_PM_WINDREAM/ClassDragDrop.vb @@ -57,12 +57,14 @@ Public Class ClassDragDrop Dim row As DataRow = view.GetDataRow(downHitInfo.RowHandle) Dim source As String = view.GridControl.Name - dragDropData = row.Item("GUID") & "|" & source + If Not IsNothing(row) Then + dragDropData = row.Item("GUID") & "|" & source - view.GridControl.DoDragDrop(dragDropData, DragDropEffects.Move) - downHitInfo = Nothing + view.GridControl.DoDragDrop(dragDropData, DragDropEffects.Move) + downHitInfo = Nothing - DevExpress.Utils.DXMouseEventArgs.GetMouseArgs(e).Handled = True + DevExpress.Utils.DXMouseEventArgs.GetMouseArgs(e).Handled = True + End If End If End If Catch ex As Exception diff --git a/app/DD_PM_WINDREAM/ClassFinalIndex.vb b/app/DD_PM_WINDREAM/ClassFinalIndex.vb new file mode 100644 index 0000000..9beac2d --- /dev/null +++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb @@ -0,0 +1,3 @@ +Public Class ClassFinalIndex + +End Class diff --git a/app/DD_PM_WINDREAM/ClassSQLEditor.vb b/app/DD_PM_WINDREAM/ClassSQLEditor.vb index c77707e..f9fc38b 100644 --- a/app/DD_PM_WINDREAM/ClassSQLEditor.vb +++ b/app/DD_PM_WINDREAM/ClassSQLEditor.vb @@ -16,11 +16,12 @@ Public Class ClassSQLEditor Dim SQLSTring As String = DirectCast(value, SQLValue).Value If svc IsNot Nothing AndAlso SQLSTring IsNot Nothing Then - CURRENT_DESIGN_TYPE = "INPUT_INDEX" + 'CURRENT_DESIGN_TYPE = "INPUT_INDEX" Using Form As New frmSQL_DESIGNER() - Form.Value = SQLSTring + Form.SQLCommand = SQLSTring If svc.ShowDialog(Form) = DialogResult.OK Then - Dim sql As New SQLValue(Form.Value) + Dim sql As New SQLValue(Form.SQLCommand) + CURRENT_SQL_CON = Form.ConnectionID value = sql End If End Using diff --git a/app/DD_PM_WINDREAM/ClassSQLTypeConverter.vb b/app/DD_PM_WINDREAM/ClassSQLTypeConverter.vb new file mode 100644 index 0000000..8a32960 --- /dev/null +++ b/app/DD_PM_WINDREAM/ClassSQLTypeConverter.vb @@ -0,0 +1,11 @@ +Imports System.ComponentModel + +Public Class SQLTypeConverter + Inherits TypeConverter + + Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As Globalization.CultureInfo, value As Object, destinationType As Type) As Object + 'Return MyBase.ConvertTo(context, culture, value, destinationType) + Dim sqlvalue As SQLValue = DirectCast(value, SQLValue) + Return sqlvalue.Value + End Function +End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/ClassSQLValue.vb b/app/DD_PM_WINDREAM/ClassSQLValue.vb new file mode 100644 index 0000000..c11420a --- /dev/null +++ b/app/DD_PM_WINDREAM/ClassSQLValue.vb @@ -0,0 +1,18 @@ +Imports System.ComponentModel +Imports System.Drawing.Design +''' +''' Hilfsklasse, die für das anzeigen und abspeichern von SQL-Befehlen verwendet wird +''' + + +Public Class SQLValue + Public Property Value As String + + Public Sub New() + Me.Value = "" + End Sub + + Public Sub New(value As String) + Me.Value = value + End Sub +End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb index 0bd31d5..57d22ff 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb @@ -13191,12 +13191,14 @@ Namespace DD_DMSLiteDataSetTableAdapters Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(6).Connection = Me.Connection - Me._commandCollection(6).CommandText = "SELECT TBPM_PROFILE_FINAL_INDEXING.ADDED_WHEN, TBPM_PROFILE_FINAL_INDEXING.ADDED_"& _ - "WHO, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.CHANG"& _ - "ED_WHO, TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFILE_FINAL_INDEXING.INDEXNAME,"& _ - " TBPM_PROFILE_FINAL_INDEXING.VALUE FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN T"& _ - "BPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID WHERE ("& _ - "TBPM_PROFILE.GUID = @ID)" + Me._commandCollection(6).CommandText = "SELECT TBPM_PROFILE_FINAL_INDEXING.ADDED_WHEN, TBPM_PROFILE_FINAL_INDEXING"& _ + ".ADDED_WHO, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXIN"& _ + "G.CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM"& _ + "_PROFILE_FINAL_INDEXING.INDEXNAME, TBPM_PROFILE_FINAL_INDEXING.VALUE, TBPM_PROFI"& _ + "LE_FINAL_INDEXING.SQL_COMMAND, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_IND"& _ + "EXING.CONNECTION_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ + " TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TB"& _ + "PM_PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBPM_PROFILE.GUID = @ID)" Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) End Sub diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc index af13c20..32c7db1 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsc @@ -37,25 +37,19 @@ - - + - - + - - + - - + - - + - - + diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd index 99f39ef..401ec24 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd @@ -156,12 +156,17 @@ WHERE (GUID = @GUID) - + - SELECT TBPM_PROFILE_FINAL_INDEXING.ADDED_WHEN, TBPM_PROFILE_FINAL_INDEXING.ADDED_WHO, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHO, TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFILE_FINAL_INDEXING.INDEXNAME, TBPM_PROFILE_FINAL_INDEXING.VALUE FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID WHERE (TBPM_PROFILE.GUID = @ID) + SELECT TBPM_PROFILE_FINAL_INDEXING.ADDED_WHEN, TBPM_PROFILE_FINAL_INDEXING.ADDED_WHO, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHO, + TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFILE_FINAL_INDEXING.INDEXNAME, TBPM_PROFILE_FINAL_INDEXING.VALUE, TBPM_PROFILE_FINAL_INDEXING.SQL_COMMAND, + TBPM_PROFILE_FINAL_INDEXING.CONNECTION_ID +FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN + TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID +WHERE (TBPM_PROFILE.GUID = @ID) - + @@ -2019,7 +2024,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2064,7 +2069,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2160,7 +2165,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2225,7 +2230,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2255,7 +2260,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2278,7 +2283,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2368,7 +2373,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2441,7 +2446,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2490,7 +2495,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2505,7 +2510,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2526,7 +2531,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2634,7 +2639,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2707,7 +2712,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2758,7 +2763,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2850,7 +2855,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2907,7 +2912,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2948,7 +2953,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -3064,11 +3069,11 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - - - - - + + + + + \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss index 5039a4f..cfb210b 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss @@ -4,24 +4,24 @@ Changes to this file may cause incorrect behavior and will be lost if the code is regenerated. --> - + - + - - - - - - + + + + + + - - + + - - - - + + + + @@ -77,7 +77,7 @@ - + 141 diff --git a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj index ed8eb17..7e79161 100644 --- a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj +++ b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj @@ -156,10 +156,13 @@ + + + @@ -287,6 +290,7 @@ Form + diff --git a/app/DD_PM_WINDREAM/ModuleControlProperties.vb b/app/DD_PM_WINDREAM/ModuleControlProperties.vb index b31a5af..eb92ca5 100644 --- a/app/DD_PM_WINDREAM/ModuleControlProperties.vb +++ b/app/DD_PM_WINDREAM/ModuleControlProperties.vb @@ -231,38 +231,6 @@ Public Module ModuleControlProperties End If End Function End Class - - Public Class SQLTypeConverter - Inherits TypeConverter - - Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As Globalization.CultureInfo, value As Object, destinationType As Type) As Object - 'Return MyBase.ConvertTo(context, culture, value, destinationType) - Dim sqlvalue As SQLValue = DirectCast(value, SQLValue) - Return sqlvalue.Value - End Function - End Class - - ''' - ''' Hilfsklasse, die für das anzeigen und abspeichern von SQL-Befehlen verwendet wird - ''' - - - Public Class SQLValue - Private _value As String - - Public Sub New(value As String) - Me.Value = value - End Sub - - Public Property Value As String - Get - Return _value - End Get - Set(value As String) - _value = value - End Set - End Property - End Class End Class Public Class TextboxProperties diff --git a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb new file mode 100644 index 0000000..56cbb0e --- /dev/null +++ b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb @@ -0,0 +1,70 @@ +Imports System.ComponentModel +Imports System.Drawing.Design +Imports System.Globalization + +Module ModuleFinalIndexProperties + + Public Class FinalIndexProperties + + <[ReadOnly](True)> + Public Property GUID As Integer + + <[ReadOnly](True)> + Public Property ConnectionId As Integer + + + Public Property Description As String + + Public Property Active As Boolean + + ''' + ''' Eigenschaft, die den SQL Editor anzeigt + ''' + + Public Property SQLCommand As SQLValue + + Public Property StaticValue As String + + ''' + ''' Eigenschaft, die eine Liste von Indicies anzeigt + ''' + + + Public Property IndexName As String + + Public Property VectorIndex As Boolean + + ''' + ''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt. + ''' + + Public Property Indicies As List(Of String) + + + + Public Class IndexListConverter + Inherits TypeConverter + + Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean + Return True + End Function + + Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection + Dim indexList = DirectCast(context.Instance, FinalIndexProperties).Indicies + Dim values As New StandardValuesCollection(indexList) + Return values + End Function + + Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object + If IsNothing(value) Then + Return "" + Else + Return value.ToString() + End If + End Function + End Class + + End Class + + +End Module diff --git a/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb b/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb index 9875c8a..0f12b18 100644 --- a/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb +++ b/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb @@ -34,7 +34,7 @@ Module ModuleRuntimeVariables Public USERCOUNT_LOGGED_IN As Integer = 0 Public CURRENT_INDEX_ID As Integer Public CURRENT_OBJECTTYPE As String - Public CURRENT_DESIGN_TYPE As String + Public CURRENT_DESIGN_TYPE As String = "FINAL_INDEX" Public CURRENT_SQL_CON As Integer Public CURRENT_SQL_COMAMND As String Public CURRENT_DT_SQL_CONFIG_TABLE As DataTable diff --git a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb index f8f8fa3..1b8f19a 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb @@ -49,7 +49,7 @@ Partial Class frmAdministration Dim VEKTOR_DELIMITERLabel As System.Windows.Forms.Label Dim WORK_HISTORY_ENTRYLabel As System.Windows.Forms.Label Dim SQL_VIEWLabel As System.Windows.Forms.Label - Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.SplitContainer_Profilzuordnung2 = New System.Windows.Forms.SplitContainer() Me.gridAssignedUsers = New DevExpress.XtraGrid.GridControl() Me.TBPROFILE_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) @@ -155,6 +155,29 @@ Partial Class frmAdministration Me.TabPage6 = New System.Windows.Forms.TabPage() Me.TabControl2 = New System.Windows.Forms.TabControl() Me.TabPage11 = New System.Windows.Forms.TabPage() + Me.gridFinalIndex = New DevExpress.XtraGrid.GridControl() + Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) + Me.viewFinalIndex = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colINDEXNAME = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colCHANGED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colCHANGED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() + Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) + Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorCountItem1 = New System.Windows.Forms.ToolStripLabel() + Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorMoveFirstItem1 = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorMovePreviousItem1 = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorSeparator3 = New System.Windows.Forms.ToolStripSeparator() + Me.BindingNavigatorPositionItem1 = New System.Windows.Forms.ToolStripTextBox() + Me.BindingNavigatorSeparator4 = New System.Windows.Forms.ToolStripSeparator() + Me.BindingNavigatorMoveNextItem1 = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorMoveLastItem1 = New System.Windows.Forms.ToolStripButton() + Me.BindingNavigatorSeparator5 = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton() + Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid() Me.Label13 = New System.Windows.Forms.Label() Me.TabControlFinalIndices = New System.Windows.Forms.TabControl() Me.TabPage9 = New System.Windows.Forms.TabPage() @@ -179,7 +202,6 @@ Partial Class frmAdministration Me.cmbIndexe2 = New System.Windows.Forms.ComboBox() Me.btnSaveSQLCommand = New System.Windows.Forms.Button() Me.SQL_COMMANDTextBox = New System.Windows.Forms.TextBox() - Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.btnShowConnections = New System.Windows.Forms.Button() Me.Label14 = New System.Windows.Forms.Label() Me.cmbConnection = New System.Windows.Forms.ComboBox() @@ -349,11 +371,15 @@ Partial Class frmAdministration Me.TabPage6.SuspendLayout() Me.TabControl2.SuspendLayout() Me.TabPage11.SuspendLayout() + CType(Me.gridFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.BindingNavigator1.SuspendLayout() Me.TabControlFinalIndices.SuspendLayout() Me.TabPage9.SuspendLayout() Me.grbxSystemStamps.SuspendLayout() Me.TabPage10.SuspendLayout() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit() Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.SuspendLayout() @@ -1268,6 +1294,9 @@ Partial Class frmAdministration ' 'TabPage11 ' + Me.TabPage11.Controls.Add(Me.gridFinalIndex) + Me.TabPage11.Controls.Add(Me.BindingNavigator1) + Me.TabPage11.Controls.Add(Me.PropertyGrid1) Me.TabPage11.Controls.Add(Me.Label13) Me.TabPage11.Controls.Add(Me.GroupBox3) Me.TabPage11.Controls.Add(Me.TabControlFinalIndices) @@ -1279,6 +1308,152 @@ Partial Class frmAdministration Me.TabPage11.Name = "TabPage11" Me.TabPage11.UseVisualStyleBackColor = True ' + 'gridFinalIndex + ' + Me.gridFinalIndex.DataSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource + resources.ApplyResources(Me.gridFinalIndex, "gridFinalIndex") + Me.gridFinalIndex.MainView = Me.viewFinalIndex + Me.gridFinalIndex.Name = "gridFinalIndex" + Me.gridFinalIndex.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.viewFinalIndex}) + ' + 'TBPM_PROFILE_FINAL_INDEXINGBindingSource + ' + Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource.DataMember = "TBPM_PROFILE_FINAL_INDEXING" + Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource.DataSource = Me.DD_DMSLiteDataSet + ' + 'viewFinalIndex + ' + Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colINDEXNAME, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN}) + Me.viewFinalIndex.GridControl = Me.gridFinalIndex + Me.viewFinalIndex.Name = "viewFinalIndex" + Me.viewFinalIndex.OptionsBehavior.Editable = False + Me.viewFinalIndex.OptionsBehavior.ReadOnly = True + Me.viewFinalIndex.OptionsView.ShowGroupPanel = False + ' + 'colGUID + ' + Me.colGUID.FieldName = "GUID" + Me.colGUID.Name = "colGUID" + resources.ApplyResources(Me.colGUID, "colGUID") + ' + 'colINDEXNAME + ' + Me.colINDEXNAME.FieldName = "INDEXNAME" + Me.colINDEXNAME.Name = "colINDEXNAME" + resources.ApplyResources(Me.colINDEXNAME, "colINDEXNAME") + ' + 'colADDED_WHO + ' + Me.colADDED_WHO.FieldName = "ADDED_WHO" + Me.colADDED_WHO.Name = "colADDED_WHO" + resources.ApplyResources(Me.colADDED_WHO, "colADDED_WHO") + ' + 'colADDED_WHEN + ' + Me.colADDED_WHEN.FieldName = "ADDED_WHEN" + Me.colADDED_WHEN.Name = "colADDED_WHEN" + resources.ApplyResources(Me.colADDED_WHEN, "colADDED_WHEN") + ' + 'colCHANGED_WHO + ' + Me.colCHANGED_WHO.FieldName = "CHANGED_WHO" + Me.colCHANGED_WHO.Name = "colCHANGED_WHO" + resources.ApplyResources(Me.colCHANGED_WHO, "colCHANGED_WHO") + ' + 'colCHANGED_WHEN + ' + Me.colCHANGED_WHEN.FieldName = "CHANGED_WHEN" + Me.colCHANGED_WHEN.Name = "colCHANGED_WHEN" + resources.ApplyResources(Me.colCHANGED_WHEN, "colCHANGED_WHEN") + ' + 'BindingNavigator1 + ' + Me.BindingNavigator1.AddNewItem = Me.BindingNavigatorAddNewItem + Me.BindingNavigator1.BindingSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource + Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem1 + Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem + resources.ApplyResources(Me.BindingNavigator1, "BindingNavigator1") + Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem1, Me.BindingNavigatorMovePreviousItem1, Me.BindingNavigatorSeparator3, Me.BindingNavigatorPositionItem1, Me.BindingNavigatorCountItem1, Me.BindingNavigatorSeparator4, Me.BindingNavigatorMoveNextItem1, Me.BindingNavigatorMoveLastItem1, Me.BindingNavigatorSeparator5, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.ToolStripButton4}) + Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem1 + Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem1 + Me.BindingNavigator1.MoveNextItem = Me.BindingNavigatorMoveNextItem1 + Me.BindingNavigator1.MovePreviousItem = Me.BindingNavigatorMovePreviousItem1 + Me.BindingNavigator1.Name = "BindingNavigator1" + Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem1 + ' + 'BindingNavigatorAddNewItem + ' + Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem") + Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem" + ' + 'BindingNavigatorCountItem1 + ' + Me.BindingNavigatorCountItem1.Name = "BindingNavigatorCountItem1" + resources.ApplyResources(Me.BindingNavigatorCountItem1, "BindingNavigatorCountItem1") + ' + 'BindingNavigatorDeleteItem + ' + Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem") + Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem" + ' + 'BindingNavigatorMoveFirstItem1 + ' + Me.BindingNavigatorMoveFirstItem1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorMoveFirstItem1, "BindingNavigatorMoveFirstItem1") + Me.BindingNavigatorMoveFirstItem1.Name = "BindingNavigatorMoveFirstItem1" + ' + 'BindingNavigatorMovePreviousItem1 + ' + Me.BindingNavigatorMovePreviousItem1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorMovePreviousItem1, "BindingNavigatorMovePreviousItem1") + Me.BindingNavigatorMovePreviousItem1.Name = "BindingNavigatorMovePreviousItem1" + ' + 'BindingNavigatorSeparator3 + ' + Me.BindingNavigatorSeparator3.Name = "BindingNavigatorSeparator3" + resources.ApplyResources(Me.BindingNavigatorSeparator3, "BindingNavigatorSeparator3") + ' + 'BindingNavigatorPositionItem1 + ' + resources.ApplyResources(Me.BindingNavigatorPositionItem1, "BindingNavigatorPositionItem1") + Me.BindingNavigatorPositionItem1.Name = "BindingNavigatorPositionItem1" + ' + 'BindingNavigatorSeparator4 + ' + Me.BindingNavigatorSeparator4.Name = "BindingNavigatorSeparator4" + resources.ApplyResources(Me.BindingNavigatorSeparator4, "BindingNavigatorSeparator4") + ' + 'BindingNavigatorMoveNextItem1 + ' + Me.BindingNavigatorMoveNextItem1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorMoveNextItem1, "BindingNavigatorMoveNextItem1") + Me.BindingNavigatorMoveNextItem1.Name = "BindingNavigatorMoveNextItem1" + ' + 'BindingNavigatorMoveLastItem1 + ' + Me.BindingNavigatorMoveLastItem1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + resources.ApplyResources(Me.BindingNavigatorMoveLastItem1, "BindingNavigatorMoveLastItem1") + Me.BindingNavigatorMoveLastItem1.Name = "BindingNavigatorMoveLastItem1" + ' + 'BindingNavigatorSeparator5 + ' + Me.BindingNavigatorSeparator5.Name = "BindingNavigatorSeparator5" + resources.ApplyResources(Me.BindingNavigatorSeparator5, "BindingNavigatorSeparator5") + ' + 'ToolStripButton4 + ' + Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image + Me.ToolStripButton4.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.save + resources.ApplyResources(Me.ToolStripButton4, "ToolStripButton4") + Me.ToolStripButton4.Name = "ToolStripButton4" + ' + 'PropertyGrid1 + ' + resources.ApplyResources(Me.PropertyGrid1, "PropertyGrid1") + Me.PropertyGrid1.Name = "PropertyGrid1" + ' 'Label13 ' resources.ApplyResources(Me.Label13, "Label13") @@ -1443,11 +1618,6 @@ Partial Class frmAdministration resources.ApplyResources(Me.SQL_COMMANDTextBox, "SQL_COMMANDTextBox") Me.SQL_COMMANDTextBox.Name = "SQL_COMMANDTextBox" ' - 'TBPM_PROFILE_FINAL_INDEXINGBindingSource - ' - Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource.DataMember = "TBPM_PROFILE_FINAL_INDEXING" - Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource.DataSource = Me.DD_DMSLiteDataSet - ' 'btnShowConnections ' resources.ApplyResources(Me.btnShowConnections, "btnShowConnections") @@ -1946,8 +2116,8 @@ Partial Class frmAdministration 'TBPM_ERROR_LOGDataGridView ' Me.TBPM_ERROR_LOGDataGridView.AllowUserToAddRows = False - DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan - Me.TBPM_ERROR_LOGDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4 + DataGridViewCellStyle3.BackColor = System.Drawing.Color.Cyan + Me.TBPM_ERROR_LOGDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 Me.TBPM_ERROR_LOGDataGridView.AutoGenerateColumns = False Me.TBPM_ERROR_LOGDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.TBPM_ERROR_LOGDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn17, Me.DataGridViewTextBoxColumn22, Me.DataGridViewTextBoxColumn23, Me.DataGridViewTextBoxColumn24, Me.DataGridViewTextBoxColumn25}) @@ -2194,13 +2364,18 @@ Partial Class frmAdministration Me.TabControl2.ResumeLayout(False) Me.TabPage11.ResumeLayout(False) Me.TabPage11.PerformLayout() + CType(Me.gridFinalIndex, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit() + Me.BindingNavigator1.ResumeLayout(False) + Me.BindingNavigator1.PerformLayout() Me.TabControlFinalIndices.ResumeLayout(False) Me.TabPage9.ResumeLayout(False) Me.TabPage9.PerformLayout() Me.grbxSystemStamps.ResumeLayout(False) Me.TabPage10.ResumeLayout(False) Me.TabPage10.PerformLayout() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit() Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.ResumeLayout(False) @@ -2475,4 +2650,26 @@ Partial Class frmAdministration Friend WithEvents GridColumn4 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents tsBtnCancel As ToolStripButton Friend WithEvents OpenFileDialog1 As OpenFileDialog + Friend WithEvents gridFinalIndex As DevExpress.XtraGrid.GridControl + Friend WithEvents viewFinalIndex As DevExpress.XtraGrid.Views.Grid.GridView + Friend WithEvents colINDEXNAME As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colADDED_WHO As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colADDED_WHEN As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colCHANGED_WHO As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colCHANGED_WHEN As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents BindingNavigator1 As BindingNavigator + Friend WithEvents BindingNavigatorAddNewItem As ToolStripButton + Friend WithEvents BindingNavigatorCountItem1 As ToolStripLabel + Friend WithEvents BindingNavigatorDeleteItem As ToolStripButton + Friend WithEvents BindingNavigatorMoveFirstItem1 As ToolStripButton + Friend WithEvents BindingNavigatorMovePreviousItem1 As ToolStripButton + Friend WithEvents BindingNavigatorSeparator3 As ToolStripSeparator + Friend WithEvents BindingNavigatorPositionItem1 As ToolStripTextBox + Friend WithEvents BindingNavigatorSeparator4 As ToolStripSeparator + Friend WithEvents BindingNavigatorMoveNextItem1 As ToolStripButton + Friend WithEvents BindingNavigatorMoveLastItem1 As ToolStripButton + Friend WithEvents BindingNavigatorSeparator5 As ToolStripSeparator + Friend WithEvents PropertyGrid1 As PropertyGrid + Friend WithEvents ToolStripButton4 As ToolStripButton End Class diff --git a/app/DD_PM_WINDREAM/frmAdministration.resx b/app/DD_PM_WINDREAM/frmAdministration.resx index 9ed64a3..685f26c 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.resx +++ b/app/DD_PM_WINDREAM/frmAdministration.resx @@ -2107,7 +2107,7 @@ der Wertänderungen nutzen wollen: TabPage11 - 1 + 4 Segoe UI, 9pt @@ -2592,9 +2592,295 @@ der Wertänderungen nutzen wollen: True - - 765, 56 + + 245, 134 + + 18, 169 + + + True + + + 0 + + + True + + + 1 + + + True + + + 2 + + + True + + + 3 + + + True + + + 4 + + + True + + + 5 + + + 632, 270 + + + 93 + + + gridFinalIndex + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + TabPage11 + + + 0 + + + 831, 212 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC + pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++ + Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ + /5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA + zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/ + IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E + rkJggg== + + + + True + + + 23, 22 + + + Neu hinzufügen + + + 44, 22 + + + von {0} + + + Die Gesamtanzahl der Elemente. + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC + DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC + rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV + i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG + 86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG + QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX + bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Löschen + + + None + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 + wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 + v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg + UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA + Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu + lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Erste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w + 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f + Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ + 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC + + + + True + + + 23, 22 + + + Vorherige verschieben + + + 6, 25 + + + Position + + + False + + + 50, 23 + + + 0 + + + Aktuelle Position + + + 6, 25 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 + n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI + N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f + oAc0QjgAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Nächste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// + h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B + twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA + kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG + WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 + 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== + + + + True + + + 23, 22 + + + Letzte verschieben + + + 6, 25 + + + Magenta + + + 23, 22 + + + ToolStripButton4 + + + 682, 133 + + + 287, 25 + + + 92 + + + BindingNavigator1 + + + BindingNavigator1 + + + System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage11 + + + 1 + + + 1003, 5 + + + 226, 150 + + + 91 + + + PropertyGrid1 + + + System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage11 + + + 2 + + + True + + + Segoe UI, 9.75pt, style=Italic + + + 6, 3 + + + 497, 17 + + + 79 + + + Definieren Sie hier Aktionen welche nach erfolgreicher Indexierung durchgeführt werden: + Label13 @@ -2605,8 +2891,560 @@ der Wertänderungen nutzen wollen: TabPage11 + 3 + + + Top, Bottom, Left, Right + + + True + + + 193, 27 + + + 199, 20 + + + 87 + + + Wert in Vektorindex schreiben + + + CheckBoxPMVEKTOR + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + 0 + + True + + + 24, 135 + + + 45, 16 + + + 89 + + + Label4 + + + False + + + lblSaveFinalIndex + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 1 + + + True + + + 24, 3 + + + 89, 16 + + + 78 + + + Index wählen: + + + lblIndexPMVektor + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 2 + + + True + + + 7, 108 + + + 19, 16 + + + 86 + + + 3. + + + Label11 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 3 + + + 32, 50 + + + 160, 23 + + + 88 + + + False + + + txtBezeichner + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 4 + + + True + + + 7, 52 + + + 19, 16 + + + 85 + + + 2. + + + Label10 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 5 + + + 27, 27 + + + 160, 24 + + + 77 + + + cmbIndexe + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 6 + + + True + + + 7, 3 + + + 19, 16 + + + 84 + + + 1. + + + Label9 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 7 + + + True + + + 24, 52 + + + 21, 16 + + + 79 + + + sd + + + False + + + lblIndex + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 8 + + + btnStampDate + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + grbxSystemStamps + + + 0 + + + btnStampUser + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + grbxSystemStamps + + + 1 + + + 298, 52 + + + 153, 80 + + + 83 + + + System-Stamps + + + False + + + grbxSystemStamps + + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 9 + + + 60, 72 + + + 100, 23 + + + 80 + + + False + + + txtindexwert_final + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 10 + + + MiddleLeft + + + 27, 101 + + + 136, 31 + + + 82 + + + Index einfügen + + + MiddleRight + + + btnInsert_FinalIndex + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 11 + + + True + + + 27, 79 + + + 15, 14 + + + 81 + + + False + + + chkbxfinalIndex + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 12 + + + 4, 25 + + + 3, 3, 3, 3 + + + 1601, 708 + + + 0 + + + Fester Wert + + + TabPage9 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControlFinalIndices + + + 0 + + + True + + + btnEditor + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 0 + + + Label15 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 1 + + + cmbIndexe2 + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 2 + + + btnSaveSQLCommand + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 3 + + + SQL_COMMANDTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 4 + + + btnShowConnections + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 5 + + + Label14 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 6 + + + cmbConnection + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 7 + + + Label4 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 8 + + + 4, 25 + + + 3, 3, 3, 3 + + + 1601, 708 + + + 1 + + + Dynamisches SQL + + + TabPage10 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControlFinalIndices + + + 1 + + + False + + + 668, 161 + + + 1609, 737 + + + 90 + TabControlFinalIndices @@ -2617,7 +3455,25 @@ der Wertänderungen nutzen wollen: TabPage11 - 2 + 5 + + + True + + + Tahoma, 12pt, style=Bold + + + 5, 83 + + + 120, 19 + + + 74 + + + Finale Indexe Label5 @@ -2629,7 +3485,25 @@ der Wertänderungen nutzen wollen: TabPage11 - 3 + 6 + + + True + + + Segoe UI, 9.75pt, style=Italic + + + 6, 108 + + + 583, 17 + + + 75 + + + Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. Label6 @@ -2641,7 +3515,185 @@ der Wertänderungen nutzen wollen: TabPage11 - 4 + 7 + + + 765, 56 + + + 44, 22 + + + von {0} + + + Die Gesamtanzahl der Elemente. + + + None + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 + wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 + v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg + UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA + Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu + lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Erste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w + 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f + Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ + 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC + + + + True + + + 23, 22 + + + Vorherige verschieben + + + 6, 25 + + + Position + + + False + + + 50, 23 + + + 0 + + + Aktuelle Position + + + 6, 25 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 + n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI + N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f + oAc0QjgAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Nächste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// + h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B + twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA + kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG + WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 + 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== + + + + True + + + 23, 22 + + + Letzte verschieben + + + 6, 25 + + + MiddleLeft + + + Magenta + + + 156, 22 + + + Neuen Index hinzufügen + + + MiddleLeft + + + Magenta + + + 99, 22 + + + Index löschen + + + MiddleLeft + + + Magenta + + + 95, 22 + + + Aktualisieren + + + MiddleRight + + + Magenta + + + 73, 22 + + + Abbruch + + + False + + + 7, 133 + + + 568, 25 + + + 76 + + + BindingNavigator1 TBPM_PROFILE_FINAL_INDEXINGBindingNavigator @@ -2653,7 +3705,22 @@ der Wertänderungen nutzen wollen: TabPage11 - 5 + 8 + + + True + + + Top, Bottom, Left + + + 9, 161 + + + 653, 755 + + + 75 TBPM_PROFILE_FINAL_INDEXINGDataGridView @@ -2665,7 +3732,7 @@ der Wertänderungen nutzen wollen: TabPage11 - 6 + 9 4, 25 @@ -2697,18 +3764,6 @@ der Wertänderungen nutzen wollen: True - - 291, 336 - - - 260, 24 - - - 11 - - - ANNOTATE WORK HISTORY ENTRY - ANNOTATE_WORK_HISTORY_ENTRYCheckBox @@ -2721,18 +3776,6 @@ der Wertänderungen nutzen wollen: 0 - - 9, 336 - - - 292, 24 - - - 9 - - - ANNOTATE ALL WORK_HISTORY_ENTRIES - ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox @@ -2745,21 +3788,6 @@ der Wertänderungen nutzen wollen: 1 - - Tahoma, 9pt - - - 9, 67 - - - True - - - 1198, 234 - - - 7 - SQL_VIEWTextBox @@ -2772,15 +3800,6 @@ der Wertänderungen nutzen wollen: 3 - - 9, 22 - - - 1198, 23 - - - 1 - WORK_HISTORY_ENTRYTextBox @@ -2800,7 +3819,7 @@ der Wertänderungen nutzen wollen: 3, 3, 3, 3 - 1235, 445 + 1235, 448 1 @@ -3369,561 +4388,6 @@ der Wertänderungen nutzen wollen: 7 - - True - - - Segoe UI, 9.75pt, style=Italic - - - 6, 3 - - - 497, 17 - - - 79 - - - Definieren Sie hier Aktionen welche nach erfolgreicher Indexierung durchgeführt werden: - - - Label13 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 0 - - - Top, Bottom, Left, Right - - - TabPage9 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 0 - - - TabPage10 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 1 - - - False - - - 668, 161 - - - 1609, 722 - - - 90 - - - TabControlFinalIndices - - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 2 - - - CheckBoxPMVEKTOR - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 0 - - - lblSaveFinalIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 1 - - - lblIndexPMVektor - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 2 - - - Label11 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 3 - - - txtBezeichner - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 4 - - - Label10 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 5 - - - cmbIndexe - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 6 - - - Label9 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 7 - - - lblIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 8 - - - grbxSystemStamps - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 9 - - - txtindexwert_final - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 10 - - - btnInsert_FinalIndex - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 11 - - - chkbxfinalIndex - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 12 - - - 4, 25 - - - 3, 3, 3, 3 - - - 1601, 693 - - - 0 - - - Fester Wert - - - TabPage9 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 0 - - - True - - - 193, 27 - - - 199, 20 - - - 87 - - - Wert in Vektorindex schreiben - - - CheckBoxPMVEKTOR - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 0 - - - True - - - 24, 135 - - - 45, 16 - - - 89 - - - Label4 - - - False - - - lblSaveFinalIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 1 - - - True - - - 24, 3 - - - 89, 16 - - - 78 - - - Index wählen: - - - lblIndexPMVektor - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 2 - - - True - - - 7, 108 - - - 19, 16 - - - 86 - - - 3. - - - Label11 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 3 - - - 27, 29 - - - 160, 23 - - - 88 - - - False - - - txtBezeichner - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 4 - - - True - - - 7, 52 - - - 19, 16 - - - 85 - - - 2. - - - Label10 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 5 - - - 27, 27 - - - 160, 24 - - - 77 - - - cmbIndexe - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 6 - - - True - - - 7, 3 - - - 19, 16 - - - 84 - - - 1. - - - Label9 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 7 - - - True - - - 24, 52 - - - 21, 16 - - - 79 - - - sd - - - False - - - lblIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 8 - - - btnStampDate - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 0 - - - btnStampUser - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 1 - - - 298, 52 - - - 153, 80 - - - 83 - - - System-Stamps - - - False - - - grbxSystemStamps - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 9 - MiddleLeft @@ -3984,225 +4448,6 @@ der Wertänderungen nutzen wollen: 1 - - 27, 74 - - - 100, 23 - - - 80 - - - False - - - txtindexwert_final - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 10 - - - MiddleLeft - - - 27, 101 - - - 136, 31 - - - 82 - - - Index einfügen - - - MiddleRight - - - btnInsert_FinalIndex - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 11 - - - True - - - 27, 79 - - - 15, 14 - - - 81 - - - False - - - chkbxfinalIndex - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 12 - - - True - - - btnEditor - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 0 - - - Label15 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 1 - - - cmbIndexe2 - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 2 - - - btnSaveSQLCommand - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 3 - - - SQL_COMMANDTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 4 - - - btnShowConnections - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 5 - - - Label14 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 6 - - - cmbConnection - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 7 - - - Label4 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 8 - - - 4, 25 - - - 3, 3, 3, 3 - - - 1601, 693 - - - 1 - - - Dynamisches SQL - - - TabPage10 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 1 - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -4331,9 +4576,6 @@ der Wertänderungen nutzen wollen: 3 - - 245, 134 - Courier New, 9pt @@ -4361,9 +4603,6 @@ der Wertänderungen nutzen wollen: 4 - - 245, 134 - Tahoma, 9.75pt @@ -4484,283 +4723,6 @@ der Wertänderungen nutzen wollen: 8 - - True - - - Tahoma, 12pt, style=Bold - - - 5, 83 - - - 120, 19 - - - 74 - - - Finale Indexe - - - Label5 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 3 - - - True - - - Segoe UI, 9.75pt, style=Italic - - - 6, 108 - - - 583, 17 - - - 75 - - - Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. - - - Label6 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 4 - - - 765, 56 - - - 44, 22 - - - von {0} - - - Die Gesamtanzahl der Elemente. - - - None - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 - wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 - v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg - UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA - Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu - lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Erste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w - 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f - Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ - 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC - - - - True - - - 23, 22 - - - Vorherige verschieben - - - 6, 25 - - - Position - - - False - - - 50, 23 - - - 0 - - - Aktuelle Position - - - 6, 25 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 - n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI - N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f - oAc0QjgAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Nächste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// - h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B - twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA - kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG - WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 - 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - - - - True - - - 23, 22 - - - Letzte verschieben - - - 6, 25 - - - MiddleLeft - - - Magenta - - - 156, 22 - - - Neuen Index hinzufügen - - - MiddleLeft - - - Magenta - - - 99, 22 - - - Index löschen - - - MiddleLeft - - - Magenta - - - 95, 22 - - - Aktualisieren - - - MiddleRight - - - Magenta - - - 73, 22 - - - Abbruch - - - False - - - 7, 133 - - - 568, 25 - - - 76 - - - BindingNavigator1 - - - TBPM_PROFILE_FINAL_INDEXINGBindingNavigator - - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 5 - - - True - - - Top, Bottom, Left - - - 9, 161 - - - 653, 740 - - - 75 - - - TBPM_PROFILE_FINAL_INDEXINGDataGridView - - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 6 - True @@ -4779,6 +4741,102 @@ der Wertänderungen nutzen wollen: Erstellt wann + + 291, 336 + + + 260, 24 + + + 11 + + + ANNOTATE WORK HISTORY ENTRY + + + ANNOTATE_WORK_HISTORY_ENTRYCheckBox + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage12 + + + 0 + + + 9, 336 + + + 292, 24 + + + 9 + + + ANNOTATE ALL WORK_HISTORY_ENTRIES + + + ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage12 + + + 1 + + + Tahoma, 9pt + + + 9, 67 + + + True + + + 1198, 234 + + + 7 + + + SQL_VIEWTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage12 + + + 3 + + + 9, 22 + + + 1198, 23 + + + 1 + + + WORK_HISTORY_ENTRYTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage12 + + + 5 + Fill @@ -6441,6 +6499,120 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + viewFinalIndex + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colGUID + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colINDEXNAME + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colADDED_WHO + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colADDED_WHEN + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colCHANGED_WHO + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colCHANGED_WHEN + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BindingNavigatorAddNewItem + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorCountItem1 + + + System.Windows.Forms.ToolStripLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorDeleteItem + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorMoveFirstItem1 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorMovePreviousItem1 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorSeparator3 + + + System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorPositionItem1 + + + System.Windows.Forms.ToolStripTextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorSeparator4 + + + System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorMoveNextItem1 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorMoveLastItem1 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BindingNavigatorSeparator5 + + + System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ToolStripButton4 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + TBDD_CONNECTIONBindingSource diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index fe05dd6..5d21dd7 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -12,6 +12,7 @@ Public Class frmAdministration Dim formloaded As Boolean Private INSERT_ACTIVE As Boolean = False + Dim Windream_Indicies As List(Of String) Private Sub frmFormDesigner_Load(sender As Object, e As System.EventArgs) Handles Me.Load @@ -49,6 +50,8 @@ Public Class frmAdministration btnUserManager.Enabled = False End If + tabctrl_Profilkonfig.SelectedIndex = 0 + Catch ex As Exception MsgBox("Fehler bei Laden der Wertehilfen und Konfig-Daten: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") End Try @@ -63,6 +66,12 @@ Public Class frmAdministration End Try ObjekttypenEintragen() Indexe_eintragen() + + Try + Windream_Indicies = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList() + Catch ex As Exception + MsgBox("Fehler bei Indexe_eintragen: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") + End Try End Sub Sub Indexe_eintragen() If cmbObjekttypen.Text <> "" Then @@ -865,17 +874,21 @@ Public Class frmAdministration End If Dim i, ID As Integer - i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - If ID > 0 Then - CURRENT_INDEX_ID = ID - CURRENT_DESIGN_TYPE = "FINAL_INDEX" - CURRENT_SQL_COMAMND = SQL_COMMANDTextBox.Text - CURRENT_SQL_CON = CONID - CURRENT_ProfilGUID = PROFILGUIDTextBox.Text + Try + i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index + ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value + If ID > 0 Then + CURRENT_INDEX_ID = ID + CURRENT_DESIGN_TYPE = "FINAL_INDEX" + CURRENT_SQL_COMAMND = SQL_COMMANDTextBox.Text + CURRENT_SQL_CON = CONID + CURRENT_ProfilGUID = PROFILGUIDTextBox.Text - frmSQL_DESIGNER.ShowDialog() - End If + frmSQL_DESIGNER.ShowDialog() + End If + Catch ex As Exception + clsLogger.Add("Error while operating on TBPM_PROFILE_FINAL_INDEXINGDataGridView: " & ex.Message) + End Try Refresh_Final_indexe() Catch ex As Exception @@ -966,4 +979,108 @@ Public Class frmAdministration Private Sub TabControl2_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles TabControl2.SelectedIndexChanged CancelFinalIndexInsert() End Sub + + Private Sub GridView2_FocusedRowChanged(sender As Object, e As Views.Base.FocusedRowChangedEventArgs) Handles viewFinalIndex.FocusedRowChanged + Try + Dim view As GridView = sender + Dim focusedRow As DataRow = view.GetFocusedDataRow() + + Dim guid As Integer = focusedRow.Item("GUID") + Dim index As String = focusedRow.Item("INDEXNAME") + Dim sqlCommand As String = focusedRow.Item("SQL_COMMAND") + Dim connectionId As Integer = focusedRow.Item("CONNECTION_ID") + Dim value As String = focusedRow.Item("VALUE") + + CURRENT_INDEX_ID = guid + CURRENT_SQL_CON = connectionId + + Dim obj As New FinalIndexProperties() + obj.GUID = guid + obj.IndexName = index + obj.StaticValue = value + obj.SQLCommand = New SQLValue(sqlCommand) + obj.ConnectionId = connectionId + obj.Indicies = Windream_Indicies + + PropertyGrid1.SelectedObject = obj + Catch ex As Exception + MsgBox($"Error while loading Final Index properties: {ex.Message}") + ClassLogger.Add($"Error while loading Final Index properties: {ex.Message}") + End Try + End Sub + + Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click + Dim obj As New FinalIndexProperties() + obj.Indicies = Windream_Indicies + obj.SQLCommand = New SQLValue() + + PropertyGrid1.SelectedObject = obj + + INSERT_ACTIVE = True + End Sub + + Private Sub ToolStripButton4_Click_1(sender As Object, e As EventArgs) Handles ToolStripButton4.Click + Try + Dim obj As FinalIndexProperties = PropertyGrid1.SelectedObject + + If Not IsNothing(obj) Then + Dim guid = obj.GUID + Dim profileId As Integer = PROFILGUIDTextBox.Text + Dim connectionId As Integer = obj.ConnectionId + Dim sqlCommand As String = obj.SQLCommand.Value.Replace("'", "''") + Dim indexName As String = obj.IndexName + Dim value As String = obj.StaticValue + Dim addedWho As String = Environment.UserName + + If NotNull(indexName, "") = String.Empty Then + MsgBox("Das Feld Index muss ausgefüllt sein!", MsgBoxStyle.Exclamation) + Exit Sub + End If + + If NotNull(sqlCommand, "") = String.Empty And NotNull(value, "") = String.Empty Then + MsgBox("Entweder SQL Command oder StaticValue müssen ausgefüllt sein!", MsgBoxStyle.Exclamation) + Exit Sub + End If + + + + If INSERT_ACTIVE = True Then + Dim sql As String = $"INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, CONNECTION_ID, SQL_COMMAND, INDEXNAME, VALUE, ADDED_WHO) + VALUES ({profileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', '{addedWho}')" + + If ClassDatabase.Execute_non_Query(sql, True) Then + INSERT_ACTIVE = False + End If + Else + Dim sql As String = $"UPDATE TBPM_PROFILE_FINAL_INDEXING + SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}' + WHERE GUID = {guid}" + + If ClassDatabase.Execute_non_Query(sql, True) Then + + End If + End If + + Refresh_Final_indexe() + + End If + Catch ex As Exception + MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical) + ClassLogger.Add("Error while Saving Final Index: " & ex.Message) + End Try + End Sub + + Private Sub PropertyGrid1_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs) Handles PropertyGrid1.PropertyValueChanged + Dim propertyGrid As PropertyGrid = s + Dim obj As FinalIndexProperties = propertyGrid.SelectedObject + + If TypeOf (e.ChangedItem.Value) Is SQLValue Then + + obj.ConnectionId = CURRENT_SQL_CON + obj.StaticValue = "SQL-Command" + ElseIf e.ChangedItem.Label = "StaticValue" Then + + obj.SQLCommand.Value = String.Empty + End If + End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmConnection.Designer.vb b/app/DD_PM_WINDREAM/frmConnection.Designer.vb index 9ca14c2..884cd50 100644 --- a/app/DD_PM_WINDREAM/frmConnection.Designer.vb +++ b/app/DD_PM_WINDREAM/frmConnection.Designer.vb @@ -27,7 +27,8 @@ Partial Class frmConnection Dim GEAENDERTWANNLabel As System.Windows.Forms.Label Dim GUIDLabel As System.Windows.Forms.Label Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConnection)) - Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim BEMERKUNGLabel As System.Windows.Forms.Label Me.chkOR_ohne_TNS = New System.Windows.Forms.CheckBox() Me.Chckwin_aut = New System.Windows.Forms.CheckBox() Me.txtBezeichnung = New System.Windows.Forms.TextBox() @@ -75,9 +76,11 @@ Partial Class frmConnection Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TBDD_CONNECTIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter() Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox() + Me.BEMERKUNGTextBox = New System.Windows.Forms.TextBox() GEANDERTWERLabel = New System.Windows.Forms.Label() GEAENDERTWANNLabel = New System.Windows.Forms.Label() GUIDLabel = New System.Windows.Forms.Label() + BEMERKUNGLabel = New System.Windows.Forms.Label() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_CONNECTIONBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit() @@ -312,7 +315,7 @@ Partial Class frmConnection Me.TBDD_CONNECTIONBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem Me.TBDD_CONNECTIONBindingNavigator.Name = "TBDD_CONNECTIONBindingNavigator" Me.TBDD_CONNECTIONBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem - Me.TBDD_CONNECTIONBindingNavigator.Size = New System.Drawing.Size(1165, 25) + Me.TBDD_CONNECTIONBindingNavigator.Size = New System.Drawing.Size(1176, 25) Me.TBDD_CONNECTIONBindingNavigator.TabIndex = 53 Me.TBDD_CONNECTIONBindingNavigator.Text = "BindingNavigator1" ' @@ -421,8 +424,8 @@ Partial Class frmConnection ' Me.TBDD_CONNECTIONDataGridView.AllowUserToAddRows = False Me.TBDD_CONNECTIONDataGridView.AllowUserToDeleteRows = False - DataGridViewCellStyle2.BackColor = System.Drawing.Color.Aqua - Me.TBDD_CONNECTIONDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 + DataGridViewCellStyle1.BackColor = System.Drawing.Color.Aqua + Me.TBDD_CONNECTIONDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.TBDD_CONNECTIONDataGridView.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -433,7 +436,7 @@ Partial Class frmConnection Me.TBDD_CONNECTIONDataGridView.Location = New System.Drawing.Point(12, 276) Me.TBDD_CONNECTIONDataGridView.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TBDD_CONNECTIONDataGridView.Name = "TBDD_CONNECTIONDataGridView" - Me.TBDD_CONNECTIONDataGridView.Size = New System.Drawing.Size(1144, 316) + Me.TBDD_CONNECTIONDataGridView.Size = New System.Drawing.Size(1155, 316) Me.TBDD_CONNECTIONDataGridView.TabIndex = 53 ' 'DataGridViewTextBoxColumn1 @@ -550,11 +553,30 @@ Partial Class frmConnection Me.DATENBANKComboBox.Size = New System.Drawing.Size(259, 24) Me.DATENBANKComboBox.TabIndex = 66 ' + 'BEMERKUNGLabel + ' + BEMERKUNGLabel.AutoSize = True + BEMERKUNGLabel.Location = New System.Drawing.Point(532, 83) + BEMERKUNGLabel.Name = "BEMERKUNGLabel" + BEMERKUNGLabel.Size = New System.Drawing.Size(82, 16) + BEMERKUNGLabel.TabIndex = 66 + BEMERKUNGLabel.Text = "Bermerkung:" + ' + 'BEMERKUNGTextBox + ' + Me.BEMERKUNGTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_CONNECTIONBindingSource, "BEMERKUNG", True)) + Me.BEMERKUNGTextBox.Location = New System.Drawing.Point(535, 102) + Me.BEMERKUNGTextBox.Name = "BEMERKUNGTextBox" + Me.BEMERKUNGTextBox.Size = New System.Drawing.Size(219, 23) + Me.BEMERKUNGTextBox.TabIndex = 67 + ' 'frmConnection ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(1165, 619) + Me.ClientSize = New System.Drawing.Size(1176, 619) + Me.Controls.Add(BEMERKUNGLabel) + Me.Controls.Add(Me.BEMERKUNGTextBox) Me.Controls.Add(Me.DATENBANKComboBox) Me.Controls.Add(GUIDLabel) Me.Controls.Add(Me.GUIDTextBox) @@ -641,4 +663,5 @@ Partial Class frmConnection Friend WithEvents ToolStripButton3 As ToolStripButton Friend WithEvents GUIDTextBox As TextBox Friend WithEvents DATENBANKComboBox As ComboBox + Friend WithEvents BEMERKUNGTextBox As TextBox End Class diff --git a/app/DD_PM_WINDREAM/frmConnection.resx b/app/DD_PM_WINDREAM/frmConnection.resx index 7749cb6..1fa09ca 100644 --- a/app/DD_PM_WINDREAM/frmConnection.resx +++ b/app/DD_PM_WINDREAM/frmConnection.resx @@ -129,12 +129,6 @@ 179, 17 - - 179, 17 - - - 17, 17 - 17, 17 @@ -219,4 +213,7 @@ 858, 17 + + False + \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmFormDesigner.vb b/app/DD_PM_WINDREAM/frmFormDesigner.vb index bced4a2..9ab8225 100644 --- a/app/DD_PM_WINDREAM/frmFormDesigner.vb +++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb @@ -23,6 +23,10 @@ Public Class frmFormDesigner Private Sub frmFormDesigner_Load(sender As Object, e As EventArgs) Handles Me.Load Try + ' Setzt den typ des SQL-Befehls für frmSQL_DESIGNER + CURRENT_DESIGN_TYPE = "INPUT_INDEX" + + ' Profil Name in Fenstertitel setzen Text = $"Validation Designer - Profil: {ProfileName}" @@ -83,6 +87,8 @@ Public Class frmFormDesigner frmControl_Detail.Close() End If + ' Setzt den typ des SQL-Befehls für frmSQL_DESIGNER + CURRENT_DESIGN_TYPE = "FINAL_INDEX" End Sub ''' @@ -599,7 +605,7 @@ Public Class frmFormDesigner obj.Required = StrToBool(row.Item("VALIDATION")) obj.Index = NotNull(row.Item("INDEX_NAME"), "") obj.DefaultValue = NotNull(row.Item("DEFAULT_VALUE"), Nothing) - obj.SQLCommand = New InputProperties.SQLValue(row.Item("SQL_UEBERPRUEFUNG")) + obj.SQLCommand = New SQLValue(row.Item("SQL_UEBERPRUEFUNG")) Return obj End Function @@ -779,8 +785,8 @@ Public Class frmFormDesigner ' Strings und SQL-Commands müssen vor dem Speichern escaped und mit Anführungszeichen versehen werden If TypeOf value Is String Then escapedValue = $"'{value}'" - ElseIf TypeOf value Is InputProperties.SQLValue Then - Dim v As InputProperties.SQLValue = value + ElseIf TypeOf value Is SQLValue Then + Dim v As SQLValue = value escapedValue = $"'{v.Value.Replace("'", "''")}'" End If diff --git a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb index 0088184..3d48456 100644 --- a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb +++ b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb @@ -15,7 +15,7 @@ Public Class frmSQL_DESIGNER Public Property FormId As Integer End Class - Public Property Value() As String + Public Property SQLCommand() As String Get Return SQL_COMMANDTextBox.Text End Get @@ -24,6 +24,8 @@ Public Class frmSQL_DESIGNER End Set End Property + Public Property ConnectionID As Integer + Private Sub TBPM_PROFILE_FINAL_INDEXINGBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Validate() TBPM_PROFILE_FINAL_INDEXINGBindingSource.EndEdit() @@ -39,13 +41,17 @@ Public Class frmSQL_DESIGNER CURRENT_DT_SQL_CONFIG_TABLE = ClassDatabase.Return_Datatable(String.Format("SELECT T.CONNECTION_ID,T1.BEZEICHNUNG AS 'CON_STRING',ISNULL(T.SQL_UEBERPRUEFUNG,'') AS 'SQL_COMMAND' FROM TBPM_PROFILE_CONTROLS T, TBDD_CONNECTION T1 WHERE T.CONNECTION_ID = T1.GUID AND T.GUID = {0}", CURRENT_CONTROL_ID), True) - If CURRENT_DT_SQL_CONFIG_TABLE.Rows.Count > 0 Then - cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID") - cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING")) - SQL_COMMANDTextBox.Text = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("SQL_COMMAND") - Else - SQL_COMMANDTextBox.Text = String.Empty + If CURRENT_DESIGN_TYPE = "INPUT_INDEX" Then + If CURRENT_DT_SQL_CONFIG_TABLE.Rows.Count > 0 Then + cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID") + cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING")) + SQL_COMMANDTextBox.Text = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("SQL_COMMAND") + Else + SQL_COMMANDTextBox.Text = String.Empty + End If End If + + Try ' Windream instanziieren _windreamPM = New ClassPMWindream() @@ -208,9 +214,12 @@ Public Class frmSQL_DESIGNER Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) Handles btnSaveSQLCommand.Click If CURRENT_DESIGN_TYPE = "FINAL_INDEX" Then - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, CURRENT_INDEX_ID) + ' SQL wird nicht hier, sondern in frmAdministration gespeichert + 'TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, CURRENT_INDEX_ID) lblSaveFinalIndex.Visible = True lblSaveFinalIndex.Text = "SQL für finalen Index wurde erfolgreich gespeichert! " & Now.ToString + Me.SQLCommand = SQL_COMMANDTextBox.Text + Me.ConnectionId = cmbConnection.SelectedValue ElseIf CURRENT_DESIGN_TYPE = "INPUT_INDEX" Then Dim command = SQL_COMMANDTextBox.Text command = command.Replace("'", "''") @@ -221,7 +230,7 @@ Public Class frmSQL_DESIGNER Else lblSaveFinalIndex.Visible = False End If - Me.Value = SQL_COMMANDTextBox.Text + Me.SQLCommand = SQL_COMMANDTextBox.Text End If End Sub diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index 02443eb..18bbcdd 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -1770,15 +1770,32 @@ Public Class frmValidator Else wertWD = aktivesDokument.GetVariableValue(idxname) End If + If wertWD Is Nothing Then + If LogErrorsOnly = False Then ClassLogger.Add($" >> Indexwert aus index {idxname}: Nothing", False) If defaultValue = String.Empty Then + If LogErrorsOnly = False Then ClassLogger.Add($" >> Indexwert-defaultValue wurde nicht gefunden", False) cmb.SelectedIndex = -1 Else + If LogErrorsOnly = False Then ClassLogger.Add($" >> Indexwert-defaultValue wird geladen", False) cmb.Text = defaultValue 'cmb.SelectedIndex = cmb.FindStringExact(defaultValue) End If Else - cmb.SelectedIndex = cmb.FindStringExact(wertWD) + If LogErrorsOnly = False Then ClassLogger.Add($" >> Indexwert aus index {idxname}: {wertWD}", False) + If LogErrorsOnly = False Then ClassLogger.Add($" >> Items in Combobox: {cmb.Items.Count}", False) + + + If LogErrorsOnly = False Then ClassLogger.Add($" >> Index Wert wurde gesetzt", False) + cmb.Text = wertWD + + 'If cmb.Items.Count = 0 Then + ' If LogErrorsOnly = False Then ClassLogger.Add($" >> Index Wert wurde gesetzt", False) + ' cmb.Text = wertWD + 'Else + ' If LogErrorsOnly = False Then ClassLogger.Add($" >> Index Wert wurde ausgewählt", False) + ' cmb.SelectedIndex = cmb.FindStringExact(wertWD) + 'End If End If End If Case "System.Windows.Forms.DataGridView"