From 9cfaa1fa01e6a39d0681a617fa2ef9840263438b Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Wed, 15 Jan 2025 16:13:59 +0100 Subject: [PATCH] abr --- SDL/Fakturierung/frmAbrechnungsMaske.vb | 1 + SDL/Fakturierung/usrCntlFaktAbrechnung.vb | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/SDL/Fakturierung/frmAbrechnungsMaske.vb b/SDL/Fakturierung/frmAbrechnungsMaske.vb index ae80d666..1164c227 100644 --- a/SDL/Fakturierung/frmAbrechnungsMaske.vb +++ b/SDL/Fakturierung/frmAbrechnungsMaske.vb @@ -62,6 +62,7 @@ Public Class frmAbrechnungsMaske MyComboBox2.Items.Clear() Select Case FirmaTmp + Case "VERAG" If VERAG_PROG_ALLGEMEIN.cAllgemein.ABTEILUNG = "MDM" Then Dim whereFirma = " AND FIRMENGRUPPE In ('VERAG360')" diff --git a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb index 10b1f7c4..9af6d736 100644 --- a/SDL/Fakturierung/usrCntlFaktAbrechnung.vb +++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.vb @@ -590,7 +590,7 @@ Public Class usrCntlFaktAbrechnung whereFirma = " AND FIRMENGRUPPE IN ('VERAG','IMEX','ATILLA','VERAGUNISPED','FRONTOFFICE','VERAGAG_DE') " End If pnlDocs.Visible = True - Case "VERA360" + Case "VERAG360" If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("FAKTURIERUNG_VERAGAG_DE", "SDL") Then whereFirma = " AND FIRMENGRUPPE IN ('VERAG360','VERAGAG_DE') " : pnlDocs.Visible = True Else