205 lines
6.6 KiB
VB.net
205 lines
6.6 KiB
VB.net
|
|
Public Class cUserBerechtigungen
|
|
Property ber_id As String = ""
|
|
Property ber_name As String = ""
|
|
Property bepr_programm As String = ""
|
|
Property ber_sicherheitsstufe As String = ""
|
|
End Class
|
|
Public Class cBerechtigungen
|
|
Property ber_id As String = ""
|
|
Property ber_name As String = ""
|
|
Property ber_sicherheitsstufe As String = ""
|
|
Property ber_progId As String = ""
|
|
Property prog_codename As String = ""
|
|
End Class
|
|
Public Class cProgramm
|
|
Property prog_id As Integer
|
|
Property prog_codename As String = ""
|
|
Property prog_name As String = ""
|
|
Property prog_aktuelleVersion As String = ""
|
|
Property prog_info As String = ""
|
|
Property prog_source_path As String = ""
|
|
Property prog_dev_path As String = ""
|
|
Property prog_prod_path As String = ""
|
|
Property prog_installer_source_path As String = ""
|
|
Property prog_installer_dev_path As String = ""
|
|
Property prog_installer_prod_path As String = ""
|
|
Property prog_installer_prod_path_atilla As String = ""
|
|
Property prog_prod_path_atilla As String = ""
|
|
Property prog_prod_path_imex As String = ""
|
|
Property prog_installer_prod_path_imex As String = ""
|
|
Property prog_prod_path_SBG As String = ""
|
|
Property prog_installer_prod_path_SBG As String = ""
|
|
Property prog_prod_path_WAI As String = ""
|
|
Property prog_installer_prod_path_WAI As String = ""
|
|
Property prog_prod_path_NKD As String = ""
|
|
Property prog_installer_prod_path_NKD As String = ""
|
|
Property prog_prod_path_NEU As String = ""
|
|
Property prog_installer_prod_path_NEU As String = ""
|
|
|
|
Property prog_prod_path_UNI As String = ""
|
|
Property prog_installer_prod_path_UNI As String = ""
|
|
Property prog_prod_path_AMB As String = ""
|
|
Property prog_installer_prod_path_AMB As String = ""
|
|
End Class
|
|
|
|
Public Class cSeminar
|
|
Property sem_id As Integer
|
|
Property sem_von As DateTime
|
|
Property sem_bis As DateTime
|
|
Property sem_dauer As String = ""
|
|
Property sem_name As String = ""
|
|
Property sem_vortragender As String = ""
|
|
Property sem_vortragender_mitId As Integer
|
|
Property sem_ort As String = ""
|
|
Property sem_inhalt As String = ""
|
|
Property sem_inhalt2 As String = ""
|
|
Property sem_info As String = ""
|
|
Property sem_type As String = ""
|
|
Property sem_isVeragSeminar As Boolean
|
|
Property sem_isIntAusbildung As Boolean
|
|
Property sem_bezeichnung As String = ""
|
|
|
|
End Class
|
|
|
|
Public Class cBuergschaft
|
|
Property brg_id As Integer = -1
|
|
Property brg_datum As String = ""
|
|
Property brg_at_tag As String = ""
|
|
Property brg_at_woche As String = ""
|
|
Property brg_de_tag As String = ""
|
|
Property brg_de_woche As String = ""
|
|
Property brg_at_tag_atlas As String = ""
|
|
Property brg_at_tag_zolaris As String = ""
|
|
Property brg_at_woche_atlas As String = ""
|
|
Property brg_at_woche_zolaris As String = ""
|
|
Property brg_de_tag_atlas As String = ""
|
|
Property brg_de_woche_atlas As String = ""
|
|
|
|
Property brg_de2_tag As String = ""
|
|
Property brg_de2_woche As String = ""
|
|
Property brg_de2_tag_atlas As String = ""
|
|
Property brg_de2_woche_atlas As String = ""
|
|
End Class
|
|
|
|
Public Class cDienstMA
|
|
Property dstma_id As Integer
|
|
Property dstma_mitId As Integer
|
|
Property dstma_abteilung As String = ""
|
|
Property dstma_funktion As String = ""
|
|
Property dstma_arbvh As String = ""
|
|
Property dstma_wochenStunden As Double = 0
|
|
Property dstma_stammSchicht As String = ""
|
|
Property dstma_kuerzel As String = ""
|
|
Property dstma_reihenfolge As Integer
|
|
Property dstma_farbe As String
|
|
Property dstma_muster As Boolean = False
|
|
Property dstma_WEStdRegelAZ As Boolean = False
|
|
Property dstma_4wo As Boolean = False
|
|
|
|
Property dstma_TageProWoche As Integer = -1
|
|
Property dstma_inaktiv As Boolean = False
|
|
Property dstma_TzFeiertageStd As Object = Nothing
|
|
|
|
End Class
|
|
|
|
Public Class cDienstAbwesendheiten
|
|
Property dstna_id As Integer
|
|
Property dstna_mitId As Integer
|
|
Property dstna_datum_von As Date
|
|
Property dstna_datum_bis As Date
|
|
Property dstna_grund As String = ""
|
|
End Class
|
|
|
|
Public Class cDienstAbwesendheitenKW
|
|
Property dstnk_id As Integer
|
|
Property dstnk_mitId As Integer
|
|
Property dstnk_kw As Integer
|
|
Property dstnk_jahr As Integer
|
|
Property dstnk_grund As String = ""
|
|
Property dstnk_info As String = ""
|
|
End Class
|
|
|
|
Public Class cDienstEintrag
|
|
Property dstetr_id As Integer
|
|
Property dstetr_dstmaId As Integer
|
|
Property dstetr_datum As String = ""
|
|
Property dstetr_art As String = ""
|
|
Property dstetr_von As String = ""
|
|
Property dstetr_bis As String = ""
|
|
Property dstetr_pause As Double = 0
|
|
Property dstetr_grund As String = ""
|
|
Property dstetr_info As String = ""
|
|
End Class
|
|
|
|
|
|
Public Class cMAShort
|
|
Property mit_id As Integer
|
|
Property mit_vname As String = ""
|
|
Property mit_nname As String = ""
|
|
End Class
|
|
|
|
Public Class cDienstTeilzeit
|
|
Property dsttz_id As Integer
|
|
Property dsttz_maId As Integer
|
|
Property dsttz_dienstplan As String = ""
|
|
Property dsttz_wotag As String = ""
|
|
Property dsttz_abt As String = ""
|
|
Property dsttz_von As String = ""
|
|
Property dsttz_bis As String = ""
|
|
Property dsttz_pause As String = ""
|
|
Property dsttz_bemerkung As String = ""
|
|
|
|
End Class
|
|
|
|
|
|
Public Class cDienstDetails
|
|
Property dedet_id As Integer
|
|
Property dedet_abt As String = ""
|
|
Property dedet_woTag As String = ""
|
|
Property dedet_info As String = ""
|
|
Property dedet_von As String = ""
|
|
Property dedet_bis As String = ""
|
|
Property dedet_pause As Double = 0
|
|
|
|
End Class
|
|
|
|
Public Class cDienstDGV
|
|
|
|
Property dgvName As String
|
|
Property dgvDatum As Date
|
|
Property dgvAbteilung As String = ""
|
|
Property dgvVon As String = ""
|
|
Property dgvBis As String = ""
|
|
Property USRCNTL As usrCntlDienstWoche = Nothing
|
|
|
|
Public Sub New(ByVal dgvName As String, ByVal dgvDatum As Date, ByVal dgvAbteilung As String, ByVal dgvVon As String, ByVal dgvBis As String, Optional USRCNTL As Object = Nothing)
|
|
Me.dgvName = dgvName
|
|
Me.dgvDatum = dgvDatum
|
|
Me.dgvAbteilung = dgvAbteilung
|
|
Me.dgvVon = dgvVon
|
|
Me.dgvBis = dgvBis
|
|
Me.USRCNTL = USRCNTL
|
|
End Sub
|
|
|
|
Public Sub New(ByVal dgvName As String, ByVal dgvDatum As Date, ByVal dgvAbteilung As String, Optional USRCNTL As Object = Nothing)
|
|
Me.dgvName = dgvName
|
|
Me.dgvDatum = dgvDatum
|
|
Me.dgvAbteilung = dgvAbteilung
|
|
Me.dgvVon = "00:00"
|
|
Me.dgvBis = "00:00"
|
|
Me.USRCNTL = USRCNTL
|
|
End Sub
|
|
|
|
|
|
End Class
|
|
|
|
|
|
Public Class cDienstNA
|
|
Property dstna_id As Integer
|
|
Property dstna_mitId As Integer
|
|
Property dstna_datum As Date
|
|
Property dstna_grund As String = ""
|
|
Property dstna_info As String = ""
|
|
|
|
End Class |