FlowFact - Entwicklungstools

zurück

Function - Mkm_Add
Merkmal hinzufügen

  Function Mkm_Add(ByVal strTable As String, ByVal strLinkDsn As String, ByVal strMkmDSNCommaList As String) As Boolean  
 


strTable: Tabellenname der Haupttabelle
strLinkDsn: Datensatznummer der Haupttabelle z.B. AD, Obj ...
strMkmDSNCommaList: Die Datensatznummer (DSN) des Merkmals bzw. durch Komma getrennte Liste von mehreren Merkmal-Dsn's
Rückgabewert: = True, wenn das Merkmal hinzugefügt werden konnte


Public Function Mkm_Add(ByVal strTable As String, ByVal strLinkDsn As String, ByVal strMkmDSNCommaList As String) As Boolean
    Dim strItem As String

    While strMkmDSNCommaList <> ""
        strItem = m_oTools.StrList_DeleteFirst(strMkmDSNCommaList, ",")
        Mkm_Switch strTable, strLinkDsn, "", strItem
    Wend
End Function