MDM, Sendungsanhang, MDMAntraege

This commit is contained in:
2024-10-21 11:46:46 +02:00
parent 068255be9a
commit 207a3e68d9
5 changed files with 20 additions and 8 deletions

View File

@@ -1019,7 +1019,7 @@ Public Class cMSEAPI
If r("url") <> "" AndAlso r("name") <> "" AndAlso r("name").contains("VAT") Then 'only VAT-Invoices
Dim inv As New cMSEInvoices(r("name"), r("invoice_id"))
If IsDBNull(inv.daId) Then 'verhindert unnötige Downloads
If inv.daId Is Nothing Then 'verhindert unnötige Downloads
Dim filepath = VERAG_PROG_ALLGEMEIN.cFormularManager.getPDFViaSpirePDF_FromURLStream(r("url"), r("name"), PDFRECHNUNGENPFAD, False)
If filepath <> "" AndAlso uploadToDs Then
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("MDM", "MDM_DATEN", "MSE", Now.Year, Now.ToString("yyyyMMdd"), r("name"))