Postsgang (1h) kann nun gestempelt werden, Fehlerhinweis bei Verbindungsfehler zu Zeiterfassungsserver
This commit is contained in:
@@ -67,7 +67,7 @@ Public Class usrCntlMitarbeiter
|
||||
|
||||
|
||||
|
||||
Dim sql As String = "SELECT mit_id,mit_username,mit_vname, mit_nname ,mit_niederlassung,mit_abteilung,mit_email,mit_durchwahl,mit_gekuendigt, isnull(mit_foto_DocId,'') as mit_foto_DocId FROM tblMitarbeiter WHERE (mit_firma='" & firma & "' OR (mit_firma='ALL' AND mit_FirmaHaupt='" & firma & "' )) "
|
||||
Dim sql As String = "SELECT mit_id,mit_username,mit_vname, mit_nname ,mit_niederlassung,mit_abteilung,mit_email,mit_durchwahl,mit_gekuendigt, case when mit_timasId is null then 0 else 1 end as mit_ze, isnull(mit_foto_DocId,'') as mit_foto_DocId FROM tblMitarbeiter WHERE (mit_firma='" & firma & "' OR (mit_firma='ALL' AND mit_FirmaHaupt='" & firma & "' )) "
|
||||
|
||||
If txtSuche.Text <> "" Then
|
||||
sql &= " AND (mit_username LIKE '%" & txtSuche.Text & "%' OR mit_nname LIKE '%" & txtSuche.Text & "%' OR mit_vname LIKE '%" & txtSuche.Text & "%') "
|
||||
@@ -275,6 +275,9 @@ Public Class usrCntlMitarbeiter
|
||||
.Columns(8).Width = 80
|
||||
.Columns(8).HeaderText = "Gekündigt"
|
||||
|
||||
.Columns(9).Width = 80
|
||||
.Columns(9).HeaderText = "Zeiterfassung"
|
||||
|
||||
'.Columns(9).Visible = False
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user