FlowFact - Entwicklungstools

zurück

Function - AKTART_New
Neue Aktivitätenart anlegen, ohne speichern

Diese Funktion bereitet ein Recordset mit minimalen Angaben vor. Die Datensatznummer (DSN) wird gesetzt. Zum Speichern muß abschließend 'AKTART_Update' aufgerufen werden.
  Function AKTART_New() As ADODB.Recordset  
 


Rückgabewert: Recordset mit allen Feldern


Public Function AKTART_New() As ADODB.Recordset
    Dim rsAktArt As ADODB.Recordset

    Set rsAktArt = m_oBase.Sql_Find("Aktivitätenarten", "1=2")

    rsAktArt.AddNew
    rsAktArt("DSN").value = m_oUtil.NewGUID()
    rsAktArt("Aktiv").value = 1
    rsAktArt("Priorität").value = 1

    Set AKTART_New = rsAktArt
End Function