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

Timas Korrektur

Browse Source
This commit is contained in:
d.breimaier
2023-09-26 13:49:00 +02:00
parent 791b0ad4be
commit 1bbc91e993
5 changed files with 19 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
UID/Mitarbeiter/frmMitarbDetails.vb
View File

@@ -290,7 +290,7 @@ Public Class frmMitarbDetails
txtTelotecSB.Text = mitarbeiter.mit_TELOTEC_SB
txtCSUser.Text = mitarbeiter.mit_CSuser
txtCSPW.Text = mitarbeiter.mit_CSpwd
txtPersonalNr.Text = mitarbeiter.mit_PersonalNr
txtLohnNr.Text = mitarbeiter.mit_PersonalNr
txtTelNr.Text = mitarbeiter.mit_telefonnr
cboALIASDomain.changeItem(mitarbeiter.mit_AliasAD_Domain)
@@ -583,7 +583,7 @@ Public Class frmMitarbDetails
mitarbeiter.mit_teamId = If(cboTeam._value = "", Nothing, cboTeam._value)
mitarbeiter.mit_CSuser = txtCSUser.Text
mitarbeiter.mit_CSpwd = txtCSPW.Text
mitarbeiter.mit_PersonalNr = txtPersonalNr.Text
mitarbeiter.mit_PersonalNr = txtLohnNr.Text
mitarbeiter.mit_telefonnr = txtTelNr.Text
@@ -902,7 +902,7 @@ Public Class frmMitarbDetails
btnMAanlegen.Visible = Not cbxTimasAngelegt.Checked
txtPersonalNr.Enabled = Not cbxTimasAngelegt.Checked
txtLohnNr.Enabled = Not cbxTimasAngelegt.Checked
dgvData.Visible = Not cbxTimasAngelegt.Checked
TabControl1.Visible = Not cbxTimasAngelegt.Checked
rtfInfoTimas.Visible = cbxTimasAngelegt.Checked
@@ -1173,7 +1173,7 @@ Public Class frmMitarbDetails
If checkMandatoryFields() Then
timas.createEmployee(mitarbeiter, rtfInfoTimas.Text, dtTimas)
tbcntr_TabIndexChanged(sender, e)
End If
End If
End Sub
@@ -1190,7 +1190,7 @@ Public Class frmMitarbDetails
Private Sub cbxTimasAngelegt_CheckedChanged(sender As Object, e As EventArgs) Handles cbxTimasAngelegt.CheckedChanged
btnMAanlegen.Visible = Not cbxTimasAngelegt.Checked
txtPersonalNr.Enabled = Not cbxTimasAngelegt.Checked
txtLohnNr.Enabled = Not cbxTimasAngelegt.Checked
dgvData.Visible = Not cbxTimasAngelegt.Checked
rtfInfoTimas.Visible = cbxTimasAngelegt.Checked
btngetInfo.Visible = cbxTimasAngelegt.Checked