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

Ankunftsanzeige, IMEX Konten neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-01-09 10:49:23 +01:00
parent b9c526dea8
commit 23ce777c59
4 changed files with 33 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SDL/kassenbuch/frmKassenbuch.vb
View File

@@ -913,7 +913,7 @@ Public Class frmKassenbuch
End Select
If BELEGTmp IsNot Nothing Then
If cRKSV.getGJ(Now, PERSONAL.cRKSV_Kasse.rksv_firma) <> cRKSV.getGJ_FIRMA(BELEGTmp.BelegDat, PERSONAL.cRKSV_Kasse.rksv_firma) Then
If cRKSV.getGJ_FIRMA(Now, PERSONAL.cRKSV_Kasse.rksv_firma) <> cRKSV.getGJ_FIRMA(BELEGTmp.BelegDat, PERSONAL.cRKSV_Kasse.rksv_firma) Then
MsgBox("Das Geschäftsjahr im Beleg ist '" & cRKSV.getGJ_FIRMA(BELEGTmp.BelegDat, PERSONAL.cRKSV_Kasse.rksv_firma) & "', es können nur Belege im laufenden Geschäftsjahr gebucht werden. Aktion wird abgebrochen!")
Exit Sub
End If