AppStd/FileFlow
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

update TBDD_DOKUMENTART & VWDDINDEX_AUTOM

Browse Source
This commit is contained in:
Jonathan Jenne 2023-09-26 15:42:11 +02:00
parent 67bf229525
commit 2eeb773cf8
6 changed files with 3840 additions and 2491 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

63
Global_Indexer/MyDataset.Designer.vb generated
View File

@ -4558,6 +4558,10 @@ Partial Public Class MyDataset
Private columnSEQUENCE As Global.System.Data.DataColumn
Private columnVKT_OVERWRITE As Global.System.Data.DataColumn
Private columnVKT_PREVENT_MULTIPLE_VALUES As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
@ -4745,6 +4749,22 @@ Partial Public Class MyDataset
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property VKT_OVERWRITEColumn() As Global.System.Data.DataColumn
Get
Return Me.columnVKT_OVERWRITE
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property VKT_PREVENT_MULTIPLE_VALUESColumn() As Global.System.Data.DataColumn
Get
Return Me.columnVKT_PREVENT_MULTIPLE_VALUES
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
@ -4801,9 +4821,11 @@ Partial Public Class MyDataset
ByVal Indexwert As String, _
ByVal VALUE As String, _
ByVal SQL_ACTIVE As Boolean, _
ByVal SEQUENCE As Byte) As VWDDINDEX_AUTOMRow
ByVal SEQUENCE As Byte, _
ByVal VKT_OVERWRITE As Boolean, _
ByVal VKT_PREVENT_MULTIPLE_VALUES As Boolean) As VWDDINDEX_AUTOMRow
Dim rowVWDDINDEX_AUTOMRow As VWDDINDEX_AUTOMRow = CType(Me.NewRow,VWDDINDEX_AUTOMRow)
Dim columnValuesArray() As Object = New Object() {GUID, INDEXNAME, COMMENT, DOCTYPE_ID, DOKUMENTART, KURZNAME, CONNECTION_ID, CONNECTION, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, SQL_RESULT, Indexiert, Indexwert, VALUE, SQL_ACTIVE, SEQUENCE}
Dim columnValuesArray() As Object = New Object() {GUID, INDEXNAME, COMMENT, DOCTYPE_ID, DOKUMENTART, KURZNAME, CONNECTION_ID, CONNECTION, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, SQL_RESULT, Indexiert, Indexwert, VALUE, SQL_ACTIVE, SEQUENCE, VKT_OVERWRITE, VKT_PREVENT_MULTIPLE_VALUES}
rowVWDDINDEX_AUTOMRow.ItemArray = columnValuesArray
Me.Rows.Add(rowVWDDINDEX_AUTOMRow)
Return rowVWDDINDEX_AUTOMRow
@ -4851,6 +4873,8 @@ Partial Public Class MyDataset
Me.columnVALUE = MyBase.Columns("VALUE")
Me.columnSQL_ACTIVE = MyBase.Columns("SQL_ACTIVE")
Me.columnSEQUENCE = MyBase.Columns("SEQUENCE")
Me.columnVKT_OVERWRITE = MyBase.Columns("VKT_OVERWRITE")
Me.columnVKT_PREVENT_MULTIPLE_VALUES = MyBase.Columns("VKT_PREVENT_MULTIPLE_VALUES")
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -4894,6 +4918,10 @@ Partial Public Class MyDataset
MyBase.Columns.Add(Me.columnSQL_ACTIVE)
Me.columnSEQUENCE = New Global.System.Data.DataColumn("SEQUENCE", GetType(Byte), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSEQUENCE)
Me.columnVKT_OVERWRITE = New Global.System.Data.DataColumn("VKT_OVERWRITE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnVKT_OVERWRITE)
Me.columnVKT_PREVENT_MULTIPLE_VALUES = New Global.System.Data.DataColumn("VKT_PREVENT_MULTIPLE_VALUES", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnVKT_PREVENT_MULTIPLE_VALUES)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AllowDBNull = false
Me.columnGUID.Unique = true
@ -4919,6 +4947,8 @@ Partial Public Class MyDataset
Me.columnVALUE.MaxLength = 2000
Me.columnSQL_ACTIVE.AllowDBNull = false
Me.columnSEQUENCE.AllowDBNull = false
Me.columnVKT_OVERWRITE.AllowDBNull = false
Me.columnVKT_PREVENT_MULTIPLE_VALUES.AllowDBNull = false
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -12026,6 +12056,28 @@ Partial Public Class MyDataset
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property VKT_OVERWRITE() As Boolean
Get
Return CType(Me(Me.tableVWDDINDEX_AUTOM.VKT_OVERWRITEColumn),Boolean)
End Get
Set
Me(Me.tableVWDDINDEX_AUTOM.VKT_OVERWRITEColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property VKT_PREVENT_MULTIPLE_VALUES() As Boolean
Get
Return CType(Me(Me.tableVWDDINDEX_AUTOM.VKT_PREVENT_MULTIPLE_VALUESColumn),Boolean)
End Get
Set
Me(Me.tableVWDDINDEX_AUTOM.VKT_PREVENT_MULTIPLE_VALUESColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsCOMMENTNull() As Boolean
@ -18055,6 +18107,8 @@ Namespace MyDatasetTableAdapters
tableMapping.ColumnMappings.Add("VALUE", "VALUE")
tableMapping.ColumnMappings.Add("SQL_ACTIVE", "SQL_ACTIVE")
tableMapping.ColumnMappings.Add("SEQUENCE", "SEQUENCE")
tableMapping.ColumnMappings.Add("VKT_OVERWRITE", "VKT_OVERWRITE")
tableMapping.ColumnMappings.Add("VKT_PREVENT_MULTIPLE_VALUES", "VKT_PREVENT_MULTIPLE_VALUES")
Me._adapter.TableMappings.Add(tableMapping)
End Sub
@ -18073,8 +18127,9 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, INDEXNAME, COMMENT, DOCTYPE_ID, DOKUMENTART, KURZNAME, CONNEC"& _
"TION_ID, CONNECTION, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, SQL_RE"& _
"SULT, VALUE, SQL_ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQUENCE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM VW"& _
"DDINDEX_AUTOM"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (DOCTYPE_ID = @DOCTYPE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY SEQUENCE"
"SULT, VALUE, SQL_ACTIVE, SEQUENCE,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" VKT_OVERWRITE, VKT"& _
"_PREVENT_MULTIPLE_VALUES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM VWDDINDEX_AUTOM"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (DOCTYPE"& _
"_ID = @DOCTYPE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY SEQUENCE"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOCTYPE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOCTYPE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
End Sub

506
Global_Indexer/MyDataset.xsd
View File

File diff suppressed because it is too large Load Diff

52
Global_Indexer/MyDataset.xss
View File

@ -4,30 +4,30 @@
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="226" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="417" ViewPortY="-47" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:TBDD_USER" ZOrder="12" X="765" Y="247" Height="305" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="14" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" />
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="17" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBDD_USER" ZOrder="13" X="765" Y="247" Height="305" Width="213" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBDD_DOKUMENTART" ZOrder="15" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" />
<Shape ID="DesignTable:TBDD_EINGANGSARTEN" ZOrder="18" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBDD_DOKART_MODULE" ZOrder="29" X="1381" Y="161" Height="134" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBDD_MODULES" ZOrder="28" X="1096" Y="325" Height="115" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="2" X="456" Y="638" Height="360" Width="244" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
<Shape ID="DesignTable:TBDD_INDEX_MAN" ZOrder="3" X="456" Y="638" Height="360" Width="244" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="292" />
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="27" X="433" Y="81" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="11" X="1040" Y="444" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="25" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="1" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="22" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
<Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="4" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="7" X="719" Y="25" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="6" X="135" Y="27" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="8" X="1040" Y="71" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="13" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBGI_FILES_USER" ZOrder="3" X="1474" Y="-2" Height="336" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="5" X="120" Y="153" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBGI_REGEX_DOCTYPE" ZOrder="10" X="1027" Y="881" Height="210" Width="276" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="23" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="19" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:TBAD_Users" ZOrder="15" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
<Shape ID="DesignTable:VWDDINDEX_MAN" ZOrder="12" X="1040" Y="444" Height="381" Width="256" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="313" />
<Shape ID="DesignTable:VWDDINDEX_AUTOM" ZOrder="1" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_INDEX_AUTOM" ZOrder="2" X="668" Y="605" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBGI_CONFIGURATION" ZOrder="23" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
<Shape ID="DesignTable:TBGI_OBJECTTYPE_EMAIL_INDEX" ZOrder="5" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBDD_INDEX_MAN_POSTPROCESSING" ZOrder="8" X="719" Y="25" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBWHDD_INDEX_MAN" ZOrder="7" X="135" Y="27" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBDD_GROUPS_USER" ZOrder="9" X="1040" Y="71" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:VWGI_USER_GROUPS_RELATION" ZOrder="14" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBGI_FILES_USER" ZOrder="4" X="1474" Y="-2" Height="336" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
<Shape ID="DesignTable:TBGI_HISTORY" ZOrder="6" X="120" Y="153" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBGI_REGEX_DOCTYPE" ZOrder="11" X="1027" Y="881" Height="210" Width="276" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBTempFiles2Index" ZOrder="24" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:TBTEMP_INDEXRESULTS" ZOrder="20" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:TBAD_Users" ZOrder="16" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
</Shapes>
<Connectors>
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="30" LineWidth="11">
@ -54,7 +54,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="24" LineWidth="11">
<Connector ID="DesignRelation:FK_TBDD_INDEX_AUTOM_DOCID" ZOrder="25" LineWidth="11">
<RoutePoints>
<Point>
<X>397</X>
@ -66,7 +66,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="21" LineWidth="11">
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID" ZOrder="22" LineWidth="11">
<RoutePoints>
<Point>
<X>597</X>
@ -82,7 +82,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="20" LineWidth="11">
<Connector ID="DesignRelation:FKTBDD_INDEX_MAN_POSTPROCESSING_IDXID1" ZOrder="21" LineWidth="11">
<RoutePoints>
<Point>
<X>293</X>
@ -94,7 +94,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="18" LineWidth="11">
<Connector ID="DesignRelation:FK_TBDD_GROUPS_USER_USER_ID" ZOrder="19" LineWidth="11">
<RoutePoints>
<Point>
<X>978</X>
@ -106,7 +106,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="16" LineWidth="11">
<Connector ID="DesignRelation:FK_TBDD_INDEX_MAN_DAID" ZOrder="17" LineWidth="11">
<RoutePoints>
<Point>
<X>397</X>
@ -118,7 +118,7 @@
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBGI_REGEX_DOCTYPE_DTID" ZOrder="9" LineWidth="11">
<Connector ID="DesignRelation:FK_TBGI_REGEX_DOCTYPE_DTID" ZOrder="10" LineWidth="11">
<RoutePoints>
<Point>
<X>380</X>

5647
Global_Indexer/frmAdministration.resx
View File

File diff suppressed because it is too large Load Diff

23
Global_Indexer/frmAdministration.vb
View File

@ -369,6 +369,7 @@ Public Class frmAdministration
EnableControls(XtraTabPageAutoIndex)
End If
CheckIndexAutoWD()
SetAutomIndexVectorCheckboxEnabled()
Catch ex As System.Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Load Indexe Auto: ")
End Try
@ -899,7 +900,7 @@ Public Class frmAdministration
Private _indexIsVectorField As Boolean = False
Private Sub WD_INDEXComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles WD_INDEXComboBox.SelectedIndexChanged
_indexIsVectorField = indexIsVectorField()
_indexIsVectorField = indexIsVectorField(WD_INDEXComboBox.Text)
MULTISELECTCheckBox.Enabled = _indexIsVectorField
@ -917,9 +918,9 @@ Public Class frmAdministration
End If
End Sub
Private Function indexIsVectorField() As Boolean
Private Function indexIsVectorField(pIndexName As String) As Boolean
Try
Dim selectedIndexName As String = WD_INDEXComboBox.Text
Dim selectedIndexName As String = pIndexName
If selectedIndexName = String.Empty Then
Return False
@ -1454,4 +1455,20 @@ Public Class frmAdministration
Private Sub frmAdministration_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Check_HasChanges(BEZEICHNUNGTextBox.Text)
End Sub
Private Sub INDEXNAME_AutoIndexCMB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles INDEXNAME_AutoIndexCMB.SelectedIndexChanged
SetAutomIndexVectorCheckboxEnabled()
End Sub
Private Function SetAutomIndexVectorCheckboxEnabled()
_indexIsVectorField = indexIsVectorField(INDEXNAME_AutoIndexCMB.Text)
If _indexIsVectorField Then
chkOverwrite.Enabled = True
chkPreventMultipleValues.Enabled = True
Else
chkOverwrite.Enabled = False
chkPreventMultipleValues.Enabled = False
End If
End Function
End Class

40
Global_Indexer/frmIndex.vb
View File

@ -830,31 +830,47 @@ Public Class frmIndex
If DTAut.Rows.Count > 0 Then
Dim Count As Integer = 0
For Each row As DataRow In DTAut.Rows
Dim indexiert = CBool(row.Item("Indexiert"))
Dim Indexvalue = row.Item("Indexwert").ToString
Dim indexname = row.Item("INDEXNAME").ToString
If indexiert = True And Indexvalue <> "" Then
If Indexvalue <> "EMPTY_OI" Then
_Logger.Info("Auto Indexname: " & indexname.ToString)
_Logger.Info("Indexvalue: " & Indexvalue.ToString)
Dim oIsIndexed = CBool(row.Item("Indexiert"))
Dim oIndexValue = row.Item("Indexwert").ToString
Dim oIndexName = row.Item("INDEXNAME").ToString
Dim oOverwrite As Boolean = row.ItemEx("VKT_OVERWRITE", False)
Dim oPreventMultipleValues As Boolean = row.ItemEx("VKT_PREVENT_MULTIPLE_VALUES", False)
If oIsIndexed = True And oIndexValue <> "" Then
If oIndexValue <> "EMPTY_OI" Then
_Logger.Info("Auto Indexname: " & oIndexName.ToString)
_Logger.Info("Indexvalue: " & oIndexValue.ToString)
Count += 1
' den Typ des Zielindexes auslesen
Dim indexType As Integer = WINDREAM.GetIndexType(indexname)
Dim indexType As Integer = WINDREAM.GetIndexType(oIndexName)
If indexType < WINDREAM.WMObjectVariableValueTypeVector Then
indexierung_erfolgreich = WINDREAM.SetFileIndex(CURRENT_NEWFILENAME, indexname, Indexvalue, CURR_DOKART_OBJECTTYPE)
indexierung_erfolgreich = WINDREAM.SetFileIndex(CURRENT_NEWFILENAME, oIndexName, oIndexValue, CURR_DOKART_OBJECTTYPE)
Else
Dim oSplitArray = Split(Indexvalue, ClassConstants.VECTORSEPARATOR)
Dim oExistingItems = WINDREAM.GetIndexValue(CURRENT_NEWFILENAME, oIndexName)
Dim oSplitArray = Split(oIndexValue, ClassConstants.VECTORSEPARATOR)
Dim oListofString As New List(Of String)
If oSplitArray.Count = 0 Then
oListofString.Add(Indexvalue)
oListofString.Add(oIndexValue)
Else
For Each oStr In oSplitArray
oListofString.Add(oStr)
Next
End If
indexierung_erfolgreich = WINDREAM.SetFileIndex(CURRENT_NEWFILENAME, indexname, oListofString, CURR_DOKART_OBJECTTYPE)
If oOverwrite = False Then
oListofString = oExistingItems.Concat(oListofString)
End If
If oPreventMultipleValues = True Then
oListofString = oListofString.Distinct()
End If
indexierung_erfolgreich = WINDREAM.SetFileIndex(CURRENT_NEWFILENAME, oIndexName, oListofString, CURR_DOKART_OBJECTTYPE)
End If
'indexierung_erfolgreich = WINDREAM.SetFileIndex(CURRENT_NEWFILENAME, indexname, Indexvalue, CURR_DOKART_OBJECTTYPE)