Compare commits
3 Commits
Release-2.
...
bd72e9cecc
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
bd72e9cecc | ||
|
|
46a9742d5d | ||
|
|
a3fb1cbafc |
@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
|
|||||||
' übernehmen, indem Sie "*" eingeben:
|
' übernehmen, indem Sie "*" eingeben:
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("2.9.0.0")>
|
<Assembly: AssemblyVersion("2.9.2.0")>
|
||||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||||
<Assembly: NeutralResourcesLanguage("")>
|
<Assembly: NeutralResourcesLanguage("")>
|
||||||
|
|||||||
@@ -1018,6 +1018,8 @@ Public Class frmValidator
|
|||||||
MyValidationLogger.Debug($"Current_Document: Id={Current_Document?.Id}, Path={Current_Document?.FullPath}")
|
MyValidationLogger.Debug($"Current_Document: Id={Current_Document?.Id}, Path={Current_Document?.FullPath}")
|
||||||
MyValidationLogger.Debug("========================================")
|
MyValidationLogger.Debug("========================================")
|
||||||
|
|
||||||
|
DT_AdditionalSearches_Resultset_Docs = Nothing
|
||||||
|
|
||||||
Dim allSQLSearches As DataTable = DT_FILTERED_PROFILE_SEARCHES_DATA
|
Dim allSQLSearches As DataTable = DT_FILTERED_PROFILE_SEARCHES_DATA
|
||||||
Dim allDocSearches As DataTable = DT_FILTERED_PROFILE_SEARCHES_DOC
|
Dim allDocSearches As DataTable = DT_FILTERED_PROFILE_SEARCHES_DOC
|
||||||
|
|
||||||
@@ -1048,6 +1050,7 @@ Public Class frmValidator
|
|||||||
MyValidationLogger.Debug("--- Ergebnisse werden geprüft (DATA/DOC) ---")
|
MyValidationLogger.Debug("--- Ergebnisse werden geprüft (DATA/DOC) ---")
|
||||||
Dim validSQLSearches As DataTable = allSQLSearches.Clone()
|
Dim validSQLSearches As DataTable = allSQLSearches.Clone()
|
||||||
Dim validDocSearches As DataTable = allDocSearches.Clone()
|
Dim validDocSearches As DataTable = allDocSearches.Clone()
|
||||||
|
Dim aggregatedDocResults As DataTable = Nothing
|
||||||
|
|
||||||
If hasDATASearches Then
|
If hasDATASearches Then
|
||||||
For i As Integer = 0 To allSQLSearches.Rows.Count - 1
|
For i As Integer = 0 To allSQLSearches.Rows.Count - 1
|
||||||
@@ -1091,6 +1094,12 @@ Public Class frmValidator
|
|||||||
If IsValidDocSearchResult(testDT) Then
|
If IsValidDocSearchResult(testDT) Then
|
||||||
validDocSearches.ImportRow(searchRow)
|
validDocSearches.ImportRow(searchRow)
|
||||||
MyValidationLogger.Info($"✓ Doc-Search '{tabTitle}': {testDT.Rows.Count} Dokumente gefunden")
|
MyValidationLogger.Info($"✓ Doc-Search '{tabTitle}': {testDT.Rows.Count} Dokumente gefunden")
|
||||||
|
If aggregatedDocResults Is Nothing Then
|
||||||
|
aggregatedDocResults = testDT.Clone()
|
||||||
|
End If
|
||||||
|
For Each resultRow As DataRow In testDT.Rows
|
||||||
|
aggregatedDocResults.ImportRow(resultRow)
|
||||||
|
Next
|
||||||
Else
|
Else
|
||||||
MyValidationLogger.Warn($"⚠️ Doc-Search '{tabTitle}' liefert kein Dokument-Schema (DocID/FULL_FILENAME) und wird übersprungen.")
|
MyValidationLogger.Warn($"⚠️ Doc-Search '{tabTitle}' liefert kein Dokument-Schema (DocID/FULL_FILENAME) und wird übersprungen.")
|
||||||
End If
|
End If
|
||||||
@@ -1102,6 +1111,10 @@ Public Class frmValidator
|
|||||||
End Try
|
End Try
|
||||||
Next
|
Next
|
||||||
End If
|
End If
|
||||||
|
DT_AdditionalSearches_Resultset_Docs = aggregatedDocResults
|
||||||
|
If DT_AdditionalSearches_Resultset_Docs IsNot Nothing Then
|
||||||
|
MyValidationLogger.Debug($"Zusätzliche Doc-Results gecached: {DT_AdditionalSearches_Resultset_Docs.Rows.Count} Rows")
|
||||||
|
End If
|
||||||
|
|
||||||
AdditionalDataResultsExist = validSQLSearches.Rows.Count > 0
|
AdditionalDataResultsExist = validSQLSearches.Rows.Count > 0
|
||||||
AdditionalDocResultsExist = validDocSearches.Rows.Count > 0
|
AdditionalDocResultsExist = validDocSearches.Rows.Count > 0
|
||||||
@@ -1131,6 +1144,9 @@ Public Class frmValidator
|
|||||||
_frmValidatorSearch._DTDocSearches = preloadDoc
|
_frmValidatorSearch._DTDocSearches = preloadDoc
|
||||||
_frmValidatorSearch.TabPreload(preloadSQL.Rows.Count, preloadDoc.Rows.Count, preloadSQL, preloadDoc)
|
_frmValidatorSearch.TabPreload(preloadSQL.Rows.Count, preloadDoc.Rows.Count, preloadSQL, preloadDoc)
|
||||||
|
|
||||||
|
' Sichtbarkeit explizit setzen, bevor Return
|
||||||
|
rbnPgGroupAttmt.Visible = AdditionalDataResultsExist OrElse AdditionalDocResultsExist
|
||||||
|
|
||||||
' Vorgabe: Preload=True => Formular öffnen
|
' Vorgabe: Preload=True => Formular öffnen
|
||||||
If Not _frmValidatorSearch.Visible Then
|
If Not _frmValidatorSearch.Visible Then
|
||||||
_frmValidatorSearch.Show()
|
_frmValidatorSearch.Show()
|
||||||
@@ -5799,7 +5815,7 @@ Public Class frmValidator
|
|||||||
If Not IsNullOrEmpty(oRow.Item("CONNECTION_ID")) Then
|
If Not IsNullOrEmpty(oRow.Item("CONNECTION_ID")) Then
|
||||||
oCONNID = CInt(oRow.Item("CONNECTION_ID"))
|
oCONNID = CInt(oRow.Item("CONNECTION_ID"))
|
||||||
Else
|
Else
|
||||||
MyValidationLogger.Warn($"⚠️ CONN_ID is null or empty for CONTROL_ID {oDEPENDING_CTRL_ID} - defaulting to 1")
|
MyValidationLogger.Warn($"⚠️ CONNECTION_ID is null or empty for CONTROL_ID {oDEPENDING_CTRL_ID} - defaulting to 1") 'vormals CONN_ID
|
||||||
End If
|
End If
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
MyValidationLogger.Warn($"⚠️ FillIndexValues - Error in creating dropdown for Grid - CONTROL_ID {oDEPENDING_CTRL_ID}: " & ex.Message)
|
MyValidationLogger.Warn($"⚠️ FillIndexValues - Error in creating dropdown for Grid - CONTROL_ID {oDEPENDING_CTRL_ID}: " & ex.Message)
|
||||||
@@ -6348,10 +6364,10 @@ Public Class frmValidator
|
|||||||
Dim oGUID = oFinalIndexRow.Item("GUID")
|
Dim oGUID = oFinalIndexRow.Item("GUID")
|
||||||
Dim oSQLCommand = oFinalIndexRow.Item("SQL_COMMAND")
|
Dim oSQLCommand = oFinalIndexRow.Item("SQL_COMMAND")
|
||||||
Dim oConnectionID = 1
|
Dim oConnectionID = 1
|
||||||
If Not IsNullOrEmpty(oFinalIndexRow.Item("CONN_ID")) Then
|
If Not IsNullOrEmpty(oFinalIndexRow.Item("CONNECTION_ID")) Then
|
||||||
oConnectionID = CInt(oFinalIndexRow.Item("CONN_ID"))
|
oConnectionID = CInt(oFinalIndexRow.Item("CONNECTION_ID"))
|
||||||
Else
|
Else
|
||||||
MyValidationLogger.Warn($"⚠️ CONN_ID is null or empty for final indexing of index {oFinalIndex} - defaulting to 1")
|
MyValidationLogger.Warn($"⚠️ CONNECTION_ID is null or empty for final indexing of index {oFinalIndex} - defaulting to 1") 'vormals CONN_ID
|
||||||
End If
|
End If
|
||||||
oSQLCommand = clsPatterns.ReplaceAllValues(oSQLCommand, PanelValidatorControl, True)
|
oSQLCommand = clsPatterns.ReplaceAllValues(oSQLCommand, PanelValidatorControl, True)
|
||||||
If IsNothing(oSQLCommand) Then
|
If IsNothing(oSQLCommand) Then
|
||||||
@@ -8575,9 +8591,9 @@ Public Class frmValidator
|
|||||||
|
|
||||||
oFilenameOnly = Path.GetFileName(DocPathWindows)
|
oFilenameOnly = Path.GetFileName(DocPathWindows)
|
||||||
oExtension = Path.GetExtension(DocPathWindows)
|
oExtension = Path.GetExtension(DocPathWindows)
|
||||||
oSQLGetFilename = $"DECLARE @Filename Varchar(512) " & vbcrlf &
|
oSQLGetFilename = $"DECLARE @Filename Varchar(512) " & vbCrLf &
|
||||||
$"EXEC dbo.PRPM_GETFILENAME_EXPORT {CURRENT_DOC_ID}, 1, @Outputfilename = @Filename OUTPUT;" & vbcrlf &
|
$"EXEC dbo.PRPM_GETFILENAME_EXPORT {CURRENT_DOC_ID}, 1, @Outputfilename = @Filename OUTPUT;" & vbCrLf &
|
||||||
"SELECT @Filename"
|
"SELECT @Filename"
|
||||||
|
|
||||||
Dim oExportFilename = DatabaseFallback.GetScalarValueECM(oSQLGetFilename)
|
Dim oExportFilename = DatabaseFallback.GetScalarValueECM(oSQLGetFilename)
|
||||||
If Not IsNothing(oExportFilename) Then
|
If Not IsNothing(oExportFilename) Then
|
||||||
@@ -8618,23 +8634,49 @@ Public Class frmValidator
|
|||||||
MyValidationLogger.Info($"File {oFile2Export} exported successfully!")
|
MyValidationLogger.Info($"File {oFile2Export} exported successfully!")
|
||||||
oCount += 1
|
oCount += 1
|
||||||
Else
|
Else
|
||||||
MsgBox("Error encountered while extracting Export-Filename!" & vbcrlf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
MsgBox("Error encountered while extracting Export-Filename!" & vbCrLf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||||
End If
|
End If
|
||||||
|
Else
|
||||||
|
MyValidationLogger.Info($"#### ATTENTION: oExportFilename is Nothing - SQL: {oSQLGetFilename}")
|
||||||
|
MsgBox("Error encountered while extracting Export-Filename - Result is Nothing!" & vbCrLf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Dim oFileCount As Integer = 1
|
Dim oFileCount As Integer = 1
|
||||||
If Not IsNothing(DT_AdditionalSearches_Resultset_Docs) Then
|
If Not IsNothing(DT_AdditionalSearches_Resultset_Docs) Then
|
||||||
|
|
||||||
For Each oFileRecord As DataRow In DT_AdditionalSearches_Resultset_Docs.Rows
|
For Each oFileRecord As DataRow In DT_AdditionalSearches_Resultset_Docs.Rows
|
||||||
Dim oFromFilename = oFileRecord.Item("FULL_FILENAME")
|
Dim oFromFilename = oFileRecord.Item("FULL_FILENAME")?.ToString()
|
||||||
Dim oDocID = oFileRecord.Item("DocID")
|
Dim oDocID = oFileRecord.Item("DocID")
|
||||||
If File.Exists(oFromFilename) Then
|
|
||||||
|
' COPY_WMFILE_2TEMP: Pfad analog zu GetDocPathWindows() auflösen
|
||||||
|
Dim oResolvedFilename As String = oFromFilename
|
||||||
|
If COPY_WMFILE_2TEMP = True AndAlso Not String.IsNullOrWhiteSpace(oFromFilename) Then
|
||||||
|
Dim options As New DocumentPathHandler.DocumentPathOptions With {
|
||||||
|
.EnableMapping = True,
|
||||||
|
.WMSuffix = WMSUFFIX,
|
||||||
|
.SpecificDrive = If(Len(MAP_SHARE_DRIVE) = 1, MAP_SHARE_DRIVE, ""),
|
||||||
|
.DriveBlacklist = MAP_BLACKLIST,
|
||||||
|
.CopyToTemp = True,
|
||||||
|
.TempFolder = TEMP_DOCUMENT_FOLDER,
|
||||||
|
.UnmapAfterCopy = True
|
||||||
|
}
|
||||||
|
Dim result = _documentPathHandler.ProcessDocumentPath(oFromFilename, options)
|
||||||
|
If result.Success AndAlso Not String.IsNullOrWhiteSpace(result.FinalPath) AndAlso File.Exists(result.FinalPath) Then
|
||||||
|
MyValidationLogger.Info($"✓ Zusatzdokument via Temp aufgelöst: [{result.FinalPath}]")
|
||||||
|
oResolvedFilename = result.FinalPath
|
||||||
|
Else
|
||||||
|
MyValidationLogger.Warn($"⚠️ Temp-Auflösung fehlgeschlagen für [{oFromFilename}]: {result.ErrorMessage} - Fallback auf Originalpfad")
|
||||||
|
oResolvedFilename = oFromFilename
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
If File.Exists(oResolvedFilename) Then
|
||||||
|
MyValidationLogger.Debug($"Found additional document for export: [{oResolvedFilename}] (WM: [{oFromFilename}]) with DocID [{oDocID}]")
|
||||||
oFileCount += 1
|
oFileCount += 1
|
||||||
oSQLGetFilename = $"DECLARE @Filename Varchar(512) " & vbcrlf &
|
oSQLGetFilename = $"DECLARE @Filename Varchar(512) " & vbCrLf &
|
||||||
$"EXEC dbo.PRPM_GETFILENAME_EXPORT {oDocID}, {oFileCount}, @Outputfilename = @Filename OUTPUT;" & vbcrlf &
|
$"EXEC dbo.PRPM_GETFILENAME_EXPORT {oDocID}, {oFileCount}, @Outputfilename = @Filename OUTPUT;" & vbCrLf &
|
||||||
"SELECT @Filename"
|
"SELECT @Filename"
|
||||||
oExportFilename = DatabaseFallback.GetScalarValueECM(oSQLGetFilename)
|
oExportFilename = DatabaseFallback.GetScalarValueECM(oSQLGetFilename)
|
||||||
oExtension = Path.GetExtension(oFromFilename)
|
oExtension = Path.GetExtension(oResolvedFilename)
|
||||||
If Not IsNothing(oExportFilename) Then
|
If Not IsNothing(oExportFilename) Then
|
||||||
If IsDBNull(oExportFilename) Then
|
If IsDBNull(oExportFilename) Then
|
||||||
MyValidationLogger.Info($"#### ATTENTION: oExportFilename is DBNULL - SQL: {oSQLGetFilename}")
|
MyValidationLogger.Info($"#### ATTENTION: oExportFilename is DBNULL - SQL: {oSQLGetFilename}")
|
||||||
@@ -8642,18 +8684,25 @@ Public Class frmValidator
|
|||||||
End If
|
End If
|
||||||
If oExportFilename <> String.Empty Then
|
If oExportFilename <> String.Empty Then
|
||||||
oTargetPath = FolderBrowserDialog1.SelectedPath & "\" & oExportFilename & oExtension
|
oTargetPath = FolderBrowserDialog1.SelectedPath & "\" & oExportFilename & oExtension
|
||||||
File.Copy(oFromFilename, oTargetPath)
|
File.Copy(oResolvedFilename, oTargetPath)
|
||||||
|
MyValidationLogger.Info($"Additional file [{oResolvedFilename}] exported successfully to [{oTargetPath}]")
|
||||||
oCount += 1
|
oCount += 1
|
||||||
Else
|
Else
|
||||||
Dim omsg = $"Error encountered while extracting ATTACHMENT-Export-Filename DocID [{oDocID}]!"
|
Dim omsg = $"Error encountered while extracting ATTACHMENT-Export-Filename DocID [{oDocID}]!"
|
||||||
MyValidationLogger.Info($"#### ATTENTION: {omsg} SQL: {oSQLGetFilename}")
|
MyValidationLogger.Info($"#### ATTENTION: {omsg} SQL: {oSQLGetFilename}")
|
||||||
MsgBox(omsg & vbcrlf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
MsgBox(omsg & vbCrLf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||||
End If
|
End If
|
||||||
|
Else
|
||||||
|
Dim omsg = $"Error encountered while extracting ATTACHMENT-Export-Filename DocID [{oDocID}] - Result is Nothing!"
|
||||||
|
MyValidationLogger.Info($"#### ATTENTION: {omsg} SQL: {oSQLGetFilename}")
|
||||||
|
MsgBox(omsg & vbCrLf & "Please inform Admin-Team!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||||
End If
|
End If
|
||||||
'oFilenameOnly = Path.GetFileName(oFromFilename)
|
Else
|
||||||
|
MyValidationLogger.Warn($"⚠️ Additional file for export not found: [{oResolvedFilename}] (WM: [{oFromFilename}]) with DocID [{oDocID}]")
|
||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
|
Else
|
||||||
|
MyValidationLogger.Info("No additional documents to export (DT_AdditionalSearches_Resultset_Docs is Nothing)")
|
||||||
End If
|
End If
|
||||||
|
|
||||||
CONFIG.Config.LastExportPath = FolderBrowserDialog1.SelectedPath
|
CONFIG.Config.LastExportPath = FolderBrowserDialog1.SelectedPath
|
||||||
@@ -8662,7 +8711,7 @@ Public Class frmValidator
|
|||||||
|
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
MyValidationLogger.Error(ex)
|
MyValidationLogger.Error(ex)
|
||||||
MsgBox("Could not move file to target: " & vbcrlf & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
MsgBox("Could not move file to target: " & vbCrLf & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||||
End Try
|
End Try
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|||||||
@@ -0,0 +1,150 @@
|
|||||||
|
13:45:45.0872|frmValidator|INFO >> Load_Additional_Searches -> ✓ SQL-Search 'Inhalte ZUGFeRD-XML': 67 Ergebnisse gefunden
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceAllValues -> input BEFORE replacing: [Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = {#IDBA#ObjectID}]
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceIDBAttributes -> Starting ReplaceIDBAttributes with input: [Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = {#IDBA#ObjectID}] for document ID: 4511694
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceIDBAttributes -> IS_SQL = True - oReplaceValue = [{#IDBA#ObjectID}]
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceIDBAttributes -> oIDBValue = 4511694
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceIDBAttributes -> sql after ReplaceIDBAttributes: Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = {#IDBA#ObjectID}
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceControlValues -> Starting ReplaceControlValues with input: [Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = 4511694] for document ID: 4511694
|
||||||
|
13:45:45.0872|taskFLOW|DEBUG >> ReplaceAllValues -> input AFTER replacing: [Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = 4511694]
|
||||||
|
13:45:45.0872|DatabaseWithFallback|DEBUG >> GetDatatable -> ForceFallback is True, falling back to direct database access.
|
||||||
|
13:45:45.0872|DatabaseWithFallback|DEBUG >> GetDatatableFromDatabase -> Fetching data from database [ECM] with Connection Id [ECM]
|
||||||
|
13:45:45.0872|DatabaseWithFallback|DEBUG >> GetDatatableFromDatabase -> Retrieving Connection String from Connection Id [1]
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> Get_ConnectionStringforID -> Getting ConnectionString for ConnectionId [1]
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> GetConnection -> The Following Connection is open: Server=W2K19SRV398;Database=DD_ECM;User Id=EDMAdmin;Password=XXXXX;Application Name=DD_EDMIAppService;Workstation ID=W2K19SRV391;
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> MaybeGetTransaction -> Transaction Mode: [WithTransaction]
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> GetDatatableWithConnectionObject -> GetDatatableWithConnectionObject: Running Query [SELECT * FROM TBDD_CONNECTION WHERE GUID = 1] and Parameters []
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> GetConnection -> The Following Connection is open: Data Source=w2k19srv398;Initial Catalog=DD_ECM;User ID=EDMAdmin;Password=XXXXX
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> MaybeGetTransaction -> Transaction Mode: [WithTransaction]
|
||||||
|
13:45:45.0872|MSSQLServer|DEBUG >> GetDatatableWithConnectionObject -> GetDatatableWithConnectionObject: Running Query [Select T.DocID,T.FULL_FILENAME,T.Doctype from TBPM_CUST_ATTACHMENTS T WITH (NOLOCK) INNER JOIN idb.dbo.VWIDB_DOC_DATA T1 ON T.EmailMessageID = T1.EmailMessageID WHERE T1.IDB_OBJ_ID = 4511694] and Parameters []
|
||||||
|
13:45:45.5262|frmValidator|DEBUG >> Load_Additional_Searches -> ℹ️ Doc-Search 'Attachments': Keine Ergebnisse gefunden
|
||||||
|
13:45:45.5262|frmValidator|DEBUG >> Load_Additional_Searches -> Ergebnisprüfung abgeschlossen: AdditionalDataResultsExist=True, AdditionalDocResultsExist=False
|
||||||
|
13:45:45.5262|frmValidator|DEBUG >> Load_Additional_Searches -> rbnPgGroupAttmt.Visible gesetzt auf: True | Stack:
|
||||||
|
at taskFLOW.frmValidator.FillIndexValues(Boolean first, String SingleAttribute)
|
||||||
|
13:45:45.5262|frmValidator|DEBUG >> Load_Additional_Searches -> --- NORMAL-MODUS aktiviert (nur vorbereiten, NICHT Show) ---
|
||||||
|
13:45:45.5262|taskFLOW|DEBUG >> TabPreload -> === TabPreload START ===
|
||||||
|
13:45:45.5262|taskFLOW|DEBUG >> TabPreload -> Parameters: TabCountSQL=1, TabCountDoc=0, DTSQL.Rows=1, DTDOC.Rows=0
|
||||||
|
13:45:45.5262|taskFLOW|DEBUG >> TabPreload -> Ausführung auf UI-Thread
|
||||||
|
13:45:45.5262|taskFLOW|DEBUG >> TabPreload -> 🚫 Tab-Events deaktiviert
|
||||||
|
13:45:45.5262|taskFLOW|DEBUG >> TabPreload -> ✓ _DTDATASearches und _DTDocSearches zugewiesen: SQL=1, Doc=0
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> Panel1Collapsed (SQL)=False, Panel2Collapsed (Doc)=True
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> Konfiguriere SQL-Tabs: 1 Definitionen
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=1)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=2)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=3)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=4)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=-1)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> Alle 5 SQL-Tabs auf PageVisible=False gesetzt
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlSQL_SelectedPageChanged -> 🚫 XtraTabControlSQL_SelectedPageChanged unterdrückt (SelectedTabPageIndex=0)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> SQL-Tab 0: Text='Inhalte ZUGFeRD-XML', PageVisible=True
|
||||||
|
13:45:45.5322|taskFLOW|INFO >> TabPreload -> ✓ 1 SQL-Tabs konfiguriert
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> Keine Doc-Daten, alle Tabs ausblenden
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlDocs_SelectedPageChanged_1 -> 🚫 XtraTabControlDocs_SelectedPageChanged unterdrückt (SelectedTabPageIndex=1)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlDocs_SelectedPageChanged_1 -> 🚫 XtraTabControlDocs_SelectedPageChanged unterdrückt (SelectedTabPageIndex=2)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlDocs_SelectedPageChanged_1 -> 🚫 XtraTabControlDocs_SelectedPageChanged unterdrückt (SelectedTabPageIndex=3)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlDocs_SelectedPageChanged_1 -> 🚫 XtraTabControlDocs_SelectedPageChanged unterdrückt (SelectedTabPageIndex=4)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> XtraTabControlDocs_SelectedPageChanged_1 -> 🚫 XtraTabControlDocs_SelectedPageChanged unterdrückt (SelectedTabPageIndex=-1)
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> ✓ Tab-Events reaktiviert
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> Setze SQL SelectedTabPageIndex manuell auf 0
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceAllValues -> input BEFORE replacing: [SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = {#IDBA#ObjectID})
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME]
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceIDBAttributes -> Starting ReplaceIDBAttributes with input: [SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = {#IDBA#ObjectID})
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME] for document ID: 4511694
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceIDBAttributes -> IS_SQL = True - oReplaceValue = [{#IDBA#ObjectID}]
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceIDBAttributes -> oIDBValue = 4511694
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceIDBAttributes -> sql after ReplaceIDBAttributes: SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = {#IDBA#ObjectID})
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceControlValues -> Starting ReplaceControlValues with input: [SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = 4511694)
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME] for document ID: 4511694
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> ReplaceAllValues -> input AFTER replacing: [SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = 4511694)
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME]
|
||||||
|
13:45:45.5322|taskFLOW|DEBUG >> TabPreload -> SQL-Tab 0: erzwungener Initial-Refresh
|
||||||
|
13:45:45.5322|DatabaseWithFallback|DEBUG >> GetDatatable -> ForceFallback is True, falling back to direct database access.
|
||||||
|
13:45:45.5322|DatabaseWithFallback|DEBUG >> GetDatatableFromDatabase -> Fetching data from database [ECM] with Connection Id [ECM]
|
||||||
|
13:45:45.5322|DatabaseWithFallback|DEBUG >> GetDatatableFromDatabase -> Retrieving Connection String from Connection Id [1]
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> Get_ConnectionStringforID -> Getting ConnectionString for ConnectionId [1]
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> GetConnection -> The Following Connection is open: Server=W2K19SRV398;Database=DD_ECM;User Id=EDMAdmin;Password=XXXXX;Application Name=DD_EDMIAppService;Workstation ID=W2K19SRV391;
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> MaybeGetTransaction -> Transaction Mode: [WithTransaction]
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> GetDatatableWithConnectionObject -> GetDatatableWithConnectionObject: Running Query [SELECT * FROM TBDD_CONNECTION WHERE GUID = 1] and Parameters []
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> GetConnection -> The Following Connection is open: Data Source=w2k19srv398;Initial Catalog=DD_ECM;User ID=EDMAdmin;Password=XXXXX
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> MaybeGetTransaction -> Transaction Mode: [WithTransaction]
|
||||||
|
13:45:45.5322|MSSQLServer|DEBUG >> GetDatatableWithConnectionObject -> GetDatatableWithConnectionObject: Running Query [SELECT
|
||||||
|
SPEC_NAME [Definitions-Name],
|
||||||
|
ITEM_DESCRIPTION [Beschreibung],
|
||||||
|
CASE
|
||||||
|
WHEN SPEC_NAME = 'INVOICE_POSITION_NOTE' THEN
|
||||||
|
REPLACE(REPLACE(ITEM_VALUE, CHAR(13),' '),CHAR(10),' ')
|
||||||
|
ELSE
|
||||||
|
ITEM_VALUE
|
||||||
|
END [Inhalt xml],
|
||||||
|
GROUP_COUNTER [Gruppenzähler],
|
||||||
|
IS_REQUIRED [Pflichtangabe],
|
||||||
|
CREATEDWHEN [Erstellt]
|
||||||
|
FROM dbo.TBEDMI_ITEM_VALUE WITH (NOLOCK)
|
||||||
|
WHERE REFERENCE_GUID = (SELECT EmailMessageID FROM IDB.dbo.VWIDB_DOC_DATA WHERE IDB_OBJ_ID = 4511694)
|
||||||
|
ORDER BY GROUP_COUNTER, SPEC_NAME] and Parameters []
|
||||||
|
13:45:45.5832|taskFLOW|DEBUG >> TabPreload -> === TabPreload END ===
|
||||||
Reference in New Issue
Block a user