From e0d3b2bf00efef323fe46815d0d7c35328cfaf4e Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 13 Feb 2023 15:20:39 +0100 Subject: [PATCH 1/5] Datev-Schnittstelle im RoutineManager eingebaut. --- UID/My Project/AssemblyInfo.vb | 4 +- .../frmStartOptions.Designer.vb | 134 +++++++++++++++--- initATLASAufschubkonten/frmStartOptions.vb | 33 +++++ 3 files changed, 146 insertions(+), 25 deletions(-) diff --git a/UID/My Project/AssemblyInfo.vb b/UID/My Project/AssemblyInfo.vb index 4894b6a..665ecc1 100644 --- a/UID/My Project/AssemblyInfo.vb +++ b/UID/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index 8950c42..659e6b8 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -59,6 +59,8 @@ Partial Class frmStartOptions Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.tbcntr = New System.Windows.Forms.TabControl() Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.LinkLabel38 = New System.Windows.Forms.LinkLabel() + Me.PictureBox17 = New System.Windows.Forms.PictureBox() Me.LinkLabel37 = New System.Windows.Forms.LinkLabel() Me.PictureBox16 = New System.Windows.Forms.PictureBox() Me.Button15 = New System.Windows.Forms.Button() @@ -160,12 +162,17 @@ Partial Class frmStartOptions Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.LinkLabel38 = New System.Windows.Forms.LinkLabel() - Me.PictureBox17 = New System.Windows.Forms.PictureBox() + Me.cbxOpenDatev = New System.Windows.Forms.CheckBox() + Me.cbxBuchungenDatev = New System.Windows.Forms.CheckBox() + Me.cbxKundenDatev = New System.Windows.Forms.CheckBox() + Me.Button17 = New System.Windows.Forms.Button() + Me.Label22 = New System.Windows.Forms.Label() + Me.cbxTestDatev = New System.Windows.Forms.CheckBox() Me.pnl.SuspendLayout() CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit() Me.tbcntr.SuspendLayout() Me.TabPage1.SuspendLayout() + CType(Me.PictureBox17, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox16, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.picC0008, System.ComponentModel.ISupportInitialize).BeginInit() @@ -186,13 +193,18 @@ Partial Class frmStartOptions CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.PictureBox17, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnl.Controls.Add(Me.cbxTestDatev) + Me.pnl.Controls.Add(Me.cbxOpenDatev) + Me.pnl.Controls.Add(Me.cbxBuchungenDatev) + Me.pnl.Controls.Add(Me.cbxKundenDatev) + Me.pnl.Controls.Add(Me.Button17) + Me.pnl.Controls.Add(Me.Label22) Me.pnl.Controls.Add(Me.Label21) Me.pnl.Controls.Add(Me.Button16) Me.pnl.Controls.Add(Me.Button14) @@ -555,7 +567,7 @@ Partial Class frmStartOptions Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button5.Location = New System.Drawing.Point(15, 340) + Me.Button5.Location = New System.Drawing.Point(559, 155) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(211, 24) Me.Button5.TabIndex = 46 @@ -713,6 +725,28 @@ Partial Class frmStartOptions Me.TabPage1.Text = "Zollverfahren" Me.TabPage1.UseVisualStyleBackColor = True ' + 'LinkLabel38 + ' + Me.LinkLabel38.AutoSize = True + Me.LinkLabel38.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.LinkLabel38.Location = New System.Drawing.Point(475, 125) + Me.LinkLabel38.Name = "LinkLabel38" + Me.LinkLabel38.Size = New System.Drawing.Size(141, 13) + Me.LinkLabel38.TabIndex = 59 + Me.LinkLabel38.TabStop = True + Me.LinkLabel38.Text = "I0610 - Zust. Zollstelle (AES)" + ' + 'PictureBox17 + ' + Me.PictureBox17.BackgroundImage = CType(resources.GetObject("PictureBox17.BackgroundImage"), System.Drawing.Image) + Me.PictureBox17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox17.Location = New System.Drawing.Point(630, 120) + Me.PictureBox17.Name = "PictureBox17" + Me.PictureBox17.Size = New System.Drawing.Size(18, 18) + Me.PictureBox17.TabIndex = 60 + Me.PictureBox17.TabStop = False + Me.PictureBox17.Visible = False + ' 'LinkLabel37 ' Me.LinkLabel37.AutoSize = True @@ -1946,27 +1980,75 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' - 'LinkLabel38 + 'cbxOpenDatev ' - Me.LinkLabel38.AutoSize = True - Me.LinkLabel38.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel38.Location = New System.Drawing.Point(475, 125) - Me.LinkLabel38.Name = "LinkLabel38" - Me.LinkLabel38.Size = New System.Drawing.Size(141, 13) - Me.LinkLabel38.TabIndex = 59 - Me.LinkLabel38.TabStop = True - Me.LinkLabel38.Text = "I0610 - Zust. Zollstelle (AES)" + Me.cbxOpenDatev.AutoSize = True + Me.cbxOpenDatev.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxOpenDatev.Location = New System.Drawing.Point(175, 345) + Me.cbxOpenDatev.Name = "cbxOpenDatev" + Me.cbxOpenDatev.Size = New System.Drawing.Size(56, 17) + Me.cbxOpenDatev.TabIndex = 74 + Me.cbxOpenDatev.Text = "öffnen" + Me.cbxOpenDatev.UseVisualStyleBackColor = True ' - 'PictureBox17 + 'cbxBuchungenDatev ' - Me.PictureBox17.BackgroundImage = CType(resources.GetObject("PictureBox17.BackgroundImage"), System.Drawing.Image) - Me.PictureBox17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox17.Location = New System.Drawing.Point(630, 120) - Me.PictureBox17.Name = "PictureBox17" - Me.PictureBox17.Size = New System.Drawing.Size(18, 18) - Me.PictureBox17.TabIndex = 60 - Me.PictureBox17.TabStop = False - Me.PictureBox17.Visible = False + Me.cbxBuchungenDatev.AutoSize = True + Me.cbxBuchungenDatev.Checked = True + Me.cbxBuchungenDatev.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxBuchungenDatev.Location = New System.Drawing.Point(89, 345) + Me.cbxBuchungenDatev.Name = "cbxBuchungenDatev" + Me.cbxBuchungenDatev.Size = New System.Drawing.Size(81, 17) + Me.cbxBuchungenDatev.TabIndex = 73 + Me.cbxBuchungenDatev.Text = "Buchungen" + Me.cbxBuchungenDatev.UseVisualStyleBackColor = True + ' + 'cbxKundenDatev + ' + Me.cbxKundenDatev.AutoSize = True + Me.cbxKundenDatev.Checked = True + Me.cbxKundenDatev.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxKundenDatev.Location = New System.Drawing.Point(20, 345) + Me.cbxKundenDatev.Name = "cbxKundenDatev" + Me.cbxKundenDatev.Size = New System.Drawing.Size(63, 17) + Me.cbxKundenDatev.TabIndex = 72 + Me.cbxKundenDatev.Text = "Kunden" + Me.cbxKundenDatev.UseVisualStyleBackColor = True + ' + 'Button17 + ' + Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button17.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Button17.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button17.Location = New System.Drawing.Point(20, 318) + Me.Button17.Name = "Button17" + Me.Button17.Size = New System.Drawing.Size(211, 24) + Me.Button17.TabIndex = 71 + Me.Button17.Text = "Kunden / Buchungen --> DATEV" + Me.Button17.UseVisualStyleBackColor = True + ' + 'Label22 + ' + Me.Label22.AutoSize = True + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(17, 302) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(151, 13) + Me.Label22.TabIndex = 70 + Me.Label22.Text = "Routine Manager AMBAR" + ' + 'cbxTestDatev + ' + Me.cbxTestDatev.AutoSize = True + Me.cbxTestDatev.Checked = True + Me.cbxTestDatev.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxTestDatev.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxTestDatev.Location = New System.Drawing.Point(20, 368) + Me.cbxTestDatev.Name = "cbxTestDatev" + Me.cbxTestDatev.Size = New System.Drawing.Size(79, 17) + Me.cbxTestDatev.TabIndex = 75 + Me.cbxTestDatev.Text = "Testsystem" + Me.cbxTestDatev.UseVisualStyleBackColor = True ' 'frmStartOptions ' @@ -1987,6 +2069,7 @@ Partial Class frmStartOptions Me.tbcntr.ResumeLayout(False) Me.TabPage1.ResumeLayout(False) Me.TabPage1.PerformLayout() + CType(Me.PictureBox17, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox16, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.picC0008, System.ComponentModel.ISupportInitialize).EndInit() @@ -2009,7 +2092,6 @@ Partial Class frmStartOptions CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.PictureBox17, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub @@ -2151,4 +2233,10 @@ Partial Class frmStartOptions Friend WithEvents txtGJ_UNISPED As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents LinkLabel38 As LinkLabel Friend WithEvents PictureBox17 As PictureBox + Friend WithEvents cbxTestDatev As CheckBox + Friend WithEvents cbxOpenDatev As CheckBox + Friend WithEvents cbxBuchungenDatev As CheckBox + Friend WithEvents cbxKundenDatev As CheckBox + Friend WithEvents Button17 As Button + Friend WithEvents Label22 As Label End Class diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index febb19a..6c22747 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -385,6 +385,34 @@ Public Class frmStartOptions VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False VERAG_PROG_ALLGEMEIN.cLDV_Interface.copyLDV_BMD() closeMe() + + '-----------AMBAR------------------- + Case "AMBAR_DATEV_DEBITOREN" + + Dim f As New frmInfo(PARAM) + f.Show() + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(False, True, False) + closeMe() + + Case "AMBAR_DATEV_BUCHUNGEN" + + Dim f As New frmInfo(PARAM) + f.Show() + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(False, False, True) + closeMe() + + + Case "AMBAR_DATEV_ALL" + + Dim f As New frmInfo(PARAM) + f.Show() + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(False, True, True) + closeMe() + + '------------------------------ Case Else 'Nur bei manuellem Start wird der fehler ausgegeben @@ -3252,4 +3280,9 @@ Public Class frmStartOptions Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodBase.GetCurrentMethod.Name) : End Try Me.Cursor = Cursors.Default End Sub + + Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxTestDatev.Checked + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxOpenDatev.Checked, cbxKundenDatev.Checked, cbxBuchungenDatev.Checked) + End Sub End Class \ No newline at end of file From bf41efeb3ce08e93f01e8c250bc12608711754a4 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 13 Feb 2023 15:27:51 +0100 Subject: [PATCH 2/5] Datev Schnittstelle in RoutineManager --- .../frmStartOptions.Designer.vb | 146 ++++++++++++++---- initATLASAufschubkonten/frmStartOptions.vb | 6 + 2 files changed, 123 insertions(+), 29 deletions(-) diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index 85f149e..60f8cda 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -130,6 +130,9 @@ Partial Class frmStartOptions Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txtVRGOut_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.TabPage3 = New System.Windows.Forms.TabPage() + Me.LinkLabel39 = New System.Windows.Forms.LinkLabel() + Me.LinkLabel40 = New System.Windows.Forms.LinkLabel() + Me.Label22 = New System.Windows.Forms.Label() Me.LinkLabel34 = New System.Windows.Forms.LinkLabel() Me.LinkLabel35 = New System.Windows.Forms.LinkLabel() Me.Label17 = New System.Windows.Forms.Label() @@ -162,9 +165,12 @@ Partial Class frmStartOptions Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.LinkLabel39 = New System.Windows.Forms.LinkLabel() - Me.LinkLabel40 = New System.Windows.Forms.LinkLabel() - Me.Label22 = New System.Windows.Forms.Label() + Me.cbxDatevOpen = New System.Windows.Forms.CheckBox() + Me.cbxDatenBuchungen = New System.Windows.Forms.CheckBox() + Me.cbxDatevDebitoren = New System.Windows.Forms.CheckBox() + Me.Button17 = New System.Windows.Forms.Button() + Me.Label23 = New System.Windows.Forms.Label() + Me.cbxDatevTestsystem = New System.Windows.Forms.CheckBox() Me.pnl.SuspendLayout() CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit() Me.tbcntr.SuspendLayout() @@ -196,6 +202,12 @@ Partial Class frmStartOptions ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnl.Controls.Add(Me.cbxDatevTestsystem) + Me.pnl.Controls.Add(Me.cbxDatevOpen) + Me.pnl.Controls.Add(Me.cbxDatenBuchungen) + Me.pnl.Controls.Add(Me.cbxDatevDebitoren) + Me.pnl.Controls.Add(Me.Button17) + Me.pnl.Controls.Add(Me.Label23) Me.pnl.Controls.Add(Me.Label21) Me.pnl.Controls.Add(Me.Button16) Me.pnl.Controls.Add(Me.Button14) @@ -558,7 +570,7 @@ Partial Class frmStartOptions Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button5.Location = New System.Drawing.Point(15, 340) + Me.Button5.Location = New System.Drawing.Point(559, 151) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(211, 24) Me.Button5.TabIndex = 46 @@ -1596,6 +1608,37 @@ Partial Class frmStartOptions Me.TabPage3.Text = "Partner-Systeme" Me.TabPage3.UseVisualStyleBackColor = True ' + 'LinkLabel39 + ' + Me.LinkLabel39.AutoSize = True + Me.LinkLabel39.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.LinkLabel39.Location = New System.Drawing.Point(11, 262) + Me.LinkLabel39.Name = "LinkLabel39" + Me.LinkLabel39.Size = New System.Drawing.Size(180, 13) + Me.LinkLabel39.TabIndex = 32 + Me.LinkLabel39.TabStop = True + Me.LinkLabel39.Text = "Eingangsnachrichten abrufen PROD" + ' + 'LinkLabel40 + ' + Me.LinkLabel40.AutoSize = True + Me.LinkLabel40.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.LinkLabel40.Location = New System.Drawing.Point(11, 237) + Me.LinkLabel40.Name = "LinkLabel40" + Me.LinkLabel40.Size = New System.Drawing.Size(177, 13) + Me.LinkLabel40.TabIndex = 31 + Me.LinkLabel40.TabStop = True + Me.LinkLabel40.Text = "Eingangsnachrichten abrufen TEST" + ' + 'Label22 + ' + Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label22.Location = New System.Drawing.Point(11, 210) + Me.Label22.Name = "Label22" + Me.Label22.Size = New System.Drawing.Size(296, 16) + Me.Label22.TabIndex = 30 + Me.Label22.Text = "ATEZ Nachrichtenverarbeitung (NCTS TR):" + ' 'LinkLabel34 ' Me.LinkLabel34.AutoSize = True @@ -1974,36 +2017,75 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' - 'LinkLabel39 + 'cbxDatevOpen ' - Me.LinkLabel39.AutoSize = True - Me.LinkLabel39.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel39.Location = New System.Drawing.Point(11, 262) - Me.LinkLabel39.Name = "LinkLabel39" - Me.LinkLabel39.Size = New System.Drawing.Size(180, 13) - Me.LinkLabel39.TabIndex = 32 - Me.LinkLabel39.TabStop = True - Me.LinkLabel39.Text = "Eingangsnachrichten abrufen PROD" + Me.cbxDatevOpen.AutoSize = True + Me.cbxDatevOpen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxDatevOpen.Location = New System.Drawing.Point(175, 345) + Me.cbxDatevOpen.Name = "cbxDatevOpen" + Me.cbxDatevOpen.Size = New System.Drawing.Size(56, 17) + Me.cbxDatevOpen.TabIndex = 74 + Me.cbxDatevOpen.Text = "öffnen" + Me.cbxDatevOpen.UseVisualStyleBackColor = True ' - 'LinkLabel40 + 'cbxDatenBuchungen ' - Me.LinkLabel40.AutoSize = True - Me.LinkLabel40.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel40.Location = New System.Drawing.Point(11, 237) - Me.LinkLabel40.Name = "LinkLabel40" - Me.LinkLabel40.Size = New System.Drawing.Size(177, 13) - Me.LinkLabel40.TabIndex = 31 - Me.LinkLabel40.TabStop = True - Me.LinkLabel40.Text = "Eingangsnachrichten abrufen TEST" + Me.cbxDatenBuchungen.AutoSize = True + Me.cbxDatenBuchungen.Checked = True + Me.cbxDatenBuchungen.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatenBuchungen.Location = New System.Drawing.Point(89, 345) + Me.cbxDatenBuchungen.Name = "cbxDatenBuchungen" + Me.cbxDatenBuchungen.Size = New System.Drawing.Size(81, 17) + Me.cbxDatenBuchungen.TabIndex = 73 + Me.cbxDatenBuchungen.Text = "Buchungen" + Me.cbxDatenBuchungen.UseVisualStyleBackColor = True ' - 'Label22 + 'cbxDatevDebitoren ' - Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label22.Location = New System.Drawing.Point(11, 210) - Me.Label22.Name = "Label22" - Me.Label22.Size = New System.Drawing.Size(296, 16) - Me.Label22.TabIndex = 30 - Me.Label22.Text = "ATEZ Nachrichtenverarbeitung (NCTS TR):" + Me.cbxDatevDebitoren.AutoSize = True + Me.cbxDatevDebitoren.Checked = True + Me.cbxDatevDebitoren.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatevDebitoren.Location = New System.Drawing.Point(20, 345) + Me.cbxDatevDebitoren.Name = "cbxDatevDebitoren" + Me.cbxDatevDebitoren.Size = New System.Drawing.Size(63, 17) + Me.cbxDatevDebitoren.TabIndex = 72 + Me.cbxDatevDebitoren.Text = "Kunden" + Me.cbxDatevDebitoren.UseVisualStyleBackColor = True + ' + 'Button17 + ' + Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button17.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Button17.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button17.Location = New System.Drawing.Point(20, 318) + Me.Button17.Name = "Button17" + Me.Button17.Size = New System.Drawing.Size(211, 24) + Me.Button17.TabIndex = 71 + Me.Button17.Text = "Kunden / Buchungen --> Datev" + Me.Button17.UseVisualStyleBackColor = True + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label23.Location = New System.Drawing.Point(17, 302) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(142, 13) + Me.Label23.TabIndex = 70 + Me.Label23.Text = "Routine Manager Datev" + ' + 'cbxDatevTestsystem + ' + Me.cbxDatevTestsystem.AutoSize = True + Me.cbxDatevTestsystem.Checked = True + Me.cbxDatevTestsystem.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatevTestsystem.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxDatevTestsystem.Location = New System.Drawing.Point(20, 368) + Me.cbxDatevTestsystem.Name = "cbxDatevTestsystem" + Me.cbxDatevTestsystem.Size = New System.Drawing.Size(79, 17) + Me.cbxDatevTestsystem.TabIndex = 75 + Me.cbxDatevTestsystem.Text = "Testsystem" + Me.cbxDatevTestsystem.UseVisualStyleBackColor = True ' 'frmStartOptions ' @@ -2191,4 +2273,10 @@ Partial Class frmStartOptions Friend WithEvents LinkLabel39 As LinkLabel Friend WithEvents LinkLabel40 As LinkLabel Friend WithEvents Label22 As Label + Friend WithEvents cbxDatevTestsystem As CheckBox + Friend WithEvents cbxDatevOpen As CheckBox + Friend WithEvents cbxDatenBuchungen As CheckBox + Friend WithEvents cbxDatevDebitoren As CheckBox + Friend WithEvents Button17 As Button + Friend WithEvents Label23 As Label End Class diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index 027babf..20d14e9 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -3296,4 +3296,10 @@ Public Class frmStartOptions f.ShowDialog() Me.Visible = True End Sub + + Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxDatevTestsystem.Checked + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatenBuchungen.Checked) + End Sub + End Class \ No newline at end of file From 92dc287c39b03896a42302e4cfebf001fc57e005 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 13 Feb 2023 16:16:25 +0100 Subject: [PATCH 3/5] Commit --- UID/ADMIN.vbproj | 8 +- .../frmStartOptions.Designer.vb | 147 ++++-------------- 2 files changed, 30 insertions(+), 125 deletions(-) diff --git a/UID/ADMIN.vbproj b/UID/ADMIN.vbproj index 1811726..630130c 100644 --- a/UID/ADMIN.vbproj +++ b/UID/ADMIN.vbproj @@ -87,13 +87,13 @@ False C:\Program Files (x86)\GrapeCity\ActiveReports 15\Tools\BouncyCastle.Crypto.dll + + False + ..\..\..\dll\closedxml\ClosedXML.dll + ..\..\..\dll\closedxml\ClosedXML_095.dll - - False - ..\packages\DocumentFormat.OpenXml.2.7.2\lib\net46\DocumentFormat.OpenXml.dll - ..\..\..\dll\FastColoredTextBox.dll diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index 60f8cda..efc58a9 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -130,9 +130,6 @@ Partial Class frmStartOptions Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txtVRGOut_BezugsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.TabPage3 = New System.Windows.Forms.TabPage() - Me.LinkLabel39 = New System.Windows.Forms.LinkLabel() - Me.LinkLabel40 = New System.Windows.Forms.LinkLabel() - Me.Label22 = New System.Windows.Forms.Label() Me.LinkLabel34 = New System.Windows.Forms.LinkLabel() Me.LinkLabel35 = New System.Windows.Forms.LinkLabel() Me.Label17 = New System.Windows.Forms.Label() @@ -165,12 +162,8 @@ Partial Class frmStartOptions Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.cbxDatevOpen = New System.Windows.Forms.CheckBox() - Me.cbxDatenBuchungen = New System.Windows.Forms.CheckBox() - Me.cbxDatevDebitoren = New System.Windows.Forms.CheckBox() - Me.Button17 = New System.Windows.Forms.Button() - Me.Label23 = New System.Windows.Forms.Label() - Me.cbxDatevTestsystem = New System.Windows.Forms.CheckBox() + Me.LinkLabel38 = New System.Windows.Forms.LinkLabel() + Me.PictureBox17 = New System.Windows.Forms.PictureBox() Me.pnl.SuspendLayout() CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit() Me.tbcntr.SuspendLayout() @@ -202,12 +195,12 @@ Partial Class frmStartOptions ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.pnl.Controls.Add(Me.cbxDatevTestsystem) - Me.pnl.Controls.Add(Me.cbxDatevOpen) - Me.pnl.Controls.Add(Me.cbxDatenBuchungen) - Me.pnl.Controls.Add(Me.cbxDatevDebitoren) + Me.pnl.Controls.Add(Me.cbxTestDatev) + Me.pnl.Controls.Add(Me.cbxOpenDatev) + Me.pnl.Controls.Add(Me.cbxBuchungenDatev) + Me.pnl.Controls.Add(Me.cbxKundenDatev) Me.pnl.Controls.Add(Me.Button17) - Me.pnl.Controls.Add(Me.Label23) + Me.pnl.Controls.Add(Me.Label22) Me.pnl.Controls.Add(Me.Label21) Me.pnl.Controls.Add(Me.Button16) Me.pnl.Controls.Add(Me.Button14) @@ -570,7 +563,7 @@ Partial Class frmStartOptions Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button5.Location = New System.Drawing.Point(559, 151) + Me.Button5.Location = New System.Drawing.Point(559, 155) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(211, 24) Me.Button5.TabIndex = 46 @@ -1608,37 +1601,6 @@ Partial Class frmStartOptions Me.TabPage3.Text = "Partner-Systeme" Me.TabPage3.UseVisualStyleBackColor = True ' - 'LinkLabel39 - ' - Me.LinkLabel39.AutoSize = True - Me.LinkLabel39.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel39.Location = New System.Drawing.Point(11, 262) - Me.LinkLabel39.Name = "LinkLabel39" - Me.LinkLabel39.Size = New System.Drawing.Size(180, 13) - Me.LinkLabel39.TabIndex = 32 - Me.LinkLabel39.TabStop = True - Me.LinkLabel39.Text = "Eingangsnachrichten abrufen PROD" - ' - 'LinkLabel40 - ' - Me.LinkLabel40.AutoSize = True - Me.LinkLabel40.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel40.Location = New System.Drawing.Point(11, 237) - Me.LinkLabel40.Name = "LinkLabel40" - Me.LinkLabel40.Size = New System.Drawing.Size(177, 13) - Me.LinkLabel40.TabIndex = 31 - Me.LinkLabel40.TabStop = True - Me.LinkLabel40.Text = "Eingangsnachrichten abrufen TEST" - ' - 'Label22 - ' - Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label22.Location = New System.Drawing.Point(11, 210) - Me.Label22.Name = "Label22" - Me.Label22.Size = New System.Drawing.Size(296, 16) - Me.Label22.TabIndex = 30 - Me.Label22.Text = "ATEZ Nachrichtenverarbeitung (NCTS TR):" - ' 'LinkLabel34 ' Me.LinkLabel34.AutoSize = True @@ -2017,75 +1979,27 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' - 'cbxDatevOpen + 'LinkLabel38 ' - Me.cbxDatevOpen.AutoSize = True - Me.cbxDatevOpen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxDatevOpen.Location = New System.Drawing.Point(175, 345) - Me.cbxDatevOpen.Name = "cbxDatevOpen" - Me.cbxDatevOpen.Size = New System.Drawing.Size(56, 17) - Me.cbxDatevOpen.TabIndex = 74 - Me.cbxDatevOpen.Text = "öffnen" - Me.cbxDatevOpen.UseVisualStyleBackColor = True + Me.LinkLabel38.AutoSize = True + Me.LinkLabel38.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.LinkLabel38.Location = New System.Drawing.Point(475, 125) + Me.LinkLabel38.Name = "LinkLabel38" + Me.LinkLabel38.Size = New System.Drawing.Size(141, 13) + Me.LinkLabel38.TabIndex = 59 + Me.LinkLabel38.TabStop = True + Me.LinkLabel38.Text = "I0610 - Zust. Zollstelle (AES)" ' - 'cbxDatenBuchungen + 'PictureBox17 ' - Me.cbxDatenBuchungen.AutoSize = True - Me.cbxDatenBuchungen.Checked = True - Me.cbxDatenBuchungen.CheckState = System.Windows.Forms.CheckState.Checked - Me.cbxDatenBuchungen.Location = New System.Drawing.Point(89, 345) - Me.cbxDatenBuchungen.Name = "cbxDatenBuchungen" - Me.cbxDatenBuchungen.Size = New System.Drawing.Size(81, 17) - Me.cbxDatenBuchungen.TabIndex = 73 - Me.cbxDatenBuchungen.Text = "Buchungen" - Me.cbxDatenBuchungen.UseVisualStyleBackColor = True - ' - 'cbxDatevDebitoren - ' - Me.cbxDatevDebitoren.AutoSize = True - Me.cbxDatevDebitoren.Checked = True - Me.cbxDatevDebitoren.CheckState = System.Windows.Forms.CheckState.Checked - Me.cbxDatevDebitoren.Location = New System.Drawing.Point(20, 345) - Me.cbxDatevDebitoren.Name = "cbxDatevDebitoren" - Me.cbxDatevDebitoren.Size = New System.Drawing.Size(63, 17) - Me.cbxDatevDebitoren.TabIndex = 72 - Me.cbxDatevDebitoren.Text = "Kunden" - Me.cbxDatevDebitoren.UseVisualStyleBackColor = True - ' - 'Button17 - ' - Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button17.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.Button17.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button17.Location = New System.Drawing.Point(20, 318) - Me.Button17.Name = "Button17" - Me.Button17.Size = New System.Drawing.Size(211, 24) - Me.Button17.TabIndex = 71 - Me.Button17.Text = "Kunden / Buchungen --> Datev" - Me.Button17.UseVisualStyleBackColor = True - ' - 'Label23 - ' - Me.Label23.AutoSize = True - Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label23.Location = New System.Drawing.Point(17, 302) - Me.Label23.Name = "Label23" - Me.Label23.Size = New System.Drawing.Size(142, 13) - Me.Label23.TabIndex = 70 - Me.Label23.Text = "Routine Manager Datev" - ' - 'cbxDatevTestsystem - ' - Me.cbxDatevTestsystem.AutoSize = True - Me.cbxDatevTestsystem.Checked = True - Me.cbxDatevTestsystem.CheckState = System.Windows.Forms.CheckState.Checked - Me.cbxDatevTestsystem.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cbxDatevTestsystem.Location = New System.Drawing.Point(20, 368) - Me.cbxDatevTestsystem.Name = "cbxDatevTestsystem" - Me.cbxDatevTestsystem.Size = New System.Drawing.Size(79, 17) - Me.cbxDatevTestsystem.TabIndex = 75 - Me.cbxDatevTestsystem.Text = "Testsystem" - Me.cbxDatevTestsystem.UseVisualStyleBackColor = True + Me.PictureBox17.BackgroundImage = CType(resources.GetObject("PictureBox17.BackgroundImage"), System.Drawing.Image) + Me.PictureBox17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox17.Location = New System.Drawing.Point(630, 120) + Me.PictureBox17.Name = "PictureBox17" + Me.PictureBox17.Size = New System.Drawing.Size(18, 18) + Me.PictureBox17.TabIndex = 60 + Me.PictureBox17.TabStop = False + Me.PictureBox17.Visible = False ' 'frmStartOptions ' @@ -2270,13 +2184,4 @@ Partial Class frmStartOptions Friend WithEvents txtGJ_UNISPED As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents LinkLabel38 As LinkLabel Friend WithEvents PictureBox17 As PictureBox - Friend WithEvents LinkLabel39 As LinkLabel - Friend WithEvents LinkLabel40 As LinkLabel - Friend WithEvents Label22 As Label - Friend WithEvents cbxDatevTestsystem As CheckBox - Friend WithEvents cbxDatevOpen As CheckBox - Friend WithEvents cbxDatenBuchungen As CheckBox - Friend WithEvents cbxDatevDebitoren As CheckBox - Friend WithEvents Button17 As Button - Friend WithEvents Label23 As Label End Class From 59495925844cf7473fa600536c87029bebd61998 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 13 Feb 2023 16:20:03 +0100 Subject: [PATCH 4/5] Commit --- initATLASAufschubkonten/frmStartOptions.vb | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index 20d14e9..b57307f 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -3297,9 +3297,9 @@ Public Class frmStartOptions Me.Visible = True End Sub - Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click - VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxDatevTestsystem.Checked - VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatenBuchungen.Checked) - End Sub + 'Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click + ' VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxDatevTestsystem.Checked + ' VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatenBuchungen.Checked) + 'End Sub End Class \ No newline at end of file From 69599f989d6a5ae1785b895d8639ea13f5d7218f Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Mon, 13 Feb 2023 16:35:06 +0100 Subject: [PATCH 5/5] =?UTF-8?q?Mergekonflik=20aufgel=C3=B6st?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../frmStartOptions.Designer.vb | 113 +++++++--- initATLASAufschubkonten/frmStartOptions.resx | 195 +++++++++--------- initATLASAufschubkonten/frmStartOptions.vb | 12 +- 3 files changed, 186 insertions(+), 134 deletions(-) diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index efc58a9..8240e1c 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -162,8 +162,12 @@ Partial Class frmStartOptions Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.LinkLabel38 = New System.Windows.Forms.LinkLabel() - Me.PictureBox17 = New System.Windows.Forms.PictureBox() + Me.cbxDatevOpen = New System.Windows.Forms.CheckBox() + Me.cbxDatevBuchungen = New System.Windows.Forms.CheckBox() + Me.cbxDatevDebitoren = New System.Windows.Forms.CheckBox() + Me.btnDatev = New System.Windows.Forms.Button() + Me.lblDatev = New System.Windows.Forms.Label() + Me.cbxDatevTest = New System.Windows.Forms.CheckBox() Me.pnl.SuspendLayout() CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit() Me.tbcntr.SuspendLayout() @@ -195,12 +199,12 @@ Partial Class frmStartOptions ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.pnl.Controls.Add(Me.cbxTestDatev) - Me.pnl.Controls.Add(Me.cbxOpenDatev) - Me.pnl.Controls.Add(Me.cbxBuchungenDatev) - Me.pnl.Controls.Add(Me.cbxKundenDatev) - Me.pnl.Controls.Add(Me.Button17) - Me.pnl.Controls.Add(Me.Label22) + Me.pnl.Controls.Add(Me.cbxDatevTest) + Me.pnl.Controls.Add(Me.cbxDatevOpen) + Me.pnl.Controls.Add(Me.cbxDatevBuchungen) + Me.pnl.Controls.Add(Me.cbxDatevDebitoren) + Me.pnl.Controls.Add(Me.btnDatev) + Me.pnl.Controls.Add(Me.lblDatev) Me.pnl.Controls.Add(Me.Label21) Me.pnl.Controls.Add(Me.Button16) Me.pnl.Controls.Add(Me.Button14) @@ -1583,9 +1587,6 @@ Partial Class frmStartOptions ' 'TabPage3 ' - Me.TabPage3.Controls.Add(Me.LinkLabel39) - Me.TabPage3.Controls.Add(Me.LinkLabel40) - Me.TabPage3.Controls.Add(Me.Label22) Me.TabPage3.Controls.Add(Me.LinkLabel34) Me.TabPage3.Controls.Add(Me.LinkLabel35) Me.TabPage3.Controls.Add(Me.Label17) @@ -1979,27 +1980,75 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' - 'LinkLabel38 + 'cbxDatevOpen ' - Me.LinkLabel38.AutoSize = True - Me.LinkLabel38.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel38.Location = New System.Drawing.Point(475, 125) - Me.LinkLabel38.Name = "LinkLabel38" - Me.LinkLabel38.Size = New System.Drawing.Size(141, 13) - Me.LinkLabel38.TabIndex = 59 - Me.LinkLabel38.TabStop = True - Me.LinkLabel38.Text = "I0610 - Zust. Zollstelle (AES)" + Me.cbxDatevOpen.AutoSize = True + Me.cbxDatevOpen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxDatevOpen.Location = New System.Drawing.Point(170, 345) + Me.cbxDatevOpen.Name = "cbxDatevOpen" + Me.cbxDatevOpen.Size = New System.Drawing.Size(56, 17) + Me.cbxDatevOpen.TabIndex = 74 + Me.cbxDatevOpen.Text = "öffnen" + Me.cbxDatevOpen.UseVisualStyleBackColor = True ' - 'PictureBox17 + 'cbxDatevBuchungen ' - Me.PictureBox17.BackgroundImage = CType(resources.GetObject("PictureBox17.BackgroundImage"), System.Drawing.Image) - Me.PictureBox17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox17.Location = New System.Drawing.Point(630, 120) - Me.PictureBox17.Name = "PictureBox17" - Me.PictureBox17.Size = New System.Drawing.Size(18, 18) - Me.PictureBox17.TabIndex = 60 - Me.PictureBox17.TabStop = False - Me.PictureBox17.Visible = False + Me.cbxDatevBuchungen.AutoSize = True + Me.cbxDatevBuchungen.Checked = True + Me.cbxDatevBuchungen.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatevBuchungen.Location = New System.Drawing.Point(84, 345) + Me.cbxDatevBuchungen.Name = "cbxDatevBuchungen" + Me.cbxDatevBuchungen.Size = New System.Drawing.Size(81, 17) + Me.cbxDatevBuchungen.TabIndex = 73 + Me.cbxDatevBuchungen.Text = "Buchungen" + Me.cbxDatevBuchungen.UseVisualStyleBackColor = True + ' + 'cbxDatevDebitoren + ' + Me.cbxDatevDebitoren.AutoSize = True + Me.cbxDatevDebitoren.Checked = True + Me.cbxDatevDebitoren.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatevDebitoren.Location = New System.Drawing.Point(15, 345) + Me.cbxDatevDebitoren.Name = "cbxDatevDebitoren" + Me.cbxDatevDebitoren.Size = New System.Drawing.Size(63, 17) + Me.cbxDatevDebitoren.TabIndex = 72 + Me.cbxDatevDebitoren.Text = "Kunden" + Me.cbxDatevDebitoren.UseVisualStyleBackColor = True + ' + 'btnDatev + ' + Me.btnDatev.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnDatev.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.btnDatev.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnDatev.Location = New System.Drawing.Point(15, 318) + Me.btnDatev.Name = "btnDatev" + Me.btnDatev.Size = New System.Drawing.Size(211, 24) + Me.btnDatev.TabIndex = 71 + Me.btnDatev.Text = "Kunden / Buchungen --> Datev" + Me.btnDatev.UseVisualStyleBackColor = True + ' + 'lblDatev + ' + Me.lblDatev.AutoSize = True + Me.lblDatev.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblDatev.Location = New System.Drawing.Point(12, 302) + Me.lblDatev.Name = "lblDatev" + Me.lblDatev.Size = New System.Drawing.Size(142, 13) + Me.lblDatev.TabIndex = 70 + Me.lblDatev.Text = "Routine Manager Datev" + ' + 'cbxDatevTest + ' + Me.cbxDatevTest.AutoSize = True + Me.cbxDatevTest.Checked = True + Me.cbxDatevTest.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDatevTest.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxDatevTest.Location = New System.Drawing.Point(15, 368) + Me.cbxDatevTest.Name = "cbxDatevTest" + Me.cbxDatevTest.Size = New System.Drawing.Size(79, 17) + Me.cbxDatevTest.TabIndex = 75 + Me.cbxDatevTest.Text = "Testsystem" + Me.cbxDatevTest.UseVisualStyleBackColor = True ' 'frmStartOptions ' @@ -2184,4 +2233,10 @@ Partial Class frmStartOptions Friend WithEvents txtGJ_UNISPED As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents LinkLabel38 As LinkLabel Friend WithEvents PictureBox17 As PictureBox + Friend WithEvents cbxDatevTest As CheckBox + Friend WithEvents cbxDatevOpen As CheckBox + Friend WithEvents cbxDatevBuchungen As CheckBox + Friend WithEvents cbxDatevDebitoren As CheckBox + Friend WithEvents btnDatev As Button + Friend WithEvents lblDatev As Label End Class diff --git a/initATLASAufschubkonten/frmStartOptions.resx b/initATLASAufschubkonten/frmStartOptions.resx index 1edf06b..a055b7d 100644 --- a/initATLASAufschubkonten/frmStartOptions.resx +++ b/initATLASAufschubkonten/frmStartOptions.resx @@ -140,102 +140,6 @@ WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj - oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB - QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC - j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ - VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox - XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf - 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe - VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh - 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A - pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin - lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS - d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp - hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ - LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs - 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ - NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P - ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x - WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ - nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de - CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj - oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB - QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC - j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ - VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox - XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf - 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe - VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh - 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A - pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin - lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS - d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp - hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ - LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs - 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ - NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P - ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x - WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ - nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de - CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj - oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB - QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC - j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ - VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox - XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf - 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe - VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh - 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A - pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin - lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS - d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp - hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ - LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs - 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ - NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P - ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x - WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ - nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de - CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj - oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB - QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC - j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ - VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox - XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf - 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe - VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh - 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A - pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin - lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS - d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp - hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ - LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs - 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ - NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P - ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x - WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ - nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de - CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= @@ -577,9 +481,102 @@ True - - True - + + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj + oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB + QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC + j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ + VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox + XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf + 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe + VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh + 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A + pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin + lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS + d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp + hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ + LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs + 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ + NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P + ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x + WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ + nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de + CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj + oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB + QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC + j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ + VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox + XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf + 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe + VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh + 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A + pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin + lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS + d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp + hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ + LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs + 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ + NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P + ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x + WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ + nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de + CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj + oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB + QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC + j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ + VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox + XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf + 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe + VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh + 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A + pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin + lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS + d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp + hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ + LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs + 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ + NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P + ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x + WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ + nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de + CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj + oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB + QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC + j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ + VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox + XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf + 9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe + VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh + 42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A + pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin + lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS + d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp + hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ + LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs + 8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ + NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P + ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x + WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/ + nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de + CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII= + + AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index b57307f..6354a88 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -3281,7 +3281,7 @@ Public Class frmStartOptions Me.Cursor = Cursors.Default End Sub - Private Sub LinkLabel40_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel40.LinkClicked + Private Sub LinkLabel40_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) 'Handles LinkLabel40.LinkClicked Me.Visible = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True Dim f As New frmTRNCTS_NachrichtenVerarbeitung_ATEZ @@ -3289,7 +3289,7 @@ Public Class frmStartOptions Me.Visible = True End Sub - Private Sub LinkLabel39_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel39.LinkClicked + Private Sub LinkLabel39_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) 'Handles LinkLabel39.LinkClicked Me.Visible = False VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False Dim f As New frmTRNCTS_NachrichtenVerarbeitung_ATEZ @@ -3297,9 +3297,9 @@ Public Class frmStartOptions Me.Visible = True End Sub - 'Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click - ' VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxDatevTestsystem.Checked - ' VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatenBuchungen.Checked) - 'End Sub + Private Sub btnDatev_Click(sender As Object, e As EventArgs) Handles btnDatev.Click + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = cbxDatevTest.Checked + VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(cbxDatevOpen.Checked, cbxDatevDebitoren.Checked, cbxDatevBuchungen.Checked) + End Sub End Class \ No newline at end of file