From f4fd461db011deec375fa952e319888e54d84374 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 15 Oct 2025 15:59:44 +0200 Subject: [PATCH] fakt. --- SDL/Fakturierung/cFakturierung.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index 42bd4f00..00afaa2a 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -1954,12 +1954,12 @@ Public Class cFakturierung Dim ret = cProgramFunctions.printRpt(rpt, PrinterName, False) - If printStbVdb Then + If printStbVdb AndAlso RECHNUNG.Firma_ID <> 1 Then If (RECHNUNG.[DruckDatumZeit] Is Nothing OrElse vbYes = MsgBox("Zollbeleg drucken?", vbYesNoCancel)) Then printSpedBuchAnhaenge(RECHNUNG, True, True) End If End If - If RECHNUNG.ANHAENGE.Count > 0 Then + If RECHNUNG.ANHAENGE.Count > 0 AndAlso RECHNUNG.Firma_ID <> 1 Then If (RECHNUNG.[DruckDatumZeit] Is Nothing OrElse vbYes = MsgBox("Anhänge drucken?", vbYesNoCancel)) Then printRGAnhaenge(RECHNUNG) End If