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

Erlöskonto gesetzt.

Browse Source
This commit is contained in:
d.breimaier
2025-11-14 08:45:33 +01:00
parent df5caf4283
commit b151767a78
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/Classes/cRKSV.vb
View File

@@ -2427,7 +2427,7 @@ Public Class cRKSV
Dim Personenkonto As Integer = 0 Dim Personenkonto As Integer = 0
Dim kontenzaehler As Integer = 0 Dim kontenzaehler As Integer = 0
Dim Bestandskonto As Integer = 0 Dim Bestandskonto As Integer = Kassenkonto
Dim Erlöskonto As Integer = 0 Dim Erlöskonto As Integer = 0
Dim Sachkonto As Integer = 0 Dim Sachkonto As Integer = 0
@@ -2474,7 +2474,7 @@ Public Class cRKSV
Dim R3 As DataRow = dt_Verbuchungskonten.NewRow Dim R3 As DataRow = dt_Verbuchungskonten.NewRow
R3("Nr") = 1 R3("Nr") = 1
R3("Konto") = r.Konto R3("Konto") = r.Konto
Bestandskonto = r.Konto Erlöskonto = r.Konto
R3("Soll") = r.Soll R3("Soll") = r.Soll
R3("Haben") = r.Haben R3("Haben") = r.Haben
dt_Verbuchungskonten.Rows.Add(R3) dt_Verbuchungskonten.Rows.Add(R3)