neu

2020-08-04 16:34:47 +02:00
parent 40295a2819
commit 89d8e0a3a8
95 changed files with 3655 additions and 697 deletions
--- a/SDL/kunden/frmKundenUebersichtZOLL.vb
+++ b/SDL/kunden/frmKundenUebersichtZOLL.vb
@@ -279,6 +279,7 @@ Public Class frmKundenUebersichtZOLL


        Dim KdFirma = VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale(KUNDE.FilialenNr)
+        If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" Then KdFirma = KdFirma.Replace("VERAG", "ATILLA")
        If (KdFirma <> VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA And Not VERAG_PROG_ALLGEMEIN.cAllgemein.isCLUSTER) And
            Not (KdFirma = "IMEX" And VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_IMEX", "AVISO")) Then