Vertrasgdetail abhängig des gewählten Nodes auslesen

[Visual Basic]
Public Function Update_Vertragsuebersicht( _ 
   ByVal SelectedTag As Object, _ 
   Optional ByVal SelNachVertragstyp As Boolean = False, _ 
   Optional ByVal Suchstring As String = "" _ 
) As DataTable

Parameter

SelectedTag

Erforderlich.

SelNachVertragstyp

Optional. Der Standardwert ist False.

Suchstring

Optional. Der Standardwert ist "".

Quellcode

[Visual Basic]
        Public Function Update_Vertragsuebersicht(ByVal SelectedTag As Object, Optional ByVal SelNachVertragstyp As Boolean = False, Optional ByVal Suchstring As String = "") As DataTable 
            Dim x As Treenode_Descriptor = SelectedTag 
            'MsgBox(x.Keyvalue) 
            Select Case x.Type 
                Case "Vertragspartner" 
                    Return Get_Vertragsdetails(x.Type, 0, x.Vertragspartnernr, Suchstring) 
                Case "Vertragstyp" 
                    If SelNachVertragstyp = True Then 
                        Return Get_Vertragsdetails(x.Type, x.Vertragstypnr, 0, Suchstring) 
                    Else 
                        Return Get_Vertragsdetails(x.Type, x.Vertragstypnr, x.Vertragspartnernr, Suchstring) 
                    End If 
                Case "Vertragselement" 
                    Return Get_Vertragsdetails(x.Type, x.Keyvalue, x.Vertragspartnernr, Suchstring) 
            End Select 
 
        End Function

Forderungen

Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

Siehe auch

clsVertragsuebersicht_Strukturen