fakt, etc.

2025-10-23 13:47:45 +02:00
parent f5bd517e49
commit 1c54193ff3
5 changed files with 34 additions and 31 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cTrdInvoice.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cTrdInvoice.vb
@@ -498,8 +498,8 @@ Class TrdInvoice_FUNCTIONS

                        Dim Buchungstext As String = ROW("RK_Buchungstext")

-                        If Buchungstext <> "" AndAlso Buchungstext.Contains("Abrechnungsperiode von") Then
-                            Buchungstext = Buchungstext.Replace("Abrechnungsperiode von", "Zinsen")
+                        If Buchungstext <> "" AndAlso Buchungstext.Contains("Zahlungen vom") Then
+                            Buchungstext = Buchungstext.Replace("Zahlungen vom", "Zinsen")
                        End If

                        If TRD_INVOICE.SAVE Then