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

Fakt, MDM-Datenverarb, Mahnlauf, etc.

Browse Source
This commit is contained in:
d.breimaier
2025-04-17 12:08:53 +02:00
parent cf3f634ff7
commit 7916e25f05
11 changed files with 209 additions and 80 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SDL/mdm/frmMDMDatenverarbetiung.vb
View File

@@ -4831,7 +4831,7 @@ RabattBerechnen:
Dim checkDate As Boolean = False
If Not (abrDate.Day = 15 Or abrDate.Day = 30 Or abrDate.Day = 31 Or (abrDate.Month = 2 And abrDate.Day = 28)) Then
If Not vbYes = MsgBox("ACHTUNG, immer als Abrechnungsdatum den 15. bzw. den letzten Tag des Monats angeben!" & vbNewLine & "Dies kann zu Fehlern bei der Verrechnung führen!" & vbNewLine & "Möchten Sie wirklich mit dem " & abrDate.ToShortDateString & " fortfahren?", vbYesNoCancel) Then
If Not vbYes = MsgBox("ACHTUNG, immer als Anhangsdatum den 15. bzw. den letzten Tag des Monats angeben!" & vbNewLine & "Dies kann zu Fehlern bei der Verrechnung führen!" & vbNewLine & "Möchten Sie wirklich mit dem " & abrDate.ToShortDateString & " fortfahren?", vbYesNoCancel) Then
checkDate = False
Else
checkDate = True