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

tradeInvoice, Kundenubersicht, fakt, etc.

Browse Source
This commit is contained in:
d.breimaier
2025-10-24 11:23:37 +02:00
parent 1c54193ff3
commit 0781684cb0
9 changed files with 65 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
SDL/Fakturierung/cFakturierung.vb
View File

@@ -316,9 +316,12 @@ Public Class cFakturierung
If RECHNUNG_KD.Zahlungsziel IsNot Nothing AndAlso IsNumeric(RECHNUNG_KD.Zahlungsziel) Then
ZZTage = RECHNUNG_KD.Zahlungsziel
If ZZTage > 14 AndAlso RECHNUNG.Firma_ID = 19 AndAlso RECHNUNG.FilialenNr = 8001 Then
ZZTage = 14
End If
End If
Select Case RECHNUNG.[BelegartenNr]
Select Case RECHNUNG.[BelegartenNr]
Case 70 'RECHNUNG
Dim VK = VERAG_PROG_ALLGEMEIN.cVorauskasse.LOADByFilialeAbfNr(RECHNUNG.FilialenNr, RECHNUNG.AbfertigungsNr)
@@ -2329,7 +2332,6 @@ Public Class cFakturierung
rpt.lblSteuerfreiUeberschrift.Text = "Zinsen p.a."
rpt.lblSteuerpflichtigUeberschrift.Text = "Zahlungsbetrag"
rpt.lbl_onlyZR_ReDatUeberschrift.Visible = True
rpt.lbl_onlyZR_FaelligUeberschrift.Visible = True
rpt.lbl_onlyZR_VZUeberschrift.Visible = True