Datev-Schnittstelle im RoutineManager eingebaut.

2023-02-13 15:20:39 +01:00
parent 134c779d03
commit e0d3b2bf00
3 changed files with 146 additions and 25 deletions
--- 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