From 68f3cf77e9e87625c4e804be04aa71818b94cd2f Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Tue, 25 Jun 2024 10:04:26 +0200
Subject: [PATCH] Buchungen AMBAR -> VERAG CS

---
 initATLASAufschubkonten/frmStartOptions.vb | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index 7506885..d61383b 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -522,7 +522,14 @@ Public Class frmStartOptions
                 VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
                 Dim f As New frmInfo(PARAM)
                 f.Show()
-                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24,, "", True)
+                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24,, "", True, "AG")
+                closeMe()
+
+            Case "AMBAR_VERAG_BUCHUNGEN_CS"
+                VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+                Dim f As New frmInfo(PARAM)
+                f.Show()
+                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24,, "", True, "CS")
                 closeMe()
                 '------------------------------
             Case "AAS" 'Aviso Alert System