diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index ff2e380..022ff07 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -452,7 +452,7 @@ Public Class frmStartOptions
                 Dim f As New frmInfo(PARAM)
                 f.Show()
                 VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
-                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, True, False)
+                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, True, False,,,, "ftp")
                 closeMe()
 
             Case "AMBAR_DATEV_BUCHUNGEN"
@@ -460,7 +460,7 @@ Public Class frmStartOptions
                 Dim f As New frmInfo(PARAM)
                 f.Show()
                 VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
-                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, False, True)
+                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, False, True,,,, "ftp")
                 closeMe()
 
 
@@ -469,7 +469,7 @@ Public Class frmStartOptions
                 Dim f As New frmInfo(PARAM)
                 f.Show()
                 VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
-                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, True, True)
+                VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL("AMBAR", False, True, True,,,, "ftp")
                 closeMe()
 
             Case "ASFINAG_EXPORT"
@@ -3724,7 +3724,8 @@ Public Class frmStartOptions
 
             Case "buchungenAMBAR"
 
-                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24, CheckBox7.Checked, If(cbxSyskaWdh.Checked, txtSyskaWdhDateiname.Text, ""), True)
+                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24, CheckBox7.Checked, If(cbxSyskaWdh.Checked, txtSyskaWdhDateiname.Text, "AG"), True)
+                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24, CheckBox7.Checked, If(cbxSyskaWdh.Checked, txtSyskaWdhDateiname.Text, "CS"), True)
         End Select