This commit is contained in:
2025-12-11 09:31:20 +01:00
7 changed files with 1057 additions and 648 deletions

View File

@@ -7674,7 +7674,7 @@ Public Class frmSendungsdetailsNEU
For Each s As cSendungen In SENDUNG_LIST
'nur Betrag EUR
If s.tblSnd_Vorpapier = vorp Then
If s.tblSnd_Vorpapier = vorpT1 Then
If s.tblSnd_WarenwertWaehrung = "EUR" AndAlso s.tblSnd_Warenwert > 0 AndAlso s.FilialenNr = SENDUNG_LIST(CURRENT_INDEX).FilialenNr Then
calcWarenwerte += s.tblSnd_Warenwert
Else