diff --git a/Controls.DocumentViewer/DocumentViewer.resx b/Controls.DocumentViewer/DocumentViewer.resx index 52330804..6c91d499 100644 --- a/Controls.DocumentViewer/DocumentViewer.resx +++ b/Controls.DocumentViewer/DocumentViewer.resx @@ -161,26 +161,6 @@ NC42LTAuOCw2LjUtMi4xbDcuOSw3LjljMC4zLDAuMywwLjksMC4zLDEuMiwwbDEuMi0xLjJDMzAuMSwy OC4yLDMwLjEsMjcuNiwyOS43LDI3LjN6IE00LDEzYzAtNSw0LTksOS05YzUsMCw5LDQsOSw5ICAgcy00 LDktOSw5QzgsMjIsNCwxOCw0LDEzeiIgY2xhc3M9IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L - - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 - LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl - dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANoCAAAC77u/ - PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi - IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv - MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh - Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg - MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z - ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz - OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp - dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9Ilpvb20iPg0KICAgIDxwYXRoIGQ9Ik0yNy43LDI1LjNM - MjAuNSwxOGMxLTEuNCwxLjUtMy4yLDEuNS01YzAtNS00LTktOS05cy05LDQtOSw5YzAsNSw0LDksOSw5 - YzEuOSwwLDMuNi0wLjYsNS0xLjVsNy4zLDcuMyAgIGMwLjMsMC4zLDAuOSwwLjMsMS4yLDBsMS4yLTEu - MkMyOC4xLDI2LjIsMjguMSwyNS42LDI3LjcsMjUuM3ogTTYsMTNjMC0zLjksMy4xLTcsNy03czcsMy4x - LDcsN2MwLDMuOS0zLjEsNy03LDdTNiwxNi45LDYsMTN6IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4N - Cjwvc3ZnPgs= @@ -243,6 +223,26 @@ ICAgYzAuOS0zLDMuNy01LDctNXM2LjEsMiw3LDVDMjkuMSwyNiwyNi4zLDI4LDIzLDI4eiBNMjMsMjZj LTEuNywwLTMtMS4zLTMtM3MxLjMtMywzLTNzMywxLjMsMywzUzI0LjcsMjYsMjMsMjZ6IiBjbGFzcz0i QmxhY2siIC8+DQogIDwvZz4NCjwvc3ZnPgs= + + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 + LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl + dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANoCAAAC77u/ + PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi + IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv + MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh + Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg + MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z + ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz + OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp + dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9Ilpvb20iPg0KICAgIDxwYXRoIGQ9Ik0yNy43LDI1LjNM + MjAuNSwxOGMxLTEuNCwxLjUtMy4yLDEuNS01YzAtNS00LTktOS05cy05LDQtOSw5YzAsNSw0LDksOSw5 + YzEuOSwwLDMuNi0wLjYsNS0xLjVsNy4zLDcuMyAgIGMwLjMsMC4zLDAuOSwwLjMsMS4yLDBsMS4yLTEu + MkMyOC4xLDI2LjIsMjguMSwyNS42LDI3LjcsMjUuM3ogTTYsMTNjMC0zLjksMy4xLTcsNy03czcsMy4x + LDcsN2MwLDMuOS0zLjEsNy03LDdTNiwxNi45LDYsMTN6IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4N + Cjwvc3ZnPgs= diff --git a/Controls.DocumentViewer/MailLicense.xml b/Controls.DocumentViewer/MailLicense.xml new file mode 100644 index 00000000..05105264 --- /dev/null +++ b/Controls.DocumentViewer/MailLicense.xml @@ -0,0 +1,23 @@ + + + 4dc5ef40-f1a9-468b-994c-b7ed600ad878 + Mail.dll + 2022-07-29 + Digital Data GmbH + single developer + Digital Data GmbH + + + + + + + + + + 75MRtl4ipYelIZYlpT8O7QDX9Zc= + + + Raxfkz6DfQVs/sMvH+F2nH0eHXD8FoUFSdP3t7AgBUdpABJQx86srlyuMSEhXPlc1THCqPouEVob4RsWnd9OXvTiPPSOUSK9zuNG6uz93KLAhpSD5PraAgBCF4jwZArlAp7aCNfZpHqQ3w6TRHS+CfravUU0AHHG3MZ1ZcRkGuo= + + \ No newline at end of file diff --git a/Controls.DocumentViewer/My Project/AssemblyInfo.vb b/Controls.DocumentViewer/My Project/AssemblyInfo.vb index 45376bce..4e9d3218 100644 --- a/Controls.DocumentViewer/My Project/AssemblyInfo.vb +++ b/Controls.DocumentViewer/My Project/AssemblyInfo.vb @@ -8,12 +8,12 @@ Imports System.Runtime.InteropServices ' Werte der Assemblyattribute überprüfen - - - - - - + + + + + + diff --git a/Controls.DocumentViewer/README.txt b/Controls.DocumentViewer/README.txt new file mode 100644 index 00000000..58cbced4 --- /dev/null +++ b/Controls.DocumentViewer/README.txt @@ -0,0 +1,5 @@ +BASE MODULE +=========== + +This module is intended for often used constants and datastructures. +Therefor it is important that this module does not have any dependencies on other modules!! \ No newline at end of file diff --git a/Controls.SnapPanel/My Project/AssemblyInfo.vb b/Controls.SnapPanel/My Project/AssemblyInfo.vb index 0b10867b..becaa04b 100644 --- a/Controls.SnapPanel/My Project/AssemblyInfo.vb +++ b/Controls.SnapPanel/My Project/AssemblyInfo.vb @@ -8,11 +8,11 @@ Imports System.Runtime.InteropServices ' Werte der Assemblyattribute überprüfen - - - - - + + + + + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' indem Sie "*" wie unten gezeigt eingeben: ' - - + + diff --git a/Controls.SnapPanel/SnapPanel.vb b/Controls.SnapPanel/SnapPanel.vb index 4970d7bc..9225b058 100644 --- a/Controls.SnapPanel/SnapPanel.vb +++ b/Controls.SnapPanel/SnapPanel.vb @@ -5,7 +5,9 @@ Public Class ClassSnapPanel Private _ShowGrid As Boolean = True Private _GridSize As Integer = 16 - + Public Sub New() + Me.AutoScroll = True ' Scrollbars aktivieren + End Sub Public Property GridSize As Integer Get Return _GridSize @@ -30,12 +32,14 @@ Public Class ClassSnapPanel AddHandler e.Control.LocationChanged, AddressOf AlignToGrid AddHandler e.Control.DragDrop, AddressOf AlignToGrid MyBase.OnControlAdded(e) + UpdateScrollArea() End Sub Protected Overrides Sub OnControlRemoved(e As ControlEventArgs) RemoveHandler e.Control.LocationChanged, AddressOf AlignToGrid RemoveHandler e.Control.DragDrop, AddressOf AlignToGrid MyBase.OnControlRemoved(e) + UpdateScrollArea() End Sub Protected Overrides Sub OnPaint(e As System.Windows.Forms.PaintEventArgs) @@ -51,6 +55,23 @@ Public Class ClassSnapPanel Dim x As Integer = Math.Round(item.Left / _GridSize) * _GridSize Dim y As Integer = Math.Round(item.Top / _GridSize) * _GridSize item.Location = New Point(x, y) + UpdateScrollArea() End If End Sub + Private Sub UpdateScrollArea() + Dim maxWidth As Integer = 0 + Dim maxHeight As Integer = 0 + + ' Größte X- und Y-Koordinate der enthaltenen Controls bestimmen + For Each ctrl As Control In Controls + Dim right As Integer = ctrl.Right + Dim bottom As Integer = ctrl.Bottom + + If right > maxWidth Then maxWidth = right + If bottom > maxHeight Then maxHeight = bottom + Next + + ' Scrollbereich setzen + Me.AutoScrollMinSize = New Size(maxWidth, maxHeight) + End Sub End Class diff --git a/DDMonorepo.sln b/DDMonorepo.sln index a0e54c47..a3690666 100644 --- a/DDMonorepo.sln +++ b/DDMonorepo.sln @@ -74,6 +74,8 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DBCleaner", "DBCleaner\DBCl EndProject Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EDMIService.Tests", "EDMIService.Tests\EDMIService.Tests.vbproj", "{E3DA65CA-964D-4896-991A-B5426884E215}" EndProject +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Jobs", "..\DDModules\Jobs\Jobs.vbproj", "{39EC839A-3C30-4922-A41E-6B09D1DDE5C3}" +EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU @@ -180,6 +182,10 @@ Global {E3DA65CA-964D-4896-991A-B5426884E215}.Debug|Any CPU.Build.0 = Debug|Any CPU {E3DA65CA-964D-4896-991A-B5426884E215}.Release|Any CPU.ActiveCfg = Release|Any CPU {E3DA65CA-964D-4896-991A-B5426884E215}.Release|Any CPU.Build.0 = Release|Any CPU + {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Debug|Any CPU.Build.0 = Debug|Any CPU + {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Release|Any CPU.ActiveCfg = Release|Any CPU + {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Release|Any CPU.Build.0 = Release|Any CPU EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE @@ -210,6 +216,7 @@ Global {9D4AC920-C78E-41C3-994E-91690FF79380} = {8FFE925E-8B84-45F1-93CB-32B1C96F41EB} {5A7913CE-7D3D-4E84-B23D-4747C178CD71} = {CC368D6A-6AC4-4EB9-A092-14700FABEF7A} {E3DA65CA-964D-4896-991A-B5426884E215} = {7AF3F9C2-C939-4A08-95C1-0453207E298A} + {39EC839A-3C30-4922-A41E-6B09D1DDE5C3} = {CC368D6A-6AC4-4EB9-A092-14700FABEF7A} EndGlobalSection GlobalSection(ExtensibilityGlobals) = postSolution SolutionGuid = {C1BE4090-A0FD-48AF-86CB-39099D14B286} diff --git a/GUIs.Common/Common.vbproj b/GUIs.Common/Common.vbproj index 3bb689c6..1db8604c 100644 --- a/GUIs.Common/Common.vbproj +++ b/GUIs.Common/Common.vbproj @@ -1,5 +1,6 @@  + Debug @@ -48,6 +49,9 @@ + + ..\packages\BouncyCastle.Cryptography.2.5.0\lib\net461\BouncyCastle.Cryptography.dll + @@ -69,55 +73,232 @@ ..\Controls.DocumentViewer\bin\Debug\DigitalData.Controls.DocumentViewer.dll - - ..\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll - ..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll - + + False ..\..\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll - + + False ..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll ..\..\DDModules\EDMIAPI\bin\Debug\DigitalData.Modules.EDMI.API.dll - + + False + ..\..\DDModules\Encryption\bin\Debug\DigitalData.Modules.Encryption.dll + + + False ..\..\DDModules\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll - + + False ..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll - + + False + ..\..\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll + + + False ..\..\DDModules\Patterns\bin\Debug\DigitalData.Modules.Patterns.dll - + + False ..\..\DDModules\Windows\bin\Debug\DigitalData.Modules.Windows.dll ..\..\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll + + ..\packages\DocumentFormat.OpenXml.3.2.0\lib\net46\DocumentFormat.OpenXml.dll + + + ..\packages\DocumentFormat.OpenXml.Framework.3.2.0\lib\net46\DocumentFormat.OpenXml.Framework.dll + + + ..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.dll + + + ..\packages\EntityFramework.Firebird.6.4.0\lib\net452\EntityFramework.Firebird.dll + + + ..\packages\EntityFramework.6.4.4\lib\net45\EntityFramework.SqlServer.dll + + + ..\packages\FirebirdSql.Data.FirebirdClient.7.5.0\lib\net452\FirebirdSql.Data.FirebirdClient.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.1d.writer.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.2d.writer.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.DWG.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Common.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Document.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Email.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.HTML.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.Conversion.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Rendering.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.MSOfficeBinary.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenDocument.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.Templating.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.PDF.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.RTF.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.SVG.dll + + + ..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.wia.gateway.dll + True + + + ..\packages\Microsoft.Bcl.AsyncInterfaces.9.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll + + + ..\packages\Microsoft.Bcl.Cryptography.9.0.0\lib\net462\Microsoft.Bcl.Cryptography.dll + + + ..\packages\Microsoft.Identity.Client.4.55.0\lib\net461\Microsoft.Identity.Client.dll + + + ..\packages\Microsoft.IdentityModel.Abstractions.6.22.0\lib\net461\Microsoft.IdentityModel.Abstractions.dll + + + ..\packages\Newtonsoft.Json.13.0.3\lib\net45\Newtonsoft.Json.dll + + + ..\packages\Newtonsoft.Json.Bson.1.0.2\lib\net45\Newtonsoft.Json.Bson.dll + ..\packages\NLog.5.0.5\lib\net46\NLog.dll + + ..\packages\OpenMcdf.2.4.1\lib\net40\OpenMcdf.dll + + + ..\packages\protobuf-net.3.2.46\lib\net462\protobuf-net.dll + + + ..\packages\protobuf-net.Core.3.2.46\lib\net462\protobuf-net.Core.dll + + + ..\packages\RtfPipe.2.0.7677.4303\lib\net45\RtfPipe.dll + + + ..\packages\S22.Imap.3.6.0.0\lib\net40\S22.Imap.dll + + + ..\packages\System.Buffers.4.6.0\lib\net462\System.Buffers.dll + + + ..\packages\System.CodeDom.9.0.0\lib\net462\System.CodeDom.dll + + + ..\packages\System.Collections.Immutable.9.0.0\lib\net462\System.Collections.Immutable.dll + + + ..\packages\System.Data.Odbc.6.0.1\lib\net461\System.Data.Odbc.dll + + + ..\packages\System.Formats.Asn1.9.0.0\lib\net462\System.Formats.Asn1.dll + + + + ..\packages\System.IO.Packaging.9.0.0\lib\net462\System.IO.Packaging.dll + + + ..\packages\System.IO.Pipelines.9.0.0\lib\net462\System.IO.Pipelines.dll + + + + ..\packages\System.Memory.4.6.0\lib\net462\System.Memory.dll + + + ..\packages\Microsoft.AspNet.WebApi.Client.6.0.0\lib\net45\System.Net.Http.Formatting.dll + + + + ..\packages\System.Numerics.Vectors.4.6.0\lib\net462\System.Numerics.Vectors.dll + + + ..\packages\System.Runtime.CompilerServices.Unsafe.6.1.0\lib\net462\System.Runtime.CompilerServices.Unsafe.dll + + + ..\packages\System.Security.Cryptography.Pkcs.9.0.0\lib\net462\System.Security.Cryptography.Pkcs.dll + + + ..\packages\System.Text.Encodings.Web.9.0.0\lib\net462\System.Text.Encodings.Web.dll + + + ..\packages\System.Text.Json.9.0.0\lib\net462\System.Text.Json.dll + + + ..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll + + + ..\packages\System.ValueTuple.4.5.0\lib\net461\System.ValueTuple.dll + @@ -350,6 +531,12 @@ Settings.Designer.vb + + + {3DCD6D1A-C830-4241-B7E4-27430E7EA483} + LookupControl + + @@ -628,4 +815,14 @@ + + + Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}". + + + + + + + \ No newline at end of file diff --git a/GUIs.Common/DocumentResultList/Watcher.vb b/GUIs.Common/DocumentResultList/Watcher.vb index 3d55a0f6..ddb537fb 100644 --- a/GUIs.Common/DocumentResultList/Watcher.vb +++ b/GUIs.Common/DocumentResultList/Watcher.vb @@ -9,7 +9,7 @@ Namespace DocumentResultList Inherits BaseClass Private WithEvents FileOpenTimer As New Timer - Private FileEx As Modules.Filesystem.File + Private FileEx As DigitalData.Modules.Filesystem.File Private EnableWatching As Boolean = True ' TODO: Hashes for checking if the opened file was modified externally @@ -52,7 +52,7 @@ Namespace DocumentResultList Public Sub New(pLogConfig As LogConfig, pEnableWatching As Boolean) MyBase.New(pLogConfig) - FileEx = New Modules.Filesystem.File(pLogConfig) + FileEx = New DigitalData.Modules.Filesystem.File(pLogConfig) EnableWatching = pEnableWatching End Sub diff --git a/GUIs.Common/My Project/AssemblyInfo.vb b/GUIs.Common/My Project/AssemblyInfo.vb index 538949f5..497148cb 100644 --- a/GUIs.Common/My Project/AssemblyInfo.vb +++ b/GUIs.Common/My Project/AssemblyInfo.vb @@ -8,12 +8,12 @@ Imports System.Runtime.InteropServices ' Werte der Assemblyattribute überprüfen - - - - + + + + - + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/GUIs.Common/SQLEditor/Placeholders.vb b/GUIs.Common/SQLEditor/Placeholders.vb index bf09691b..5b0c40f9 100644 --- a/GUIs.Common/SQLEditor/Placeholders.vb +++ b/GUIs.Common/SQLEditor/Placeholders.vb @@ -5,20 +5,22 @@ Namespace SQLEditor Public Class Placeholders Public Const AUTO_INDEX_ZOOFLOW = "ATTR_A" Public Const MAN_INDEX_ZOOFLOW = "ATTR_M" - - Public Function GetInternalPlaceholders() As GalleryItemGroup + Public Function GetInternalPlaceholders(AttributStore As String) As GalleryItemGroup Dim oModule = "INT" Dim oImage = My.Resources.electronics_desktopmac - + Dim oImagePrivate = My.Resources._private + Dim oValue As String + If AttributStore = "WM" Then + oValue = "WMDocID" + Else + oValue = "IDBObjID" + End If Dim oItems As New List(Of GalleryItem)() From { GetGalleryItem(New Placeholder("USERNAME", "Benutzername", oModule, "USERNAME"), oImage), GetGalleryItem(New Placeholder("MACHINE", "Aktuelles Datum", oModule, "MACHINE"), oImage), - GetGalleryItem(New Placeholder("DOMAIN", "Domain des Computers", oModule, "DOMAIN"), oImage), - GetGalleryItem(New Placeholder("DATE", "Aktuelles Datum", oModule, "DATE"), oImage), - GetGalleryItem(New Placeholder("FILENAME_EXT", "Dateiname (mit Endung)", oModule, "FILENAME_EXT"), oImage), - GetGalleryItem(New Placeholder("FILENAME_ONLY", "Dateiname (ohne Endung)", oModule, "FILENAME_ONLY"), oImage), - GetGalleryItem(New Placeholder("FILE_DATE", "Datei Erstellt wann", oModule, "FILE_DATE"), oImage), - GetGalleryItem(New Placeholder("FILE_EXT", "Datei Extension", oModule, "FILE_EXT"), oImage) + GetGalleryItem(New Placeholder("DOMAIN", "Email-Adresse", oModule, "DOMAIN"), oImage), + GetGalleryItem(New Placeholder("DATE", "Vorname", oModule, "DATE"), oImage), + GetGalleryItem(New Placeholder(oValue, "UniqueObjectID", oModule, oValue), oImagePrivate) } Dim oGroup1 = New GalleryItemGroup() With {.Caption = "Intern"} @@ -39,6 +41,7 @@ Namespace SQLEditor Return oGroup1 End Function + Friend Function GetWindreamPlaceholders(pPlaceholders As List(Of String)) As GalleryItemGroup Dim oImage = My.Resources.bo_contract Dim oItems As New List(Of GalleryItem)() diff --git a/GUIs.Common/SQLEditor/frmSQLEditor.vb b/GUIs.Common/SQLEditor/frmSQLEditor.vb index 918d5cd5..3a676591 100644 --- a/GUIs.Common/SQLEditor/frmSQLEditor.vb +++ b/GUIs.Common/SQLEditor/frmSQLEditor.vb @@ -33,6 +33,7 @@ Public Class frmSQLEditor Public Property PlaceholdersAutomaticPrefix As String Public Property PlaceholdersAutomaticTitle As String = "Automatisches Attribut" Public Property PlaceholdersWindream As List(Of String) + Public Property ATTRIBUTE_STORE As String = "WM" Public Sub New(pLogConfig As LogConfig, pDatabase As MSSQLServer) MyClass.New(pLogConfig, pDatabase, True) @@ -80,19 +81,30 @@ Public Class frmSQLEditor Dim oConnectionGroup = LoadConnections() Dim oSelectedItem = Nothing - + Dim oConnectionisZero As Boolean = False ' Missing/Negative connection will always result in default (DD_ECM) connection If SQLConnection <= 0 Then + oConnectionisZero = True SQLConnection = 1 End If - ' Select the supplied connection in the ribbon gallery - For Each oItem As GalleryItem In oConnectionGroup.Items - Dim oConnection = oItem.Tag - If SQLConnection = oConnection.id Then - oSelectedItem = oItem - End If - Next + If oConnectionisZero = True Then + For Each oItem As GalleryItem In oConnectionGroup.Items + Dim oConnection = oItem.Tag + If oConnection.NAME = "DD_ECM" Then + oSelectedItem = oItem + End If + Next + Else + For Each oItem As GalleryItem In oConnectionGroup.Items + Dim oConnection = oItem.Tag + If oConnection.Id = SQLConnection Then + oSelectedItem = oItem + End If + Next + End If + + GalleryConnection.Gallery.Groups.Add(oConnectionGroup) @@ -153,7 +165,7 @@ Public Class frmSQLEditor End If oPlaceholders.Add(Placeholders.GetUserPlaceholders()) - oPlaceholders.Add(Placeholders.GetInternalPlaceholders()) + oPlaceholders.Add(Placeholders.GetInternalPlaceholders(ATTRIBUTE_STORE)) Return oPlaceholders End Function diff --git a/GUIs.Common/app.config b/GUIs.Common/app.config index bf89aeae..9081ad45 100644 --- a/GUIs.Common/app.config +++ b/GUIs.Common/app.config @@ -1,9 +1,11 @@ - + -
+
+ +
@@ -11,46 +13,106 @@ Skin/Office 2019 White - + + - + + - + + - + + - + + - + + - + + - + + - + + - + + - + - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + + + + + + + + + + + \ No newline at end of file diff --git a/GUIs.Common/packages.config b/GUIs.Common/packages.config index 37cb9210..8abe7a31 100644 --- a/GUIs.Common/packages.config +++ b/GUIs.Common/packages.config @@ -1,4 +1,43 @@  + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/Services.ZUGFeRDService/DDZUGFeRDService.vbproj b/Services.ZUGFeRDService/DDZUGFeRDService.vbproj index a4a018da..eb36d078 100644 --- a/Services.ZUGFeRDService/DDZUGFeRDService.vbproj +++ b/Services.ZUGFeRDService/DDZUGFeRDService.vbproj @@ -48,29 +48,29 @@ On - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Base\DigitalData.Modules.Base.dll + ..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Config\DigitalData.Modules.Config.dll + ..\..\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Database\DigitalData.Modules.Database.dll + ..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Interfaces\DigitalData.Modules.Interfaces.dll + ..\..\DDModules\Interfaces\bin\Debug\DigitalData.Modules.Interfaces.dll - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Jobs\DigitalData.Modules.Jobs.dll + ..\..\DDModules\Jobs\bin\Debug\DigitalData.Modules.Jobs.dll - + False - P:\Install .Net\0 DD - Bibliotheken\Modules\Logging\DigitalData.Modules.Logging.dll + ..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll