LeistungenFIBU, Abrechungsmaske, ZE-Buttons, creditsafe, bugfix PLOSE (bei Rechnungsausgang)

2024-06-20 10:01:00 +02:00
parent e928df34a0
commit fe4b4304bc
23 changed files with 1646 additions and 53 deletions
--- a/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmZEButtons.Designer.vb
+++ b/VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmZEButtons.Designer.vb
@@ -0,0 +1,241 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmZEButtons
+    Inherits System.Windows.Forms.Form
+
+    'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Wird vom Windows Form-Designer benötigt.
+    Private components As System.ComponentModel.IContainer
+
+    'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+    'Das Bearbeiten ist mit dem Windows Form-Designer möglich.  
+    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.pnlButtons = New System.Windows.Forms.Panel()
+        Me.btnVergGehen = New System.Windows.Forms.Button()
+        Me.btnVergKommen = New System.Windows.Forms.Button()
+        Me.btnFOGehen = New System.Windows.Forms.Button()
+        Me.btnFOKommen = New System.Windows.Forms.Button()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.lblkommen = New System.Windows.Forms.Label()
+        Me.btnATTGehen = New System.Windows.Forms.Button()
+        Me.btnATTKommen = New System.Windows.Forms.Button()
+        Me.btnIMEXGehen = New System.Windows.Forms.Button()
+        Me.btnIMEXKommen = New System.Windows.Forms.Button()
+        Me.pnlButtons.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'pnlButtons
+        '
+        Me.pnlButtons.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.pnlButtons.BackColor = System.Drawing.Color.Cornsilk
+        Me.pnlButtons.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.pnlButtons.Controls.Add(Me.btnVergGehen)
+        Me.pnlButtons.Controls.Add(Me.btnVergKommen)
+        Me.pnlButtons.Controls.Add(Me.btnFOGehen)
+        Me.pnlButtons.Controls.Add(Me.btnFOKommen)
+        Me.pnlButtons.Controls.Add(Me.Label1)
+        Me.pnlButtons.Controls.Add(Me.lblkommen)
+        Me.pnlButtons.Controls.Add(Me.btnATTGehen)
+        Me.pnlButtons.Controls.Add(Me.btnATTKommen)
+        Me.pnlButtons.Controls.Add(Me.btnIMEXGehen)
+        Me.pnlButtons.Controls.Add(Me.btnIMEXKommen)
+        Me.pnlButtons.Location = New System.Drawing.Point(1, 1)
+        Me.pnlButtons.Name = "pnlButtons"
+        Me.pnlButtons.Size = New System.Drawing.Size(235, 229)
+        Me.pnlButtons.TabIndex = 23
+        '
+        'btnVergGehen
+        '
+        Me.btnVergGehen.BackColor = System.Drawing.Color.White
+        Me.btnVergGehen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnVergGehen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnVergGehen.Enabled = False
+        Me.btnVergGehen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnVergGehen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_gehen
+        Me.btnVergGehen.ImageAlign = System.Drawing.ContentAlignment.TopRight
+        Me.btnVergGehen.Location = New System.Drawing.Point(132, 168)
+        Me.btnVergGehen.Name = "btnVergGehen"
+        Me.btnVergGehen.Size = New System.Drawing.Size(90, 45)
+        Me.btnVergGehen.TabIndex = 132
+        Me.btnVergGehen.Text = "VERAG"
+        Me.btnVergGehen.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnVergGehen.UseVisualStyleBackColor = False
+        '
+        'btnVergKommen
+        '
+        Me.btnVergKommen.BackColor = System.Drawing.Color.White
+        Me.btnVergKommen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnVergKommen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnVergKommen.Enabled = False
+        Me.btnVergKommen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnVergKommen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_kommen
+        Me.btnVergKommen.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnVergKommen.Location = New System.Drawing.Point(20, 168)
+        Me.btnVergKommen.Name = "btnVergKommen"
+        Me.btnVergKommen.Size = New System.Drawing.Size(106, 45)
+        Me.btnVergKommen.TabIndex = 131
+        Me.btnVergKommen.Text = "VERAG"
+        Me.btnVergKommen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnVergKommen.UseVisualStyleBackColor = False
+        '
+        'btnFOGehen
+        '
+        Me.btnFOGehen.BackColor = System.Drawing.Color.White
+        Me.btnFOGehen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnFOGehen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnFOGehen.Enabled = False
+        Me.btnFOGehen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnFOGehen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_gehen
+        Me.btnFOGehen.ImageAlign = System.Drawing.ContentAlignment.TopRight
+        Me.btnFOGehen.Location = New System.Drawing.Point(132, 117)
+        Me.btnFOGehen.Name = "btnFOGehen"
+        Me.btnFOGehen.Size = New System.Drawing.Size(90, 45)
+        Me.btnFOGehen.TabIndex = 130
+        Me.btnFOGehen.Text = "FO"
+        Me.btnFOGehen.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnFOGehen.UseVisualStyleBackColor = False
+        '
+        'btnFOKommen
+        '
+        Me.btnFOKommen.BackColor = System.Drawing.Color.White
+        Me.btnFOKommen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnFOKommen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnFOKommen.Enabled = False
+        Me.btnFOKommen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnFOKommen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_kommen
+        Me.btnFOKommen.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnFOKommen.Location = New System.Drawing.Point(20, 117)
+        Me.btnFOKommen.Name = "btnFOKommen"
+        Me.btnFOKommen.Size = New System.Drawing.Size(106, 45)
+        Me.btnFOKommen.TabIndex = 129
+        Me.btnFOKommen.Text = "FO"
+        Me.btnFOKommen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnFOKommen.UseVisualStyleBackColor = False
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label1.Location = New System.Drawing.Point(145, -1)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(50, 13)
+        Me.Label1.TabIndex = 128
+        Me.Label1.Text = "GEHEN"
+        '
+        'lblkommen
+        '
+        Me.lblkommen.AutoSize = True
+        Me.lblkommen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblkommen.Location = New System.Drawing.Point(43, -1)
+        Me.lblkommen.Name = "lblkommen"
+        Me.lblkommen.Size = New System.Drawing.Size(61, 13)
+        Me.lblkommen.TabIndex = 127
+        Me.lblkommen.Text = "KOMMEN"
+        '
+        'btnATTGehen
+        '
+        Me.btnATTGehen.BackColor = System.Drawing.Color.White
+        Me.btnATTGehen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnATTGehen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnATTGehen.Enabled = False
+        Me.btnATTGehen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnATTGehen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_gehen
+        Me.btnATTGehen.ImageAlign = System.Drawing.ContentAlignment.TopRight
+        Me.btnATTGehen.Location = New System.Drawing.Point(132, 66)
+        Me.btnATTGehen.Name = "btnATTGehen"
+        Me.btnATTGehen.Size = New System.Drawing.Size(90, 45)
+        Me.btnATTGehen.TabIndex = 126
+        Me.btnATTGehen.Text = "ATILLA"
+        Me.btnATTGehen.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnATTGehen.UseVisualStyleBackColor = False
+        '
+        'btnATTKommen
+        '
+        Me.btnATTKommen.BackColor = System.Drawing.Color.White
+        Me.btnATTKommen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnATTKommen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnATTKommen.Enabled = False
+        Me.btnATTKommen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnATTKommen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_kommen
+        Me.btnATTKommen.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnATTKommen.Location = New System.Drawing.Point(20, 66)
+        Me.btnATTKommen.Name = "btnATTKommen"
+        Me.btnATTKommen.Size = New System.Drawing.Size(106, 45)
+        Me.btnATTKommen.TabIndex = 125
+        Me.btnATTKommen.Text = "ATILLA"
+        Me.btnATTKommen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnATTKommen.UseVisualStyleBackColor = False
+        '
+        'btnIMEXGehen
+        '
+        Me.btnIMEXGehen.BackColor = System.Drawing.Color.White
+        Me.btnIMEXGehen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnIMEXGehen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnIMEXGehen.Enabled = False
+        Me.btnIMEXGehen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnIMEXGehen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_gehen
+        Me.btnIMEXGehen.ImageAlign = System.Drawing.ContentAlignment.TopRight
+        Me.btnIMEXGehen.Location = New System.Drawing.Point(132, 15)
+        Me.btnIMEXGehen.Name = "btnIMEXGehen"
+        Me.btnIMEXGehen.Size = New System.Drawing.Size(90, 45)
+        Me.btnIMEXGehen.TabIndex = 124
+        Me.btnIMEXGehen.Text = "IMEX"
+        Me.btnIMEXGehen.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.btnIMEXGehen.UseVisualStyleBackColor = False
+        '
+        'btnIMEXKommen
+        '
+        Me.btnIMEXKommen.BackColor = System.Drawing.Color.White
+        Me.btnIMEXKommen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.btnIMEXKommen.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnIMEXKommen.Enabled = False
+        Me.btnIMEXKommen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.btnIMEXKommen.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.ze_kommen
+        Me.btnIMEXKommen.ImageAlign = System.Drawing.ContentAlignment.TopLeft
+        Me.btnIMEXKommen.Location = New System.Drawing.Point(20, 15)
+        Me.btnIMEXKommen.Name = "btnIMEXKommen"
+        Me.btnIMEXKommen.Size = New System.Drawing.Size(106, 45)
+        Me.btnIMEXKommen.TabIndex = 123
+        Me.btnIMEXKommen.Text = "IMEX"
+        Me.btnIMEXKommen.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.btnIMEXKommen.UseVisualStyleBackColor = False
+        '
+        'frmZEButtons
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(236, 232)
+        Me.Controls.Add(Me.pnlButtons)
+        Me.Name = "frmZEButtons"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Zeiterfassung"
+        Me.pnlButtons.ResumeLayout(False)
+        Me.pnlButtons.PerformLayout()
+        Me.ResumeLayout(False)
+
+    End Sub
+
+    Friend WithEvents pnlButtons As Windows.Forms.Panel
+    Friend WithEvents btnIMEXGehen As Windows.Forms.Button
+    Friend WithEvents btnIMEXKommen As Windows.Forms.Button
+    Friend WithEvents btnATTKommen As Windows.Forms.Button
+    Friend WithEvents Label1 As Windows.Forms.Label
+    Friend WithEvents lblkommen As Windows.Forms.Label
+    Friend WithEvents btnATTGehen As Windows.Forms.Button
+    Friend WithEvents btnVergGehen As Windows.Forms.Button
+    Friend WithEvents btnVergKommen As Windows.Forms.Button
+    Friend WithEvents btnFOGehen As Windows.Forms.Button
+    Friend WithEvents btnFOKommen As Windows.Forms.Button
+End Class