This commit is contained in:
2025-11-14 11:31:40 +01:00
parent ea91263bc5
commit b53a9957ee

View File

@@ -2790,9 +2790,16 @@ Public Class cRKSV
createOP(MANDANT, BETRAG, beleg.BelegNr, beleg.BelegDat.ToShortDateString, beleg.BelegNr, Buchungstext, BUCHUNGSBETRAG, "EUR", Personenkonto, Forderungskonto, i_op_refid, Buchungstyp, c_sprache, c_zahlziel, dec_skonto, SkontoDatum.ToShortDateString, Nettodatum.ToShortDateString, c_ustidnr) createOP(MANDANT, BETRAG, beleg.BelegNr, beleg.BelegDat.ToShortDateString, beleg.BelegNr, Buchungstext, BUCHUNGSBETRAG, "EUR", Personenkonto, Forderungskonto, i_op_refid, Buchungstyp, c_sprache, c_zahlziel, dec_skonto, SkontoDatum.ToShortDateString, Nettodatum.ToShortDateString, c_ustidnr)
createOPVorgang(MANDANT, TYP, BETRAG, JAHR, PERIODE, i_beleg_refid, beleg.BelegDat.ToShortDateString, Buchungstext, Personenkonto, opvorgangsbetrag, i_op_refid, dt_creationDate, Sachkonto, "AUTO") createOPVorgang(MANDANT, TYP, BETRAG, JAHR, PERIODE, i_beleg_refid, beleg.BelegDat.ToShortDateString, Buchungstext, Personenkonto, opvorgangsbetrag, i_op_refid, dt_creationDate, Sachkonto, "AUTO")
If checkifgebucht(MANDANT, beleg.BelegNr, Buchungstext) Then
MsgBox("GEBUCHT!")
Else
MsgBox("NICHT GEBUCHT!")
End If
End If End If
End If End If