FormulaCall ( formula ; param )

Universal custom function - write your function outside the CF editor

Average rating: 3.9 (41 votes) Log in to vote

Bruce Robertson - Show more from this author

Sample input:

Let([
datalist = "2¶7¶3";
multiplyValues = "GetValue($param; 1) * Case( ValueCount($param) > 1;
FormulaCall ($formula; RightValues($param; ValueCount($param) - 1));1)"];
FormulaCall( multiplyValues; dataList)
)

Sample output:

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

/*
© 2008 Bruce Robertson/Concise Design

FormulaCall( formula; param)

Universal recursive custom function
Write your functions OUTSIDE of the custom function editor
and just pass them to this function
only two parameters can be passed;
your function; and a parameter list
Use $variable or $$variables as necessary within your
function expression

Example:
ListValues = "GetValue($param; 1) & $separator &  Case( ValueCount($param) > 1; 
FormulaEval (RightValues($param; ValueCount($param) - 1)))";

Last modified 8/9/2008
*/

Case(
Formula = "eval";
Let($param = param; Evaluate($formula));

Let([
N = ValueCount(Param);
$Formula  = formula];  
FormulaCall( "Eval";  LeftValues(param; 200) ) 

& 
Case(N>200;
FormulaCall ( Formula; MiddleValues( Param; 201; N - 200))
)
)
)

Universal recursive custom function
Write your functions OUTSIDE of the custom function editor and just pass them to this function.
Only two parameters can be passed;
your function; and a parameter list
Use $variable or $$variables within your
function expression if necessary

==========
Example
==========

let( [
$formula="";
$separator = " "; //tab
$cellSeparator ="¶";
rowStart = "¶";
rowEnd = "¶";
dataList = "2¶3¶4¶77¶37¶98" ;

multiplyValues = "GetValue($param; 1) * Case( ValueCount($param) > 1;
FormulaCall ($formula; RightValues($param; ValueCount($param) - 1));1)";

addValues = "GetValue($param; 1) + Case( ValueCount($param) > 1;
FormulaCall ($formula; RightValues($param; ValueCount($param) - 1)))";

factorial = "GetValue($param; 1) * Case( $param > 2;
FormulaCall ($formula; $param - 1); 1)";

ListValues = "GetValue($param; 1) & $separator & Case( ValueCount($param) > 1;
FormulaCall($formula; RightValues($param; ValueCount($param) - 1)))";

htmlRow ="Let( N = valueCount($param);
Case( N > 0; GetValue($param; 1) & case( N>1; $cellseparator) &
FormulaCall ($formula; RightValues($param; ValueCount($param) - 1)
);
))"

] ;
FormulaCall ( multiplyValues ;dataList ) & ¶ &
FormulaCall ( addValues ; dataList) & ¶ &
FormulaCall ( ListValues ;dataList) & ¶ &
FormulaCall ( Factorial; 6) & ¶ &

//nested calls
FormulaCall (
multiplyValues;
substitute(
FormulaCall(ListValues; dataList); $separator; "¶")
) & ¶ &

"

¶" &
rowStart & FormulaCall ( htmlRow ;dataList) & rowEnd &
"¶

"
)

==========
Result
==========

6700848
221
2 3 4 77 37 98
720
6700848

Comments

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

FormulaCall ( formula ; param )

Comments

Support this website.

Support this website.