This commit is contained in:
2025-12-23 08:47:21 +01:00
parent 88efed316e
commit 4081e59579

View File

@@ -4011,7 +4011,7 @@ Public Class frmSendungsdetailsNEU
Dim frmBeleg As New SDL.frmFremdbeleg(PERSONAL, PERSONAL.Mandant, PERSONAL.Niederlassung, B.Benutzer, B.BelegNr, B.BelegDat)
frmBeleg.ShowDialog(Me)
Case "L"
If B.storniert Then MsgBox("Der Beleg wurde bereits storiniert!") : Exit Sub
If B.storniert Then MsgBox("Der Beleg wurde bereits storniert!") : Exit Sub
Dim frmBeleg As New SDL.frmNacherfassungLeihgeld(PERSONAL, Nothing, PERSONAL.Mandant, PERSONAL.Niederlassung, B.Benutzer, B.BelegNr, B.BelegDat)
frmBeleg.ShowDialog(Me)
Case Else