49 lines
982 B
VB.net
49 lines
982 B
VB.net
Imports System.Data
|
|
Imports System.Data.SqlClient
|
|
|
|
'''<summary>Diese klasse beinhaltet die Logik für die Funktionsgruppe</summary>
|
|
Public Class Funktionsgruppe
|
|
|
|
#Region "Members"
|
|
|
|
Private _funktionsGruppeNr As Integer
|
|
Private _bezeichnung As String
|
|
Private _beschreibung As String
|
|
Private _zugehoerigkeit As String
|
|
Private _mandantNr As Integer
|
|
Private _isAktiv As Boolean
|
|
|
|
#End Region
|
|
|
|
#Region "Constructor"
|
|
|
|
Public Sub New()
|
|
End Sub
|
|
|
|
'Public Sub New(ByVal funktionsGruppeId As Integer)
|
|
' Try
|
|
|
|
' Catch ex As Exception
|
|
' Throw ex
|
|
' End Try
|
|
'End Sub
|
|
|
|
#End Region
|
|
|
|
#Region "Public methods"
|
|
|
|
'''<summary>Gibt eine Liste mit allen Funktionsgruppen zurück</summary>
|
|
'''<param name="ds">Das DataSet welches gefüllt werden soll</param>
|
|
|
|
Public Overloads Shared Sub GetListe(ByRef ds As DataSet)
|
|
Try
|
|
DataAccess.Funktionsgruppe.GetListe(ds)
|
|
Catch ex As Exception
|
|
Throw ex
|
|
End Try
|
|
End Sub
|
|
|
|
#End Region
|
|
|
|
End Class
|