edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fakt.

Browse Source
This commit is contained in:
d.breimaier
2025-10-15 15:59:44 +02:00
parent 70aee2d1b9
commit f4fd461db0
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/Fakturierung/cFakturierung.vb
View File

@@ -1954,12 +1954,12 @@ Public Class cFakturierung
Dim ret = cProgramFunctions.printRpt(rpt, PrinterName, False) 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 If (RECHNUNG.[DruckDatumZeit] Is Nothing OrElse vbYes = MsgBox("Zollbeleg drucken?", vbYesNoCancel)) Then
printSpedBuchAnhaenge(RECHNUNG, True, True) printSpedBuchAnhaenge(RECHNUNG, True, True)
End If End If
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 If (RECHNUNG.[DruckDatumZeit] Is Nothing OrElse vbYes = MsgBox("Anhänge drucken?", vbYesNoCancel)) Then
printRGAnhaenge(RECHNUNG) printRGAnhaenge(RECHNUNG)
End If End If