LookUpControl Width wider
This commit is contained in:
Developer01
parent
e8877ffc99
commit
21777d216b
@ -7,35 +7,104 @@ Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\Setu
|
|||||||
EndProject
|
EndProject
|
||||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
|
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
|
||||||
EndProject
|
EndProject
|
||||||
|
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Windream", "..\..\..\2_DLL Projekte\DDModules\Windream\Windream.vbproj", "{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}"
|
||||||
|
EndProject
|
||||||
|
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "LookupControl", "..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\LookupControl.vbproj", "{3DCD6D1A-C830-4241-B7E4-27430E7EA483}"
|
||||||
|
EndProject
|
||||||
Global
|
Global
|
||||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||||
|
CD_ROM|Any CPU = CD_ROM|Any CPU
|
||||||
CD_ROM|x86 = CD_ROM|x86
|
CD_ROM|x86 = CD_ROM|x86
|
||||||
|
Debug|Any CPU = Debug|Any CPU
|
||||||
Debug|x86 = Debug|x86
|
Debug|x86 = Debug|x86
|
||||||
|
DVD-5|Any CPU = DVD-5|Any CPU
|
||||||
DVD-5|x86 = DVD-5|x86
|
DVD-5|x86 = DVD-5|x86
|
||||||
|
Release|Any CPU = Release|Any CPU
|
||||||
Release|x86 = Release|x86
|
Release|x86 = Release|x86
|
||||||
|
SingleImage|Any CPU = SingleImage|Any CPU
|
||||||
SingleImage|x86 = SingleImage|x86
|
SingleImage|x86 = SingleImage|x86
|
||||||
EndGlobalSection
|
EndGlobalSection
|
||||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|Any CPU.Build.0 = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.ActiveCfg = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.ActiveCfg = Release|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.Build.0 = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.CD_ROM|x86.Build.0 = Release|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|Any CPU.Build.0 = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.ActiveCfg = Debug|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.ActiveCfg = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.Build.0 = Debug|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Debug|x86.Build.0 = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|Any CPU.Build.0 = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.ActiveCfg = Debug|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.ActiveCfg = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.Build.0 = Debug|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.DVD-5|x86.Build.0 = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.ActiveCfg = Release|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|Any CPU.Build.0 = Release|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.ActiveCfg = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.ActiveCfg = Release|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.Build.0 = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.Release|x86.Build.0 = Release|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|Any CPU.Build.0 = Debug|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.ActiveCfg = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.ActiveCfg = Release|x86
|
||||||
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.Build.0 = Release|x86
|
{11F40F86-5DF6-4279-BDF3-17AD8B93AE7C}.SingleImage|x86.Build.0 = Release|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.ActiveCfg = Release|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|Any CPU.Build.0 = Release|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.ActiveCfg = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.ActiveCfg = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.Build.0 = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.CD_ROM|x86.Build.0 = Debug|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|Any CPU.Build.0 = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.ActiveCfg = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.ActiveCfg = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.Build.0 = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Debug|x86.Build.0 = Debug|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.ActiveCfg = Debug|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|Any CPU.Build.0 = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.ActiveCfg = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.ActiveCfg = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.Build.0 = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.DVD-5|x86.Build.0 = Debug|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.ActiveCfg = Release|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|Any CPU.Build.0 = Release|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.ActiveCfg = Release|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.ActiveCfg = Release|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.Build.0 = Release|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.Release|x86.Build.0 = Release|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.ActiveCfg = Release|x86
|
||||||
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.Build.0 = Release|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86
|
||||||
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86
|
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.ActiveCfg = Release|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.Build.0 = Release|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.ActiveCfg = Release|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.Build.0 = Release|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.ActiveCfg = Debug|Any CPU
|
||||||
|
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.Build.0 = Debug|Any CPU
|
||||||
EndGlobalSection
|
EndGlobalSection
|
||||||
GlobalSection(SolutionProperties) = preSolution
|
GlobalSection(SolutionProperties) = preSolution
|
||||||
HideSolutionNode = FALSE
|
HideSolutionNode = FALSE
|
||||||
|
|||||||
@ -1,4 +1,5 @@
|
|||||||
Imports DigitalData.Modules.EDMI.API.Constants
|
Imports DevExpress.DataAccess.Native.Json
|
||||||
|
Imports DigitalData.Modules.EDMI.API.Constants
|
||||||
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
|
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
|
||||||
|
|
||||||
Public Class ClassFinalizeDoc
|
Public Class ClassFinalizeDoc
|
||||||
@ -18,10 +19,11 @@ Public Class ClassFinalizeDoc
|
|||||||
'Jetzt finale Indexe setzen
|
'Jetzt finale Indexe setzen
|
||||||
LOGGER.Debug("working final indices for doc: " & WMObject.aName)
|
LOGGER.Debug("working final indices for doc: " & WMObject.aName)
|
||||||
For Each dr As DataRow In CURRENT_DT_FINAL_INDEXING.Rows
|
For Each dr As DataRow In CURRENT_DT_FINAL_INDEXING.Rows
|
||||||
Dim value As String = dr.Item("VALUE").ToString
|
Dim ovalueString As String = dr.Item("VALUE").ToString
|
||||||
Dim INDEXNAME = dr.Item("INDEXNAME").ToString
|
Dim INDEXNAME = dr.Item("INDEXNAME").ToString
|
||||||
Dim oContinueOnIndifferentState As Boolean = CBool(dr.Item("CONTINUE_INDETERMINED"))
|
Dim oContinueOnIndifferentState As Boolean = CBool(dr.Item("CONTINUE_INDETERMINED"))
|
||||||
If value.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
|
Dim VektorBeahaviour = dr.Item("IF_VEKTOR_BEHAVIOUR").ToString
|
||||||
|
If ovalueString.ToUpper = "SQL-Command".ToUpper Then '###### Indexierung mit variablen SQL ###
|
||||||
LOGGER.Debug("indexing with dynamic sql...")
|
LOGGER.Debug("indexing with dynamic sql...")
|
||||||
'Dim SQL_COMMAND = dr.Item("SQL_COMMAND")
|
'Dim SQL_COMMAND = dr.Item("SQL_COMMAND")
|
||||||
'' Regulären Ausdruck zum Auslesen der Indexe definieren
|
'' Regulären Ausdruck zum Auslesen der Indexe definieren
|
||||||
@ -52,32 +54,32 @@ Public Class ClassFinalizeDoc
|
|||||||
LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement)
|
LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement)
|
||||||
Dim oDynamic_value = DatabaseFallback.GetScalarValueECM(sql_Statement) ', CONNECTION_STRING_ECM, "Write_Final_Metadata/dynamic_value")
|
Dim oDynamic_value = DatabaseFallback.GetScalarValueECM(sql_Statement) ', CONNECTION_STRING_ECM, "Write_Final_Metadata/dynamic_value")
|
||||||
If Not IsNothing(oDynamic_value) Then
|
If Not IsNothing(oDynamic_value) Then
|
||||||
value = oDynamic_value
|
ovalueString = oDynamic_value
|
||||||
Else
|
Else
|
||||||
Continue For
|
Continue For
|
||||||
End If
|
End If
|
||||||
Else
|
Else
|
||||||
If value.StartsWith("v") Then
|
If ovalueString.StartsWith("v") Then
|
||||||
Select Case dr.Item("VALUE").ToString
|
Select Case dr.Item("VALUE").ToString
|
||||||
Case "vDate"
|
Case "vDate"
|
||||||
value = Now.ToShortDateString
|
ovalueString = Now.ToShortDateString
|
||||||
Case "vUserName"
|
Case "vUserName"
|
||||||
value = USER_USERNAME
|
ovalueString = USER_USERNAME
|
||||||
Case Else
|
Case Else
|
||||||
value = dr.Item("VALUE")
|
ovalueString = dr.Item("VALUE")
|
||||||
End Select
|
End Select
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Dim result() As String
|
Dim result() As String
|
||||||
ReDim Preserve result(0)
|
ReDim Preserve result(0)
|
||||||
result(0) = value
|
result(0) = ovalueString
|
||||||
|
|
||||||
Dim oIndexType = WINDREAM.GetTypeOfIndex(INDEXNAME)
|
Dim oIndexType = WINDREAM.GetTypeOfIndex(INDEXNAME)
|
||||||
LOGGER.Debug($"oIndexType {oIndexType.ToString}")
|
LOGGER.Debug($"oIndexType {oIndexType.ToString}")
|
||||||
If oIndexType > 4000 And oIndexType < 5000 Then
|
If oIndexType > 4000 And oIndexType < 5000 Then
|
||||||
'Hier muss nun separat als Vektorfeld indexiert werden
|
'Hier muss nun separat als Vektorfeld indexiert werden
|
||||||
If Indexiere_VektorfeldPM(value, INDEXNAME, WMObject) = True Then
|
If Indexiere_VektorfeldPM(ovalueString, INDEXNAME, WMObject) = True Then
|
||||||
LOGGER.Debug("FINALER INDEX '" & INDEXNAME.Replace("[%VKT", "") & "' WURDE ERFOLGREICH GESETZT")
|
LOGGER.Debug("FINALER INDEX '" & INDEXNAME.Replace("[%VKT", "") & "' WURDE ERFOLGREICH GESETZT")
|
||||||
Else
|
Else
|
||||||
|
|
||||||
@ -87,12 +89,13 @@ Public Class ClassFinalizeDoc
|
|||||||
End If
|
End If
|
||||||
Else
|
Else
|
||||||
LOGGER.Debug("now indexing..")
|
LOGGER.Debug("now indexing..")
|
||||||
If Indexiere_File(INDEXNAME, result, WMObject) = True Then
|
|
||||||
|
If WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, INDEXNAME, ovalueString, CURRENT_WMObjecttype) = True Then 'Indexiere_File(INDEXNAME, result, WMObject) = True Then
|
||||||
LOGGER.Debug("FINALER INDEX '" & INDEXNAME & "' WURDE ERFOLGREICH GESETZT")
|
LOGGER.Debug("FINALER INDEX '" & INDEXNAME & "' WURDE ERFOLGREICH GESETZT")
|
||||||
LOGGER.Debug("")
|
LOGGER.Debug("")
|
||||||
'Nun das Logging
|
'Nun das Logging
|
||||||
If CURRENT_PROFILE_LOG_INDEX <> "" Then
|
If CURRENT_PROFILE_LOG_INDEX <> "" Then
|
||||||
Dim logstr = Return_LOGString(value, "DDFINALINDEX", INDEXNAME)
|
Dim logstr = Return_LOGString(ovalueString, "DDFINALINDEX", INDEXNAME)
|
||||||
Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_LOG_INDEX, WMObject)
|
Indexiere_VektorfeldPM(logstr, CURRENT_PROFILE_LOG_INDEX, WMObject)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
@ -120,39 +123,73 @@ Public Class ClassFinalizeDoc
|
|||||||
End Try
|
End Try
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
Private Shared Function Indexiere_File(idxxname As String, idxvalue As Object, WMObject As WINDREAMLib.WMObject)
|
Private Shared Function Indexiere_File(pIndexName As String, pIndexValues As Object, WMObject As WINDREAMLib.WMObject) As Boolean
|
||||||
Dim File_indexiert As Boolean = False
|
LOGGER.Debug("### Indexiere_File Begin ###")
|
||||||
|
Dim indexierung_erfolgreich As Boolean = False
|
||||||
|
Try
|
||||||
|
Dim oIndexType As Integer = WINDREAM_MOD.GetIndexType(pIndexName)
|
||||||
|
If oIndexType > 4095 Then
|
||||||
|
LOGGER.Debug("Es Handelt sich um einen VektorIndex...")
|
||||||
|
Dim oExistingItems = WINDREAM_MOD.GetIndexValue(CURRENT_DOC_PATH, pIndexName)
|
||||||
|
|
||||||
|
Dim oListofString As New List(Of String)
|
||||||
|
If pIndexValues.Length = 0 Then
|
||||||
|
LOGGER.Debug("oSplitArray.Length = 0")
|
||||||
|
oListofString.Add(pIndexValues(0))
|
||||||
|
Else
|
||||||
|
LOGGER.Debug($"pIndexValues.Length is > 0 [{pIndexValues.length}] ...")
|
||||||
|
For Each oStr In pIndexValues
|
||||||
|
LOGGER.Debug("pIndexValues - oString : {0}", oStr)
|
||||||
|
oListofString.Add(oStr)
|
||||||
|
Next
|
||||||
|
End If
|
||||||
|
|
||||||
|
If oExistingItems.Count > 0 Then
|
||||||
|
LOGGER.Debug("oOverwrite = False and WMObject already contains [{0}] values in attribute,Values will be concatted", oExistingItems.Count)
|
||||||
|
oListofString = oExistingItems.Concat(oListofString).ToList()
|
||||||
|
End If
|
||||||
|
oListofString = oListofString.Distinct().ToList()
|
||||||
|
indexierung_erfolgreich = WINDREAM_MOD.SetFileIndexLoS(CURRENT_DOC_PATH, pIndexName, oListofString, CURRENT_WMObjecttype)
|
||||||
|
Else
|
||||||
|
Dim oStringValue As String = pIndexValues(0).ToString
|
||||||
|
indexierung_erfolgreich = WINDREAM_MOD.SetFileIndex(CURRENT_DOC_PATH, pIndexName, oStringValue, CURRENT_WMObjecttype)
|
||||||
|
End If
|
||||||
|
Return indexierung_erfolgreich
|
||||||
|
Catch ex As Exception
|
||||||
|
LOGGER.Warn("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString)
|
||||||
|
Return False
|
||||||
|
End Try
|
||||||
|
|
||||||
' Try
|
' Try
|
||||||
'Die Arrays vorbereiten
|
''Die Arrays vorbereiten
|
||||||
Dim arrIndex() As String = Nothing
|
'Dim arrIndex() As String = Nothing
|
||||||
Dim arrValue() As String = Nothing
|
'Dim arrValue() As String = Nothing
|
||||||
arrIndex = Nothing
|
'arrIndex = Nothing
|
||||||
arrValue = Nothing
|
'arrValue = Nothing
|
||||||
'Den Indexnamen übergeben
|
''Den Indexnamen übergeben
|
||||||
ReDim Preserve arrIndex(0)
|
'ReDim Preserve arrIndex(0)
|
||||||
arrIndex(0) = idxxname
|
'arrIndex(0) = idxxname
|
||||||
'Das Array der Idnexwerte überprüfen
|
''Das Array der Idnexwerte überprüfen
|
||||||
If idxvalue Is Nothing = False Then
|
'If idxvalue Is Nothing = False Then
|
||||||
If idxvalue.Length() > 1 Then
|
' If idxvalue.Length() > 1 Then
|
||||||
LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
|
' LOGGER.Debug("Indexing Index '" & idxxname & "' with Arrayvalue")
|
||||||
Dim anzahl As Integer = 0
|
' Dim anzahl As Integer = 0
|
||||||
For Each indexvalue As String In idxvalue
|
' For Each indexvalue As String In idxvalue
|
||||||
ReDim Preserve arrValue(anzahl)
|
' ReDim Preserve arrValue(anzahl)
|
||||||
arrValue(anzahl) = indexvalue
|
' arrValue(anzahl) = indexvalue
|
||||||
anzahl += 1
|
' anzahl += 1
|
||||||
Next
|
' Next
|
||||||
Else
|
' Else
|
||||||
LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
|
' LOGGER.Debug("Indexing Index '" & idxxname & "' with value '" & idxvalue(0) & "'")
|
||||||
ReDim Preserve arrValue(0)
|
' ReDim Preserve arrValue(0)
|
||||||
arrValue(0) = idxvalue(0).ToString
|
' arrValue(0) = idxvalue(0).ToString
|
||||||
End If
|
' End If
|
||||||
'Dim _windreamPM As New ClassPMWindream
|
' 'Dim _windreamPM As New ClassPMWindream
|
||||||
'Jetzt das eigentliche Indexieren der Datei
|
' 'Jetzt das eigentliche Indexieren der Datei
|
||||||
File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
|
'File_indexiert = WINDREAM.RunIndexing(WMObject, arrIndex, arrValue)
|
||||||
|
|
||||||
Return File_indexiert
|
'Return File_indexiert
|
||||||
End If
|
' End If
|
||||||
|
|
||||||
'Catch ex As Exception
|
'Catch ex As Exception
|
||||||
' LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)
|
' LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True)
|
||||||
|
|||||||
@ -159,13 +159,19 @@ Public Class ClassPMWindream
|
|||||||
Case WMObjectVariableValueTypeInteger
|
Case WMObjectVariableValueTypeInteger
|
||||||
LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
|
LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
|
||||||
If IsNumeric(value) = False Then
|
If IsNumeric(value) = False Then
|
||||||
frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
|
If value = "String.Empty" Then
|
||||||
LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
|
convertValue = vbEmpty
|
||||||
oDocument.Save()
|
Else
|
||||||
oDocument.unlock()
|
frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
|
||||||
Return False
|
LOGGER.Debug("Achtung: Value " & value & " kann nicht in Zahl konvertiert werden!")
|
||||||
|
oDocument.Save()
|
||||||
|
oDocument.unlock()
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
Else
|
||||||
|
convertValue = CInt(value)
|
||||||
End If
|
End If
|
||||||
convertValue = CInt(value)
|
|
||||||
_int = True
|
_int = True
|
||||||
Case WMObjectVariableValueTypeInteger64bit
|
Case WMObjectVariableValueTypeInteger64bit
|
||||||
LOGGER.Debug("Typ des windream-Indexes: Integer64bit")
|
LOGGER.Debug("Typ des windream-Indexes: Integer64bit")
|
||||||
@ -289,7 +295,10 @@ Public Class ClassPMWindream
|
|||||||
'ReDim ArrName(0)
|
'ReDim ArrName(0)
|
||||||
'ArrName(0) = "Tournr"
|
'ArrName(0) = "Tournr"
|
||||||
'oDocument.SetValues(ArrName, ArrValues)
|
'oDocument.SetValues(ArrName, ArrValues)
|
||||||
If _int = True Then
|
If convertValue = "String.Empty" Or convertValue = vbEmpty Then
|
||||||
|
LOGGER.Debug("Now Indexing simpleAttribute with vbEmpty ...")
|
||||||
|
oDocument.SetVariableValue(aName, String.Empty)
|
||||||
|
ElseIf _int = True Then
|
||||||
oDocument.SetVariableValue(aName, CInt(convertValue))
|
oDocument.SetVariableValue(aName, CInt(convertValue))
|
||||||
ElseIf _date = True Then
|
ElseIf _date = True Then
|
||||||
oDocument.SetVariableValue(aName, CDate(convertValue))
|
oDocument.SetVariableValue(aName, CDate(convertValue))
|
||||||
@ -414,7 +423,13 @@ Public Class ClassPMWindream
|
|||||||
LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
|
LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
|
||||||
|
|
||||||
'Jetzt die Nachindexierung für Vektor-Felder
|
'Jetzt die Nachindexierung für Vektor-Felder
|
||||||
oDocument.SetVariableValue(aName, myArray)
|
If myArray(0) = "String.Empty" Then
|
||||||
|
LOGGER.Debug("Now Indexing vektor-attribute with vbEmpty ...")
|
||||||
|
oDocument.SetVariableValue(aName, vbEmpty)
|
||||||
|
Else
|
||||||
|
oDocument.SetVariableValue(aName, myArray)
|
||||||
|
End If
|
||||||
|
|
||||||
LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
|
LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|||||||
@ -203,7 +203,8 @@
|
|||||||
<Reference Include="DigitalData.Modules.Windows, Version=1.5.1.0, Culture=neutral, processorArchitecture=MSIL">
|
<Reference Include="DigitalData.Modules.Windows, Version=1.5.1.0, Culture=neutral, processorArchitecture=MSIL">
|
||||||
<HintPath>..\packages\DigitalData.Modules.Windows.1.5.1\lib\net462\DigitalData.Modules.Windows.dll</HintPath>
|
<HintPath>..\packages\DigitalData.Modules.Windows.1.5.1\lib\net462\DigitalData.Modules.Windows.dll</HintPath>
|
||||||
</Reference>
|
</Reference>
|
||||||
<Reference Include="DigitalData.Modules.Windream">
|
<Reference Include="DigitalData.Modules.Windream, Version=1.9.6.2, Culture=neutral, processorArchitecture=MSIL">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
|
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
|
||||||
</Reference>
|
</Reference>
|
||||||
<Reference Include="DigitalData.Modules.ZooFlow">
|
<Reference Include="DigitalData.Modules.ZooFlow">
|
||||||
|
|||||||
@ -777,7 +777,7 @@ Public Class frmAdministration
|
|||||||
obj.ContinueOnIndifferentState = oValue
|
obj.ContinueOnIndifferentState = oValue
|
||||||
ElseIf oName = "VectorBehaviour" Then
|
ElseIf oName = "VectorBehaviour" Then
|
||||||
If oValue = "Delete" Then
|
If oValue = "Delete" Then
|
||||||
obj.StringValue = ""
|
obj.StringValue = "DeleteWMAttributeValue"
|
||||||
ElseIf oValue = "Add" And obj.StringValue = "" Then
|
ElseIf oValue = "Add" And obj.StringValue = "" Then
|
||||||
obj.StringValue = "Your value to set"
|
obj.StringValue = "Your value to set"
|
||||||
End If
|
End If
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
Loading…
x
Reference in New Issue
Block a user