diff --git a/app/ResultHandler_Konfig/clsDateiverarbeitung.vb b/app/ResultHandler_Konfig/clsDateiverarbeitung.vb index aa4cc69..84781d5 100644 --- a/app/ResultHandler_Konfig/clsDateiverarbeitung.vb +++ b/app/ResultHandler_Konfig/clsDateiverarbeitung.vb @@ -244,6 +244,7 @@ Public Class clsDateiverarbeitung doc.Ivalidfrom = now doc.Ivaliduntil = now.AddDays(30) doc.Pfad = link + doc.Dateiname = WMFile.aName doc.Kategorien = New List(Of BNSDocumentCategory) From { New BNSDocumentCategory With {.Id = GetDocTypeCategory(DOKART)} } @@ -391,6 +392,7 @@ Public Class clsDateiverarbeitung Public Primaer As Boolean = False Public Fremsysid As Integer = 1 Public Kategorien As List(Of BNSDocumentCategory) + Public Dateiname As String End Class Public Class BNSDocumentCategory