Merge branch 'ADMIN' of https://git.it.verag.ag/edv/ADMIN into ADMIN

DAKOSY_Worker/cDakosyFunftions.vb

@@ -126,7 +126,12 @@ Public Class cDakosyFunftions
                 Case "UNISPED"
                     Return "UNAT"
                 Case "AMBAR"
-                    Return "ATIL" '"VRAS" 'warum auch immer.. irgendwie wg der eigenen EORI von AMBAR..
+                    Select Case PROCEDURE ' Wenn AA über VERAG
+                        Case "AA"
+                            Return "VERG"
+                        Case Else
+                            Return "ATIL"  '"VRAS" 'warum auch immer.. irgendwie wg der eigenen EORI von AMBAR..
+                    End Select
                 Case Else : Return "VERG"
             End Select
         End If