TimasAPI, usrCntlAPI
This commit is contained in:
@@ -1159,9 +1159,9 @@ Public Class frmMitarbDetails
|
||||
End If
|
||||
|
||||
If CDate(mitarbeiter.mit_einstiegsdatum).ToShortDateString <= DateTime.Parse("01/01/2000") Then
|
||||
MsgBox("Einstiegsdatum darf nicht vor 01.01.2000 liegen!")
|
||||
Return False
|
||||
End If
|
||||
MsgBox("Einstiegsdatum darf nicht vor 01.01.2000 liegen!")
|
||||
Return False
|
||||
End If
|
||||
|
||||
If mitarbeiter.mit_gekuendigt Then
|
||||
MsgBox("Bereits gekündige MA können nicht angelegt werden!")
|
||||
@@ -1169,11 +1169,16 @@ Public Class frmMitarbDetails
|
||||
End If
|
||||
|
||||
If mitarbeiter.mit_vname = "" Or mitarbeiter.mit_nname = "" Then
|
||||
MsgBox("Vor- und Nachnamen angeben!")
|
||||
Return False
|
||||
End If
|
||||
MsgBox("Vor- und Nachnamen angeben!")
|
||||
Return False
|
||||
End If
|
||||
|
||||
Return True
|
||||
If mitarbeiter.mit_firma = "" Then
|
||||
MsgBox("Firma angeben!")
|
||||
Return False
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
@@ -1185,6 +1190,7 @@ Public Class frmMitarbDetails
|
||||
With dgvData
|
||||
.RowHeadersWidth = 10
|
||||
.Columns("id").Visible = False
|
||||
.Columns("groupType").Visible = False
|
||||
.Columns("name").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
.Columns("info").Width = 200
|
||||
.Columns("set").Width = 20
|
||||
|
||||
Reference in New Issue
Block a user