FlowFact - Entwicklungstools

zurück

Function - MKM_New
Neues Merkmal anlegen, ohne speichern

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


Rückgabewert: Recordset mit allen Feldern


Public Function MKM_New() As ADODB.Recordset
    Dim rsMKM As ADODB.Recordset

    Set rsMKM = m_oBase.Sql_Find("Mkm", "1=2")

    rsMKM.AddNew
    rsMKM("DSN").value = m_oUtil.NewGUID()
    rsMKM("Aktiv").value = 1

    Set MKM_New = rsMKM
End Function