Die Attributfunktion CheckByParam prüft eine Entscheidungstabelle außerhalb der Standard-Regelprüfung. Die Funktion kann für gebundene und ungebundene Entscheidungstabellen aufgerufen werden.
Syntax | |||||
CheckByParam(ByRef InValues(), ByRef OutValues()) | |||||
Rückgabewert | |||||
Typ |
Beschreibung | ||||
Boolean |
True, wenn die Prüfung eine Trefferzeile gefunden hat | ||||
Parameter | |||||
Verwendung |
Name |
Typ |
Übergabe |
Beschreibung | |
Erforderlich |
InValues() |
Variant |
ByRef |
Werte für die Eingangsspalten der Entscheidungstabelle. Der Index Null repräsentiert den Prüfwert der ersten Eingangsspalte. Weitere, aufsteigende Indizes entsprechen den weiteren Eingangsspalten. | |
Erforderlich |
OutValues() |
Variant |
ByRef |
Variant-Liste, welche die Werte der Ausgangsspalten aufnimmt, wenn über die Eingangsspalten ein Zeilentreffer gefunden wurde. Der Index Null repräsentiert den Wert des Feldes der ersten Ausgangsspalte. Weitere, aufsteigende Indizes entsprechen den Feldern der weiteren Ausgangsspalten. | |
Beispiel:
Die Entscheidungstabelle ENTA_Preis verfügt über zwei Eingangsspalten und eine Ausgangsspalte.
Die Prüfung erfolgt über die Merkmale Ausführung und Farbe, deren Werte in eine Variant-Liste eingeschrieben werden.
Wenn der Rückgabewert True ist, wird das Ergebnis des Feldes der ersten Ausgangsspalte der Trefferzeile in die Variable Preis eingeschrieben.
Dim Res() As Variant
If ENTA_Preis.CheckByParam({Ausführung, Farbe}, Res) = False Then
Preis := 0
Else
Preis := Res(0)
End If