JSONforLayoutFields ( Layout )

Builds a JSON object for the non empty fields on the specified layout

Be the first to rate this function Log in to vote

Neil Manchester - Show more from this author
NDMW

Sample input:

JSONforLayoutFields ("Client")

Sample output:

{

"FirstName": "Jeremy",

"LastName": "Brown",

"Address": "Somewhere in Orlando",

"ReasonMoved" : "Done with winters"

}

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

While ( 


//VARIABLES
//This is where you will define the variables that will be needed later in the function.

[

	  _fieldNames = FieldNames ( Get ( FileName ) ; Layout )
	; _fieldCount = ValueCount ( _fieldNames )
	; _n = 0
	; _json = JSONSetElement ( "{}" ; "" ; "" ; "" )


] ; 
//END VARIABLES


//CONDITIONS
//Condition parameter is a test. It is a Boolean expression that is evaluated before each loop iteration. As long as the condition is true…or while the condition is true, the loop repeats. When false, the loop stops (and jumps to the result).

	_n ≤ _fieldCount 

; 
//END CONDITION

	


//LOGIC
//The logic parameter is the section that gets evaluated each time the loop is repeated. Variables that are established here will be “reset” or rather “reevaluated” for each loop.

[ 

	_fieldName = GetValue ( _fieldNames ; _n ) ; 
	_fieldEmpty = If ( GetField ( GetValue ( _fieldNames ; _n ) ) ; 1 ; 0 ) ;
	_fieldValue = GetField ( GetValue ( _fieldNames ; _n ) ) ;
	_fieldType = If ( PatternCount ( FieldType ( Get ( FileName ) ; GetValue ( _fieldNames ; _n ) ) ; "number" ) ; JSONNumber ; JSONString ) ;

	_json = If ( _fieldEmpty ; _json ; JSONSetElement ( _json ; _fieldName ; _fieldValue ; _fieldType ) ) ;
	_n = _n + 1

] ; 
//END LOGIC



//RESULT
//The result parameter is an expression that is returned when the loop stops. Just as the name implies, this is where the result of the function (i.e. the result of your calculation) will go.

	JSONFormatElements ( _json )


//END RESULT

)  //End While

This function uses a While loop to build a JSON object containing the field names and values on the specified layout.

Comments

		Jesus Sanchez, dbFile Desarrollos May 4, 2020
Great function Neil, just a comment, as you have already evaluated _fieldEmpty , you can substitute this part: _json = If ( IsEmpty ( GetField ( GetValue ( _fieldNames ; _n ) ) ) with: _json = If ( _fieldEmpty; _json; JSONSetElement..... Thanks for function.

		Neil Manchester, NDMW May 4, 2020
Hi Jesus. Great spot! I've updated the CF. Many thanks

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

JSONforLayoutFields ( Layout )

Comments

Support this website.

Support this website.