CustomValuesGreaterThan ( values ; reference ; valueFunction )

Values greater than reference, evaluated using a custom function

Average rating: 3.5 (2 votes) Log in to vote

Richard Dyce - Show more from this author
Dyce & Sons Ltd.
http://dyce.com

Sample input:

CustomValuesGreaterThan ( "3,5¶4,2¶1,3¶4,1¶1,7¶2,0¶1,9" ; "4" ; "Middle( \"[t]\" ; Position( \"[t]\" ; \",\" ; -1 ; 1 ) + Length( \",\" ) ; 64000 )")

Sample output:

"3,5¶1,7¶1,9"

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*
CustomValuesGreaterThan ( values ; reference ; valueFunction )
Returns all values in values that are greater than the reference parameter, using the valueFunction
where valueFunction is an evaulatable string, where "[t]" will be replaced with the value, before evaluation occurs,
e.g.

 "Middle( \"[t]\"  ; Position( \"[t]\" ; \" - \"  ; -1 ; 1 ) + Length( \" - \" ) ; 64000 )"

*/

Let(
	listLength = ValueCount( values );

	Case(
		// if the first element is greater than the reference...
		GetAsNumber( Evaluate ( Substitute( valueFunction ; "[t]" ; LeftValues( values; 1 ) ) ) ) > GetAsNumber( reference );
		// return the first element
		LeftValues( values; 1 )
	)

	&

	Case(
		// if values is not trivial [there's more than one element]
		listLength > 1;
		// return all other elements greater than reference
		CustomValuesGreaterThan (
			RightValues( values ; listLength - 1 );
			reference;
			valueFunction
		)
	)
)  // end Let()

CustomValuesGreaterThan ( values ; reference ; valueFunction ) returns a list of all values in list that are greater than the reference by comparing the first value determined using a custom function; then appending all other values greater than the reference with a recursive call to itself.

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

CustomValuesGreaterThan ( values ; reference ; valueFunction )

Comments

Support this website.

Support this website.