edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Verknüfpung zu Wiki

Browse Source
This commit is contained in:
d.breimaier
2024-04-11 13:23:35 +02:00
parent f3a69d5baa
commit 3bb9137fb0
3 changed files with 6272 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

92
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.Designer.vb generated
View File

@@ -53,6 +53,8 @@ Partial Class frmUeberstundenauszahlen
Me.picDel = New System.Windows.Forms.PictureBox()
Me.txtAusz50vonSaldo = New System.Windows.Forms.TextBox()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Label12 = New System.Windows.Forms.Label()
Me.txtBruttoSum = New System.Windows.Forms.TextBox()
Me.txtNettoSum = New System.Windows.Forms.TextBox()
Me.Label11 = New System.Windows.Forms.Label()
Me.txtAusz100Netto = New System.Windows.Forms.TextBox()
@@ -76,13 +78,13 @@ Partial Class frmUeberstundenauszahlen
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.lblWarning = New System.Windows.Forms.Label()
Me.Label5 = New System.Windows.Forms.Label()
Me.txtBruttoSum = New System.Windows.Forms.TextBox()
Me.PictureBox5 = New System.Windows.Forms.PictureBox()
Me.dgvUeberstunden = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.Label12 = New System.Windows.Forms.Label()
CType(Me.picDel, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout()
CType(Me.picShow, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.dgvUeberstunden, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
@@ -213,7 +215,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz100
'
Me.txtAusz100.Location = New System.Drawing.Point(292, 27)
Me.txtAusz100.Location = New System.Drawing.Point(316, 27)
Me.txtAusz100.Name = "txtAusz100"
Me.txtAusz100.ReadOnly = True
Me.txtAusz100.Size = New System.Drawing.Size(40, 20)
@@ -222,7 +224,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz50
'
Me.txtAusz50.Location = New System.Drawing.Point(292, 69)
Me.txtAusz50.Location = New System.Drawing.Point(316, 69)
Me.txtAusz50.Name = "txtAusz50"
Me.txtAusz50.ReadOnly = True
Me.txtAusz50.Size = New System.Drawing.Size(40, 20)
@@ -276,7 +278,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtberAusz50
'
Me.txtberAusz50.Location = New System.Drawing.Point(348, 69)
Me.txtberAusz50.Location = New System.Drawing.Point(399, 69)
Me.txtberAusz50.Name = "txtberAusz50"
Me.txtberAusz50.ReadOnly = True
Me.txtberAusz50.Size = New System.Drawing.Size(40, 20)
@@ -285,7 +287,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtberAusz100
'
Me.txtberAusz100.Location = New System.Drawing.Point(348, 27)
Me.txtberAusz100.Location = New System.Drawing.Point(399, 27)
Me.txtberAusz100.Name = "txtberAusz100"
Me.txtberAusz100.ReadOnly = True
Me.txtberAusz100.Size = New System.Drawing.Size(40, 20)
@@ -295,7 +297,7 @@ Partial Class frmUeberstundenauszahlen
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(330, 11)
Me.Label1.Location = New System.Drawing.Point(381, 11)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(92, 13)
Me.Label1.TabIndex = 25
@@ -323,7 +325,7 @@ Partial Class frmUeberstundenauszahlen
'
Me.picDel.BackgroundImage = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.del
Me.picDel.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.picDel.Location = New System.Drawing.Point(428, 11)
Me.picDel.Location = New System.Drawing.Point(479, 11)
Me.picDel.Name = "picDel"
Me.picDel.Size = New System.Drawing.Size(21, 16)
Me.picDel.TabIndex = 28
@@ -331,7 +333,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz50vonSaldo
'
Me.txtAusz50vonSaldo.Location = New System.Drawing.Point(292, 108)
Me.txtAusz50vonSaldo.Location = New System.Drawing.Point(316, 108)
Me.txtAusz50vonSaldo.Name = "txtAusz50vonSaldo"
Me.txtAusz50vonSaldo.ReadOnly = True
Me.txtAusz50vonSaldo.Size = New System.Drawing.Size(40, 20)
@@ -387,9 +389,27 @@ Partial Class frmUeberstundenauszahlen
Me.Panel1.Size = New System.Drawing.Size(619, 258)
Me.Panel1.TabIndex = 30
'
'Label12
'
Me.Label12.AutoSize = True
Me.Label12.Location = New System.Drawing.Point(200, 150)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(42, 13)
Me.Label12.TabIndex = 54
Me.Label12.Text = "Summe"
'
'txtBruttoSum
'
Me.txtBruttoSum.Location = New System.Drawing.Point(316, 147)
Me.txtBruttoSum.Name = "txtBruttoSum"
Me.txtBruttoSum.ReadOnly = True
Me.txtBruttoSum.Size = New System.Drawing.Size(40, 20)
Me.txtBruttoSum.TabIndex = 53
Me.txtBruttoSum.Text = "0"
'
'txtNettoSum
'
Me.txtNettoSum.Location = New System.Drawing.Point(224, 147)
Me.txtNettoSum.Location = New System.Drawing.Point(248, 147)
Me.txtNettoSum.Name = "txtNettoSum"
Me.txtNettoSum.ReadOnly = True
Me.txtNettoSum.Size = New System.Drawing.Size(40, 20)
@@ -399,7 +419,7 @@ Partial Class frmUeberstundenauszahlen
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(229, 11)
Me.Label11.Location = New System.Drawing.Point(253, 11)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(33, 13)
Me.Label11.TabIndex = 51
@@ -407,7 +427,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz100Netto
'
Me.txtAusz100Netto.Location = New System.Drawing.Point(224, 30)
Me.txtAusz100Netto.Location = New System.Drawing.Point(248, 30)
Me.txtAusz100Netto.Name = "txtAusz100Netto"
Me.txtAusz100Netto.ReadOnly = True
Me.txtAusz100Netto.Size = New System.Drawing.Size(40, 20)
@@ -416,7 +436,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz50Netto
'
Me.txtAusz50Netto.Location = New System.Drawing.Point(224, 69)
Me.txtAusz50Netto.Location = New System.Drawing.Point(248, 69)
Me.txtAusz50Netto.Name = "txtAusz50Netto"
Me.txtAusz50Netto.ReadOnly = True
Me.txtAusz50Netto.Size = New System.Drawing.Size(40, 20)
@@ -425,7 +445,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtAusz50vonSaldoNetto
'
Me.txtAusz50vonSaldoNetto.Location = New System.Drawing.Point(224, 108)
Me.txtAusz50vonSaldoNetto.Location = New System.Drawing.Point(248, 108)
Me.txtAusz50vonSaldoNetto.Name = "txtAusz50vonSaldoNetto"
Me.txtAusz50vonSaldoNetto.ReadOnly = True
Me.txtAusz50vonSaldoNetto.Size = New System.Drawing.Size(40, 20)
@@ -435,7 +455,7 @@ Partial Class frmUeberstundenauszahlen
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(289, 11)
Me.Label10.Location = New System.Drawing.Point(313, 11)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(35, 13)
Me.Label10.TabIndex = 47
@@ -480,7 +500,7 @@ Partial Class frmUeberstundenauszahlen
'
Me.picShow.BackgroundImage = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.today
Me.picShow.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.picShow.Location = New System.Drawing.Point(455, 11)
Me.picShow.Location = New System.Drawing.Point(506, 11)
Me.picShow.Name = "picShow"
Me.picShow.Size = New System.Drawing.Size(21, 16)
Me.picShow.TabIndex = 38
@@ -499,7 +519,7 @@ Partial Class frmUeberstundenauszahlen
'cx25
'
Me.cx25.AutoSize = True
Me.cx25.Location = New System.Drawing.Point(271, 111)
Me.cx25.Location = New System.Drawing.Point(295, 111)
Me.cx25.Name = "cx25"
Me.cx25.Size = New System.Drawing.Size(15, 14)
Me.cx25.TabIndex = 36
@@ -508,7 +528,7 @@ Partial Class frmUeberstundenauszahlen
'cbx50
'
Me.cbx50.AutoSize = True
Me.cbx50.Location = New System.Drawing.Point(271, 72)
Me.cbx50.Location = New System.Drawing.Point(295, 72)
Me.cbx50.Name = "cbx50"
Me.cbx50.Size = New System.Drawing.Size(15, 14)
Me.cbx50.TabIndex = 35
@@ -517,7 +537,7 @@ Partial Class frmUeberstundenauszahlen
'cbx100
'
Me.cbx100.AutoSize = True
Me.cbx100.Location = New System.Drawing.Point(271, 30)
Me.cbx100.Location = New System.Drawing.Point(295, 30)
Me.cbx100.Name = "cbx100"
Me.cbx100.Size = New System.Drawing.Size(15, 14)
Me.cbx100.TabIndex = 32
@@ -525,7 +545,7 @@ Partial Class frmUeberstundenauszahlen
'
'txtberAusz25
'
Me.txtberAusz25.Location = New System.Drawing.Point(348, 108)
Me.txtberAusz25.Location = New System.Drawing.Point(399, 108)
Me.txtberAusz25.Name = "txtberAusz25"
Me.txtberAusz25.ReadOnly = True
Me.txtberAusz25.Size = New System.Drawing.Size(40, 20)
@@ -601,14 +621,15 @@ Partial Class frmUeberstundenauszahlen
Me.Label5.Size = New System.Drawing.Size(0, 13)
Me.Label5.TabIndex = 40
'
'txtBruttoSum
'PictureBox5
'
Me.txtBruttoSum.Location = New System.Drawing.Point(292, 147)
Me.txtBruttoSum.Name = "txtBruttoSum"
Me.txtBruttoSum.ReadOnly = True
Me.txtBruttoSum.Size = New System.Drawing.Size(40, 20)
Me.txtBruttoSum.TabIndex = 53
Me.txtBruttoSum.Text = "0"
Me.PictureBox5.BackgroundImage = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.blue_question_mark_hi
Me.PictureBox5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.PictureBox5.Location = New System.Drawing.Point(596, 5)
Me.PictureBox5.Name = "PictureBox5"
Me.PictureBox5.Size = New System.Drawing.Size(38, 36)
Me.PictureBox5.TabIndex = 130
Me.PictureBox5.TabStop = False
'
'dgvUeberstunden
'
@@ -617,27 +638,19 @@ Partial Class frmUeberstundenauszahlen
Me.dgvUeberstunden.AllowUserToDeleteRows = False
Me.dgvUeberstunden.BackgroundColor = System.Drawing.Color.White
Me.dgvUeberstunden.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvUeberstunden.Location = New System.Drawing.Point(422, 30)
Me.dgvUeberstunden.Location = New System.Drawing.Point(538, 11)
Me.dgvUeberstunden.Name = "dgvUeberstunden"
Me.dgvUeberstunden.ReadOnly = True
Me.dgvUeberstunden.Size = New System.Drawing.Size(186, 98)
Me.dgvUeberstunden.Size = New System.Drawing.Size(70, 117)
Me.dgvUeberstunden.TabIndex = 13
Me.dgvUeberstunden.Visible = False
'
'Label12
'
Me.Label12.AutoSize = True
Me.Label12.Location = New System.Drawing.Point(176, 150)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(42, 13)
Me.Label12.TabIndex = 54
Me.Label12.Text = "Summe"
'
'frmUeberstundenauszahlen
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(646, 337)
Me.Controls.Add(Me.PictureBox5)
Me.Controls.Add(Me.Label5)
Me.Controls.Add(Me.lblWarning)
Me.Controls.Add(Me.PictureBox1)
@@ -650,6 +663,7 @@ Partial Class frmUeberstundenauszahlen
Me.Controls.Add(Me.lblMA)
Me.Controls.Add(Me.lblMonat)
Me.Controls.Add(Me.dtpMonat)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmUeberstundenauszahlen"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Überstunden auszahlen"
@@ -658,6 +672,7 @@ Partial Class frmUeberstundenauszahlen
Me.Panel1.PerformLayout()
CType(Me.picShow, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.dgvUeberstunden, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -719,4 +734,5 @@ Partial Class frmUeberstundenauszahlen
Friend WithEvents txtNettoSum As Windows.Forms.TextBox
Friend WithEvents txtBruttoSum As Windows.Forms.TextBox
Friend WithEvents Label12 As Windows.Forms.Label
Friend WithEvents PictureBox5 As Windows.Forms.PictureBox
End Class

6213
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.resx
View File

File diff suppressed because it is too large Load Diff

5
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmUeberstundenauszahlen.vb
View File

@@ -477,6 +477,11 @@ Public Class frmUeberstundenauszahlen
End Sub
Private Sub PictureBox5_Click(sender As Object, e As EventArgs) Handles PictureBox5.Click
Dim webAddress As String = "https://wiki.verag.ag/de/software/zeiterfassung_admin/zeiterfassung_admin#%C3%BCberstunden-auszahlen-%C3%BCber-avisosdldispo"
Process.Start(webAddress)
End Sub
Private Sub txtAusz_hhmm_KeyPress(sender As Object, e As KeyPressEventArgs)
Select Case Asc(e.KeyChar)
Case 48 To 57, 8, 44, 46, 58