Timas, MDM Datenverarbeitung (Asfinag), UID-Nr bei Creditsafe

SDL/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.2.7.9")>
+<Assembly: AssemblyVersion("1.2.8.0")>
-<Assembly: AssemblyFileVersion("1.2.7.9")>
+<Assembly: AssemblyFileVersion("1.2.8.0")>

SDL/SDL.vbproj

@@ -94,7 +94,7 @@
     <SignAssembly>false</SignAssembly>
   </PropertyGroup>
   <PropertyGroup>
-    <AssemblyOriginatorKeyFile>SDL_1_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
+    <AssemblyOriginatorKeyFile>AL20210908.pfx</AssemblyOriginatorKeyFile>
   </PropertyGroup>
   <ItemGroup>
     <Reference Include="Accessibility" />
@@ -102,8 +102,9 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\BouncyCastle.Crypto.dll</HintPath>
     </Reference>
-    <Reference Include="ClosedXML, Version=0.95.4.0, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="ClosedXML, Version=0.76.0.0, Culture=neutral, PublicKeyToken=fd1eb21b62ae805b, processorArchitecture=MSIL">
-      <HintPath>..\packages\ClosedXML.0.95.4\lib\net46\ClosedXML.dll</HintPath>
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>F:\PROGRAMMIERUNG\dll\closedxml\ClosedXML.dll</HintPath>
     </Reference>
     <Reference Include="com.esendex.sdk, Version=3.8.0.0, Culture=neutral, PublicKeyToken=9dceac28a20578e2, processorArchitecture=MSIL">
       <HintPath>..\..\..\AVISO\Aviso\packages\esendex-dotnet-sdk.3.8.0\lib\net35\com.esendex.sdk.dll</HintPath>
@@ -115,15 +116,16 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\..\..\dll\SharpSSH\DiffieHellman.dll</HintPath>
     </Reference>
-    <Reference Include="DocumentFormat.OpenXml, Version=2.7.2.0, Culture=neutral, PublicKeyToken=8fb06cb64d019a17, processorArchitecture=MSIL">
+    <Reference Include="documentformat.openxml%281%29, Version=2.5.5631.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
-      <HintPath>..\..\..\AVISO\Aviso\packages\DocumentFormat.OpenXml.2.7.2\lib\net46\DocumentFormat.OpenXml.dll</HintPath>
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>F:\PROGRAMMIERUNG\dll\documentformat.openxml(1).dll</HintPath>
     </Reference>
     <Reference Include="ExcelNumberFormat, Version=1.0.10.0, Culture=neutral, PublicKeyToken=23c6f5d73be07eca, processorArchitecture=MSIL">
       <HintPath>..\..\..\AVISO\Aviso\packages\ExcelNumberFormat.1.0.10\lib\net20\ExcelNumberFormat.dll</HintPath>
     </Reference>
     <Reference Include="Ghostscript.NET, Version=1.2.1.0, Culture=neutral, PublicKeyToken=f85051de34525b59, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Ghostscript.NET.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Ghostscript.NET.dll</HintPath>
     </Reference>
     <Reference Include="Gma.QrCodeNet.Encoding">
       <HintPath>..\..\..\..\RKSV DE\Gma.QrCodeNet.Encoding.dll</HintPath>
@@ -3184,7 +3186,6 @@
     <EmbeddedResource Include="mdm\SDLLeistungenDetails\usrCntlSDLLeistungVERAGCardNEU.resx">
       <DependentUpon>usrCntlSDLLeistungVERAGCardNEU.vb</DependentUpon>
     </EmbeddedResource>
-    <EmbeddedResource Include="My Project\licenses.licx" />
     <EmbeddedResource Include="OriginalArchiv_ATR\frmATR.resx">
       <DependentUpon>frmATR.vb</DependentUpon>
     </EmbeddedResource>
@@ -4279,6 +4280,7 @@
     <None Include="AL20210908.pfx" />
     <None Include="andreas.cer" />
     <None Include="ClassDiagram1.cd" />
+    <None Include="PrivateCodeSignaturDaniel20240131.pfx" />
     <None Include="Resources\FA_Graz_EV-Veranlagung_Muster.xlsx">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
     </None>
@@ -4291,8 +4293,6 @@
     </None>
     <None Include="Resources\SR_EVOLOG.xlsx" />
     <None Include="Resources\SR_TransFerry360.xlsx" />
-    <None Include="SDL_1_TemporaryKey.pfx" />
-    <None Include="Test.pfx" />
     <None Include="Web References\eu.europa.ec1\eoriValidationResult.datasource">
       <DependentUpon>Reference.map</DependentUpon>
     </None>
@@ -4453,7 +4453,6 @@
     <None Include="Resources\MDM_Schreiben\Uebernahmebestätigung\ÜBERNAHMEBESTÄTIGUNG.dotx">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
     </None>
-    <None Include="SDL_TemporaryKey.pfx" />
     <None Include="seriendruck\Vorlagen\Erstattungsschreiben\Erstattungsschreiben DE.dotx">
       <CopyToOutputDirectory>Always</CopyToOutputDirectory>
     </None>

SDL/buchhaltung/usrCntlBH.vb

@@ -691,4 +691,67 @@ Public Class usrCntlBH
 
         Me.Cursor = Cursors.Default
     End Sub
+
+    Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
+
+
+        If txtStichtag.Text <> "" AndAlso Not IsNumeric(txtStichtag.Text) Then MsgBox("Stichtag nicht korrekt!") : Exit Sub
+
+        Dim SQLStichtag = ""
+        If txtStichtag.Text <> "" Then
+            Try : DateTime.ParseExact(txtStichtag._value, "dd.MM.yyyy", culture)
+            Catch ex As Exception : MsgBox("Stichtag nicht korrekt!") : Exit Sub : End Try
+            SQLStichtag = "And (UStVAn_ReDatVon <='" & txtStichtag._value & "' and tblUStVAntrag.UStVAn_ReDatBis >= '" & txtStichtag._value & "')"
+        End If
+
+        Dim sqlStr = "SELECT tblUStVAntrag.UStVAn_ID, tblUStVAntrag.UStVAn_KuNr, tblUStVAntrag.UStVAn_ReDatVon, tblUStVAntrag.UStVAn_ReDatBis, tblUStVAntrag.UStVAn_Ausstellungsdatum, tblUStVAntrag.UStVAn_LandNr, tblUStVAntrag.UStVAn_3470, Adressen.Ordnungsbegriff, Adressen.LandKz
+                        FROM tblUStVAntrag 
+                        INNER JOIN Adressen ON tblUStVAntrag.UStVAn_KuNr = Adressen.AdressenNr
+                        WHERE tblUStVAntrag.UStVAn_3470 Is Not Null" & SQLStichtag
+
+
+        Dim dt = SQL.loadDgvBySql(sqlStr, "FMZOLL")
+
+        cProgramFunctions.genExcelFromDT_NEW(dt, {"G1:G" & (dt.Rows.Count + 1)})
+
+        Me.Cursor = Cursors.Default
+    End Sub
+
+    Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click, Button11.Click
+
+        If txtStichtag.Text <> "" AndAlso Not IsNumeric(txtStichtag.Text) Then MsgBox("Stichtag nicht korrekt!") : Exit Sub
+
+        Dim SQLStichtag = ""
+        Dim SQLKdNr = ""
+        If sender Is Button10 Then
+            SQLKdNr = " and [UStVAn_KuNr] Not Between 150000 And 155999"
+        Else
+            SQLKdNr = " and [UStVAn_KuNr] Between 150000 And 155999"
+        End If
+
+        If txtStichtag.Text <> "" Then
+            Try : DateTime.ParseExact(txtStichtag._value, "dd.MM.yyyy", culture)
+            Catch ex As Exception : MsgBox("Stichtag nicht korrekt!") : Exit Sub : End Try
+            SQLStichtag = " And (UStVAn_ReDatVon <='" & txtStichtag._value & "' and tblUStVAntrag.UStVAn_ReDatBis >= '" & txtStichtag._value & "')"
+        End If
+
+        Dim sqlStr = "SELECT tblUStVAntrag.UStVAn_ID, tblUStVAntrag.UStVAn_KuNr, tblUStVAntrag.UStVAn_ReDatVon, tblUStVAntrag.UStVAn_ReDatBis, tblUStVAntrag.UStVAn_Ausstellungsdatum, 
+                      tblUStVAntrag.UStVAn_LandNr, tblUStVAntrag.UStVAn_VZDatum, tblUStVAntrag.UStVAn_VZBetrag, tblUStVAntrag.UStVAn_RZBetragVZ, Adressen.Ordnungsbegriff, Adressen.LandKz,
+                       isnull([UStVEr_USteuerbetragEUR],0) AS Erstattungsbetrag, 
+                       case when ([UStVAn_VZBetrag]-isnull([UStVAn_RZBetragVZ],0)-isnull([UStVEr_USteuerbetragEUR],0))>0 then (([UStVAn_VZBetrag]-isnull([UStVAn_RZBetragVZ],0))-isnull([UStVEr_USteuerbetragEUR],0)) else 0 End AS UStVAn_VZBetragAktuell
+                      FROM tblUStVAntrag 
+                      INNER JOIN [tblUStVErstattung] ON [tblUStVErstattung].[UStVAn_ID] = tblUStVAntrag .[UStVAn_ID] 
+                      INNER JOIN Adressen ON tblUStVAntrag.UStVAn_KuNr = Adressen.AdressenNr
+                      WHERE tblUStVAntrag.UStVAn_VZBetrag Is Not Null" & SQLStichtag & SQLKdNr
+
+
+        Dim dt = SQL.loadDgvBySql(sqlStr, "FMZOLL")
+
+        cProgramFunctions.genExcelFromDT_NEW(dt, {"H1:H" & (dt.Rows.Count + 1), "I1:I" & (dt.Rows.Count + 1), "L1:L" & (dt.Rows.Count + 1), "M1:M" & (dt.Rows.Count + 1)})
+
+        Me.Cursor = Cursors.Default
+
+    End Sub
+
+
 End Class

SDL/kunden/usrCntlKundenuebersicht.vb

@@ -2817,6 +2817,7 @@ Public Class usrCntlKundenuebersicht
         cBonitaetsauskunft.ba_CreditSaveBonitaetsIndex = Nothing
         cBonitaetsauskunft.ba_CreditSaveRisikoklasse = Nothing
 
+
         cBonitaetsauskunft.ba_KundenNr = (kdNr)
         cBonitaetsauskunft.ba_Datum = Now()
 
@@ -2848,6 +2849,7 @@ Public Class usrCntlKundenuebersicht
             cBonitaetsauskunft.ba_Hoechstkredit = 0
         End If
 
+        cBonitaetsauskunft.ba_UID = company.vatNo
         cBonitaetsauskunft.ba_Bankverbindung = company.csBank
         cBonitaetsauskunft.ba_Zahlungsweise = ""
         cBonitaetsauskunft.ba_GFName = company.csCEO
@@ -2992,6 +2994,14 @@ Public Class usrCntlKundenuebersicht
             setCreditSafeEntry(company, pdfObject, kdNr)
         End If
 
+        If company.vatNo <> "" AndAlso checkNullStr(ADRESSE.UstIdKz) = "" AndAlso checkNullStr(ADRESSE.UstIdNr) = "" Then
+            'set and check uid nr
+
+
+        End If
+
+
+
     End Sub
 
 

SDL/mdm/frmMDMDatenverarbetiung.vb

@@ -2106,9 +2106,9 @@ Public Class frmMDMDatenverarbetiung
 
             RG.Buchungsjahr = cRKSV.getGJ(RG.RechnungsDatum)
 
-            Dim sqlstr As String = "SELECT '135' as leistungsNr, [contractPartner] as ProductCode, sum([netAmount]) as netamount ,sum([VATamount]) as Vatamount ,sum([totalAmount]) as amountInclVAT FROM Kreditkarten INNER JOIN tblAsfinagMaut ON Kreditkarten.KartenNr = tblAsfinagMaut.cardnumber Where Kreditkarten.AdressenNr= '" & KD.KundenNr & "' and tblAsfinagMaut.VATamount <> 0 Group by [contractPartner]
+            Dim sqlstr As String = "SELECT '135' as leistungsNr, 'MAUT AT lt. Auslage' as ProductCode, sum([netAmount]) as netamount ,sum([VATamount]) as Vatamount ,sum([totalAmount]) as amountInclVAT FROM Kreditkarten INNER JOIN tblAsfinagMaut ON Kreditkarten.KartenNr = tblAsfinagMaut.cardnumber Where Kreditkarten.AdressenNr= '" & KD.KundenNr & "' and tblAsfinagMaut.VATamount <> 0 group by Kreditkarten.AdressenNr
                                     UNION
-                                    SELECT '153' as leistungsNr, [contractPartner] as ProductCode, sum([netAmount]) as netamount ,sum([VATamount]) as Vatamount ,sum([totalAmount]) as amountInclVAT FROM Kreditkarten INNER JOIN tblAsfinagMaut ON Kreditkarten.KartenNr = tblAsfinagMaut.cardnumber Where Kreditkarten.AdressenNr= '" & KD.KundenNr & "' and tblAsfinagMaut.VATamount = 0 Group by [contractPartner]"
+                                    SELECT '153' as leistungsNr, 'MAUT AT lt. Auslage' as ProductCode, sum([netAmount]) as netamount ,sum([VATamount]) as Vatamount ,sum([totalAmount]) as amountInclVAT FROM Kreditkarten INNER JOIN tblAsfinagMaut ON Kreditkarten.KartenNr = tblAsfinagMaut.cardnumber Where Kreditkarten.AdressenNr= '" & KD.KundenNr & "' and tblAsfinagMaut.VATamount = 0 group by Kreditkarten.AdressenNr"
 
             Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL")
 
@@ -2795,7 +2795,7 @@ Public Class frmMDMDatenverarbetiung
                         Return False
                     End If
                     For Each row As DataRow In dt.Rows
-                        Dim maut As New cAsfinagMaut()
+                        Dim maut As New VERAG_PROG_ALLGEMEIN.cAsfinagMaut()
                         maut.cardnumber = row.Item("CardNumber")
                         maut.licenceplate = IIf(Not IsDBNull(row.Item("vehicleLicensePlate")), row.Item("vehicleLicensePlate"), row.Item("InfoField"))
                         maut.turnoverdate = row.Item("DeliveryDate")

VERAG_PROG_ALLGEMEIN/Classes/cBonitaetsauskunft.vb

@@ -32,6 +32,7 @@ Public Class cBonitaetsauskunft
     Property ba_datenarchivId As Object = Nothing
     Property ba_Geschaeftszweck As Object = Nothing
     Property ba_GSName As Object = Nothing
+    Property ba_UID As String = ""
 
 
     Dim SQL As New SQL
@@ -75,6 +76,7 @@ Public Class cBonitaetsauskunft
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_datenarchivId", ba_datenarchivId))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Geschaeftszweck", ba_Geschaeftszweck))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_GSName", ba_GSName))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_UID", ba_UID))
 
         Return list
     End Function

VERAG_PROG_ALLGEMEIN/Classes/cMitarbeiter.vb

@@ -22,6 +22,7 @@ Public Class cMitarbeiter
     Property mit_durchwahl As String = ""
     Property mit_telefonnr As String = ""
     Property mit_email As String = ""
+    Property mit_emailprivat As String = ""
     Property mit_mobiltel As String = ""
     Property mit_allowAnruf As Boolean
     Property mit_info As String = ""
@@ -202,6 +203,7 @@ Public Class cMitarbeiter
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_Sprachkentnisse", mit_Sprachkentnisse))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_homeoffice", mit_homeoffice))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_timasNichtStempeln", mit_timasNichtStempeln))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("mit_emailprivat", mit_emailprivat))
 
 
         Return list
@@ -401,6 +403,7 @@ Public Class cMitarbeiter
                             If Not dr.Item("mit_Sprachkentnisse") Is DBNull.Value Then Me.mit_Sprachkentnisse = dr.Item("mit_Sprachkentnisse")
                             Me.mit_homeoffice = dr.Item("mit_homeoffice")
                             Me.mit_timasNichtStempeln = dr.Item("mit_timasNichtStempeln")
+                            If Not dr.Item("mit_emailprivat") Is DBNull.Value Then Me.mit_emailprivat = dr.Item("mit_emailprivat")
 
 
                         Catch ex As Exception

VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb

@@ -608,9 +608,7 @@ Public Class cCreditSafeAPI
         Public Property csBusinessPurpose As String
         Public Property csShareholder As String
         Public Property csCEO As String
-
         Public Property csTurnover As String
-
         Public Property language As String
 
         Public Property csBank As String

VERAG_PROG_ALLGEMEIN/Schnittstellen/TIMAS/cTimasAPI.vb

@@ -256,7 +256,7 @@ Public Class cTimasAPI
             success = json.UpdateString("importSign", "Import from Aviso")
             success = json.UpdateString("login", mitarbeiter.mit_username)
             success = json.UpdateBool("loginActive", 1)
-            success = json.UpdateString("email", mitarbeiter.mit_email)
+            success = json.UpdateString("email", IIf(mitarbeiter.mit_emailprivat <> "", mitarbeiter.mit_emailprivat, mitarbeiter.mit_email))
             success = json.UpdateString("street", mitarbeiter.mit_strasse)
             success = json.UpdateString("city", mitarbeiter.mit_ort)
             success = json.UpdateString("zipcode", mitarbeiter.mit_plz)

VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj

@@ -21,7 +21,7 @@
     <DebugType>full</DebugType>
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
-    <OutputPath>bin\Debug\</OutputPath>
+    <OutputPath>..\..\..\VERAG_PROG_ALLGEMEIN\bin\Debug\</OutputPath>
     <DocumentationFile>VERAG_PROG_ALLGEMEIN.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
@@ -73,67 +73,70 @@
     <AssemblyOriginatorKeyFile>ProgAllg.pfx</AssemblyOriginatorKeyFile>
   </PropertyGroup>
   <ItemGroup>
-    <Reference Include="ChilkatDotNet47, Version=9.5.0.88, Culture=neutral, PublicKeyToken=eb5fc1fc52ef09bd, processorArchitecture=AMD64">
+    <Reference Include="ChilkatDotNet47, Version=9.5.0.96, Culture=neutral, PublicKeyToken=eb5fc1fc52ef09bd, processorArchitecture=AMD64">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\ChillKat64\neu 2023\chilkatdotnet47-9.5.0-x64\ChilkatDotNet47.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\ChillKat64\neu 2023\chilkatdotnet47-9.5.0-x64\ChilkatDotNet47.dll</HintPath>
     </Reference>
-    <Reference Include="ClosedXML, Version=0.76.0.0, Culture=neutral, PublicKeyToken=fd1eb21b62ae805b, processorArchitecture=MSIL">
+    <Reference Include="ClosedXML, Version=0.68.0.0, Culture=neutral, PublicKeyToken=fd1eb21b62ae805b, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\AVISO\Aviso\packages\ClosedXML.0.95.4\lib\net46\ClosedXML.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\closedxml\Neuer Ordner\ClosedXML.dll</HintPath>
     </Reference>
-    <Reference Include="Dynamsoft.Forms.Viewer, Version=8.0.0.510, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
+    <Reference Include="Dynamsoft.Forms.Viewer, Version=8.3.3.726, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Dynamsoft\8.3.3\Dynamsoft.Forms.Viewer.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.Forms.Viewer.dll</HintPath>
     </Reference>
-    <Reference Include="Dynamsoft.ImageCore, Version=8.0.0.510, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
+    <Reference Include="Dynamsoft.ImageCore, Version=8.3.3.726, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Dynamsoft\8.3.3\Dynamsoft.ImageCore.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.ImageCore.dll</HintPath>
     </Reference>
-    <Reference Include="Dynamsoft.PDF, Version=7.0.0.320, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
+    <Reference Include="Dynamsoft.PDF, Version=8.3.3.726, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Dynamsoft\8.3.3\Dynamsoft.PDF.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.PDF.dll</HintPath>
     </Reference>
-    <Reference Include="Dynamsoft.Twain, Version=8.0.0.510, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
+    <Reference Include="Dynamsoft.Twain, Version=8.3.3.726, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Dynamsoft\8.3.3\Dynamsoft.Twain.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.Twain.dll</HintPath>
     </Reference>
-    <Reference Include="Dynamsoft.WPF.Viewer, Version=8.0.0.510, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
+    <Reference Include="Dynamsoft.WPF.Viewer, Version=8.3.3.726, Culture=neutral, PublicKeyToken=298ad97013b423eb, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Dynamsoft\8.3.3\Dynamsoft.WPF.Viewer.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Dynamsoft\8.3.3\Dynamsoft.WPF.Viewer.dll</HintPath>
     </Reference>
-    <Reference Include="Ghostscript.NET">
+    <Reference Include="Ghostscript.NET, Version=1.2.1.0, Culture=neutral, PublicKeyToken=f85051de34525b59, processorArchitecture=MSIL">
-      <HintPath>..\..\..\dll\Ghostscript.NET.dll</HintPath>
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Ghostscript.NET.dll</HintPath>
+    </Reference>
+    <Reference Include="Interop.Therefore.API">
+      <HintPath>F:\PROGRAMMIERUNG\dll\Interop.Therefore.API.dll</HintPath>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
     </Reference>
     <Reference Include="itextsharp, Version=5.5.5.0, Culture=neutral, PublicKeyToken=8354ae6d2174ddca, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\itextsharp.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\itextsharp.dll</HintPath>
     </Reference>
-    <Reference Include="McDull.Windows.Forms">
+    <Reference Include="McDull.Windows.Forms, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
-      <HintPath>..\..\..\dll\McDull.Windows.Forms.dll</HintPath>
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>F:\PROGRAMMIERUNG\dll\McDull.Windows.Forms.dll</HintPath>
     </Reference>
-    <Reference Include="Microsoft.Office.Interop.Outlook, Version=14.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c, processorArchitecture=MSIL">
+    <Reference Include="Microsoft.Office.Interop.Outlook, Version=15.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
       <EmbedInteropTypes>True</EmbedInteropTypes>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Microsoft.Office.Interop.Outlook.dll</HintPath>
     </Reference>
-    <Reference Include="NetSpell.SpellChecker">
+    <Reference Include="NetSpell.SpellChecker, Version=2.1.7.41329, Culture=neutral, PublicKeyToken=318b389f0db66e46">
-      <HintPath>..\..\..\dll\NetSpell.SpellChecker.DLL</HintPath>
+      <SpecificVersion>False</SpecificVersion>
-    </Reference>
+      <HintPath>F:\PROGRAMMIERUNG\dll\NetSpell.SpellChecker.DLL</HintPath>
-    <Reference Include="NumericBox">
-      <HintPath>..\..\..\dll\NumericBox.dll</HintPath>
-    </Reference>
-    <Reference Include="RichTextBoxEx">
-      <HintPath>..\..\..\dll\RichTextBoxEx.dll</HintPath>
     </Reference>
     <Reference Include="Spire.License, Version=1.4.0.46, Culture=neutral, PublicKeyToken=b1144360237c8b3f, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Spire.PDF\2023\Spire.License.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Spire.PDF\2023\Spire.License.dll</HintPath>
     </Reference>
-    <Reference Include="Spire.Pdf, Version=8.1.4.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
+    <Reference Include="Spire.Pdf, Version=8.10.2.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Spire.PDF\2023\Spire.Pdf.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Spire.PDF\2023\Spire.Pdf.dll</HintPath>
     </Reference>
-    <Reference Include="Spire.PdfViewer.Forms, Version=7.1.4.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
+    <Reference Include="Spire.PdfViewer.Forms, Version=7.10.3.0, Culture=neutral, PublicKeyToken=663f351905198cb3, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
-      <HintPath>..\..\..\dll\Spire.PDF\2023\Spire.PdfViewer.Forms.dll</HintPath>
+      <HintPath>F:\PROGRAMMIERUNG\dll\Spire.PDF\2023\Spire.PdfViewer.Forms.dll</HintPath>
     </Reference>
     <Reference Include="System" />
     <Reference Include="System.ComponentModel.DataAnnotations" />
@@ -1199,17 +1202,6 @@
   <ItemGroup>
     <None Include="Resources\aviso.ico" />
   </ItemGroup>
-  <ItemGroup>
-    <COMReference Include="Therefore.API">
-      <Guid>{37687F89-8603-4E42-A5F4-4FBAB011D5F3}</Guid>
-      <VersionMajor>3</VersionMajor>
-      <VersionMinor>0</VersionMinor>
-      <Lcid>0</Lcid>
-      <WrapperTool>tlbimp</WrapperTool>
-      <Isolated>False</Isolated>
-      <EmbedInteropTypes>True</EmbedInteropTypes>
-    </COMReference>
-  </ItemGroup>
   <ItemGroup>
     <None Include="Resources\docAllgemein.png" />
   </ItemGroup>