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

ustva_erstattung, frmStartOpt.

Browse Source
This commit is contained in:
d.breimaier
2025-05-05 14:00:29 +02:00
parent e26276884f
commit 2780044fff
3 changed files with 362 additions and 241 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
initATLASAufschubkonten/frmStartOptions.vb
View File

@@ -5894,7 +5894,7 @@ weiter:
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("Die IDS-Rechnungen besitzen das Datum: " & abrDate.ToShortDateString & "!" & vbNewLine & "Soll das Datum auf geändert werden", vbYesNoCancel) Then
If Not vbYes = MsgBox("Die IDS-Rechnungen besitzen das Datum: " & abrDate.ToShortDateString & "!" & vbNewLine & "Soll das Datum geändert werden (im nächsten Schritt).", vbYesNoCancel) Then
Return 0
Else
Dim f As New frmDatumsabfrage("IDS-falsches Rechnungsdatum: " & abrDate.ToShortDateString, True)
@@ -5952,4 +5952,5 @@ weiter:
End Sub
End Class