Die Attributfunktion GetDataByFieldName lädt die Daten zum aktuellen Dateneintrag des geladenen Datensatzes.
Syntax | |||||
GetDataByFieldName(FieldName, NullValue) | |||||
Rückgabewert | |||||
Typ |
Beschreibung | ||||
Variant |
Inhalt des Feldes des aktuellen Datensatzes | ||||
Parameter | |||||
Verwendung |
Name |
Typ |
Übergabe |
Beschreibung | |
Erforderlich |
FieldName |
String |
ByVal |
Name der Datenspalte | |
Erforderlich |
NullValue |
Variant |
ByVal |
Rückgabewert, wenn das Feld Null ist | |
Beispiel:
Dim T As Table
T.Connection := DBCRM
T.Query := "SELECT * FROM DBO.OPPORTUNITIES WHERE OPID='1521587'"
If T.EOF = False Then
OPPSTATUS := T.GetDataByFieldName("OPPSTATUS", 0)
OPPFORECAST := T.GetDataByFieldName("OPPFORECAST", 0)
OPPVOLUME := T.GetDataByFieldName("OPPVOLUME", 0)
OPPLEAD := T.GetDataByFieldName("OPPLEAD", 0)
OPPENDDATE := T.GetDataByFieldName("OPPENDDATE", Now + 60)
OPPCONTACTCOUNT := T.GetDataByFieldName("OPPCONTACTCOUNT", 1)
OPPCOMPETITORSCOUNT := T.GetDataByFieldName("OPPCOMPETITORSCOUNT", 0)
OPPPRODUCTTYPESCOUNT := T.GetDataByFieldName("OPPPRODUCTTYPESCOUNT", 1)
End If