Vertragsverwaltung-Klassenbibliothek  

clsAuswertung.Save_MAParameter -Methode

[Visual Basic]
Public Function Save_MAParameter( _ 
ByVal auswertungnr As Integer, _ 
ByVal Bezeichnung As String, _ 
ByVal Parameter As String, _ 
ByVal Titel1 As String, _ 
ByVal Titel2 As String, _ 
ByVal PrintParam As Boolean
) As Object

Parameter

auswertungnr
Bezeichnung
Parameter
Titel1
Titel2
PrintParam

Quellcode

[Visual Basic]
        Public Function Save_MAParameter(ByVal auswertungnr As Integer, ByVal Bezeichnung As String, ByVal Parameter As String, ByVal Titel1 As String, ByVal Titel2 As String, ByVal PrintParam As Boolean) 
Me.Mitarbeiter_Auswerungsparameter.cpMainConnectionProvider = Globals.conn 
Me.Mitarbeiter_Auswerungsparameter.iAuswertungNr = New SqlInt32(CType(auswertungnr, Int32)) 
Me.Mitarbeiter_Auswerungsparameter.iMitarbeiterNr = New SqlInt32(CType(Globals.clsmitarbeiter.iMitarbeiternr.Value, Int32)) 
Me.Mitarbeiter_Auswerungsparameter.sBeschreibung = New SqlString(CType(Bezeichnung, String)) 
Me.Mitarbeiter_Auswerungsparameter.sParameterdaten = New SqlString(CType(Parameter, String)) 
Me.Mitarbeiter_Auswerungsparameter.sTitelzeile1 = New SqlString(CType(Titel1, String)) 
Me.Mitarbeiter_Auswerungsparameter.sTitelzeile2 = New SqlString(CType(Titel2, String)) 
If PrintParam = True Then 
Me.Mitarbeiter_Auswerungsparameter.bParamPrint = New SqlBoolean(CType(True, Boolean)) 
Else 
Me.Mitarbeiter_Auswerungsparameter.bParamPrint = New SqlBoolean(CType(False, Boolean)) 
End If 
Globals.conn.OpenConnection() 
Me.Mitarbeiter_Auswerungsparameter.Insert() 
Globals.conn.CloseConnection(True) 
Me.MitarbeiterAuswertungsparameter = Me.Get_MAParameter(auswertungnr) 
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

clsAuswertung