dy imort

2025-10-06 10:46:42 +02:00
parent 9ff3652a61
commit bc9247db6b
3 changed files with 100 additions and 21 deletions
--- a/DAKOSY_Worker/cZOLL_IMPORT.vb
+++ b/DAKOSY_Worker/cZOLL_IMPORT.vb
@@ -1491,10 +1491,10 @@ Public Class cZOLL_IMPORT



-    Function getAdresseFromEORI(EORI, EORI_NL, Firma)
+    Shared Function getAdresseFromEORI(EORI, EORI_NL, Firma)
        If EORI Is Nothing Then Return Nothing
        If If(EORI, "") <> "" Then
-            Dim kdNrTmp = KDSQL.getFMZOLLKdNrFromEORI(EORI, EORI_NL, Firma)
+            Dim kdNrTmp = SQL.getFMZOLLKdNrFromEORI(EORI, EORI_NL, Firma)
            If IsNumeric(kdNrTmp) Then
                Dim ADRESSE As New VERAG_PROG_ALLGEMEIN.cAdressen(kdNrTmp)
                Return ADRESSE