Laufinformationen eines Lizenz-Vertragselementes auslesen und dem Grid übergeben
[Visual Basic] Public Function Get_Lizenzkauf( _
ByVal Vertragselementnr As Integer, _
ByRef c1data As C1TrueDBGrid, _
ByVal Applikationnr As Integer _
) As Object
[Visual Basic] Public Function Get_Lizenzkauf(ByVal Vertragselementnr As Integer, ByRef c1data As C1TrueDBGrid, ByVal Applikationnr As Integer)
Try
Me.Lizenzkauf.dispose()
Me.Lizenzkauf = Nothing
Catch ex As Exception
End Try
Me.Lizenzkauf = New TKB.VV.Sysadmin.DomainTable("Lizenzkauf", 0, Vertragselementnr, Globals.clsmitarbeiter.iMitarbeiternr.Value, Applikationnr)
c1data.DataSource = Me.Lizenzkauf.Tabledata
c1data.DataMember = Me.Lizenzkauf.Tabledata.Tables(0).TableName
c1data.AllowAddNew = True
End Function
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