FlowFact - Entwicklungstools v19.881 FLOWFACT 2017 R2 - Function - Det_SetValueWithEMSK

Detailwert mit Berechtigung aus Eingabemaske setzen

Function Det_SetValueWithEMSK(ByVal strTable As String, ByVal strTableDsn As String, ByVal strFldArtDsn As String, strValue As String, Optional ByVal strEmskDsn As String = "", Optional ByVal strLinkDsn As String = STRNOTHING) As Boolean


strTable: Tabellenname der Haupttabelle
strTableDsn: Datensatznummer der Haupttabelle z.B. AD, Obj ...
strFldArtDsn: Die Datensatznummer (DSN) der FeldArt
strValue: Der Detailwert
OPTIONAL strEmskDsn: Eingabemaske für Berechtigung (siehe EMSK_GetDefaultACL)
OPTIONAL strLinkDsn: Datensatznummer (DSN) z.B. einer verküpften Adresse (nur zulässig, wenn Feldart vom Typ Adresse od. Projekt)
Rückgabewert: = True, wenn der Detailwert gesetzt werden konnte; sonst = False


Public Function Det_SetValueWithEMSK(ByVal strTable As String, ByVal strTableDsn As String, ByVal strFldArtDsn As String, strValue As String, Optional ByVal strEmskDsn As String = "", Optional ByVal strLinkDsn As String = STRNOTHING) As Boolean
    Dim strAcl As String

    If strEmskDsn <> "" Then
        strAcl = m_oApplication.EMSK_GetDefaultACL(strEmskDsn, strFldArtDsn)
    Else
        strAcl = STRNOTHING
    End If

    Det_SetValueWithEMSK = Det_SetValue(strTable, strTableDsn, strFldArtDsn, strValue, strAcl, strLinkDsn)
End Function