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 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.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New() Public Sub New()
@ -4745,6 +4749,22 @@ Partial Public Class MyDataset
End Get End Get
End Property 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.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _ Global.System.ComponentModel.Browsable(false)> _
@ -4801,9 +4821,11 @@ Partial Public Class MyDataset
ByVal Indexwert As String, _ ByVal Indexwert As String, _
ByVal VALUE As String, _ ByVal VALUE As String, _
ByVal SQL_ACTIVE As Boolean, _ 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 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 rowVWDDINDEX_AUTOMRow.ItemArray = columnValuesArray
Me.Rows.Add(rowVWDDINDEX_AUTOMRow) Me.Rows.Add(rowVWDDINDEX_AUTOMRow)
Return rowVWDDINDEX_AUTOMRow Return rowVWDDINDEX_AUTOMRow
@ -4851,6 +4873,8 @@ Partial Public Class MyDataset
Me.columnVALUE = MyBase.Columns("VALUE") Me.columnVALUE = MyBase.Columns("VALUE")
Me.columnSQL_ACTIVE = MyBase.Columns("SQL_ACTIVE") Me.columnSQL_ACTIVE = MyBase.Columns("SQL_ACTIVE")
Me.columnSEQUENCE = MyBase.Columns("SEQUENCE") 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 End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -4894,6 +4918,10 @@ Partial Public Class MyDataset
MyBase.Columns.Add(Me.columnSQL_ACTIVE) MyBase.Columns.Add(Me.columnSQL_ACTIVE)
Me.columnSEQUENCE = New Global.System.Data.DataColumn("SEQUENCE", GetType(Byte), Nothing, Global.System.Data.MappingType.Element) Me.columnSEQUENCE = New Global.System.Data.DataColumn("SEQUENCE", GetType(Byte), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSEQUENCE) 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.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AllowDBNull = false Me.columnGUID.AllowDBNull = false
Me.columnGUID.Unique = true Me.columnGUID.Unique = true
@ -4919,6 +4947,8 @@ Partial Public Class MyDataset
Me.columnVALUE.MaxLength = 2000 Me.columnVALUE.MaxLength = 2000
Me.columnSQL_ACTIVE.AllowDBNull = false Me.columnSQL_ACTIVE.AllowDBNull = false
Me.columnSEQUENCE.AllowDBNull = false Me.columnSEQUENCE.AllowDBNull = false
Me.columnVKT_OVERWRITE.AllowDBNull = false
Me.columnVKT_PREVENT_MULTIPLE_VALUES.AllowDBNull = false
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -12026,6 +12056,28 @@ Partial Public Class MyDataset
End Set End Set
End Property 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.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsCOMMENTNull() As Boolean Public Function IsCOMMENTNull() As Boolean
@ -18055,6 +18107,8 @@ Namespace MyDatasetTableAdapters
tableMapping.ColumnMappings.Add("VALUE", "VALUE") tableMapping.ColumnMappings.Add("VALUE", "VALUE")
tableMapping.ColumnMappings.Add("SQL_ACTIVE", "SQL_ACTIVE") tableMapping.ColumnMappings.Add("SQL_ACTIVE", "SQL_ACTIVE")
tableMapping.ColumnMappings.Add("SEQUENCE", "SEQUENCE") 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) Me._adapter.TableMappings.Add(tableMapping)
End Sub End Sub
@ -18073,8 +18127,9 @@ Namespace MyDatasetTableAdapters
Me._commandCollection(0).Connection = Me.Connection Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, INDEXNAME, COMMENT, DOCTYPE_ID, DOKUMENTART, KURZNAME, CONNEC"& _ Me._commandCollection(0).CommandText = "SELECT GUID, INDEXNAME, COMMENT, DOCTYPE_ID, DOKUMENTART, KURZNAME, CONNEC"& _
"TION_ID, CONNECTION, SQL_PROVIDER, SERVER, DATENBANK, USERNAME, PASSWORD, SQL_RE"& _ "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"& _ "SULT, VALUE, SQL_ACTIVE, SEQUENCE,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" VKT_OVERWRITE, VKT"& _
"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" "_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).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, "", "", "")) 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 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 Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated. the code is regenerated.
</autogenerated>--> </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> <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_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="14" X="119" Y="308" Height="381" Width="278" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="275" /> <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="17" X="431" Y="313" Height="210" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <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_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_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: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_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="25" X="1361" Y="319" Height="305" Width="272" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <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="1" X="668" Y="605" 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="22" X="1071" Y="621" Height="229" Width="279" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" /> <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="4" X="117" Y="665" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" /> <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="7" X="719" Y="25" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <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="6" X="135" Y="27" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <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="8" X="1040" Y="71" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <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="13" X="845" Y="494" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" /> <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="3" X="1474" Y="-2" Height="336" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" /> <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="5" X="120" Y="153" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <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="10" X="1027" Y="881" Height="210" Width="276" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <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="23" X="915" Y="82" Height="106" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" /> <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="19" X="639" Y="943" Height="67" Width="208" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" /> <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="15" X="1363" Y="639" Height="143" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" /> <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> </Shapes>
<Connectors> <Connectors>
<Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="30" LineWidth="11"> <Connector ID="DesignRelation:FK_TBDD_DOKUMENTART_EINGID" ZOrder="30" LineWidth="11">
@ -54,7 +54,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>397</X> <X>397</X>
@ -66,7 +66,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>597</X> <X>597</X>
@ -82,7 +82,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>293</X> <X>293</X>
@ -94,7 +94,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>978</X> <X>978</X>
@ -106,7 +106,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>397</X> <X>397</X>
@ -118,7 +118,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </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> <RoutePoints>
<Point> <Point>
<X>380</X> <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) EnableControls(XtraTabPageAutoIndex)
End If End If
CheckIndexAutoWD() CheckIndexAutoWD()
SetAutomIndexVectorCheckboxEnabled()
Catch ex As System.Exception Catch ex As System.Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Load Indexe Auto: ") MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Load Indexe Auto: ")
End Try End Try
@ -899,7 +900,7 @@ Public Class frmAdministration
Private _indexIsVectorField As Boolean = False Private _indexIsVectorField As Boolean = False
Private Sub WD_INDEXComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles WD_INDEXComboBox.SelectedIndexChanged 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 MULTISELECTCheckBox.Enabled = _indexIsVectorField
@ -917,9 +918,9 @@ Public Class frmAdministration
End If End If
End Sub End Sub
Private Function indexIsVectorField() As Boolean Private Function indexIsVectorField(pIndexName As String) As Boolean
Try Try
Dim selectedIndexName As String = WD_INDEXComboBox.Text Dim selectedIndexName As String = pIndexName
If selectedIndexName = String.Empty Then If selectedIndexName = String.Empty Then
Return False Return False
@ -1454,4 +1455,20 @@ Public Class frmAdministration
Private Sub frmAdministration_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Private Sub frmAdministration_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Check_HasChanges(BEZEICHNUNGTextBox.Text) Check_HasChanges(BEZEICHNUNGTextBox.Text)
End Sub 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 End Class

40
Global_Indexer/frmIndex.vb
View File

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