JSON.GetValueLists ( isVirtualList )

This creates JSON that can be used to look up an id or JSON designed to populate a Virtual List

Be the first to rate this function Log in to vote

Kyle Williams - Show more from this author
Augusto Digital
https://www.youtube.com/channel/UCpJlB7cmVNMjbjgY96MEsng

Sample input:

JSON.GetValueLists ( 1 )
JSON.GetValueLists ( 0 )
JSONGetElement ( JSON.GetValueLists ( 0 ), 4 ) = "Difficulty"
JSONGetElement ( JSON.GetValueLists ( 0 ), "Difficulty" ) = 4

Sample output:

[
{
"id" : "1",
"name" : "CC_YearExp"
},
{
"id" : "2",
"name" : "Staff"
},
{
"id" : "3",
"name" : "Location"
},
{
"id" : "4",
"name" : "Difficulty"
},
{
"id" : "5",
"name" : "Time"
},
{
"id" : "6",
"name" : "Color"
}
]

-------------------------

{
"1" : "CC_YearExp",
"2" : "Staff",
"3" : "Location",
"4" : "Difficulty",
"5" : "Time",
"6" : "Color",
"CC_YearExp" : "1",
"Color" : "6",
"Difficulty" : "4",
"Location" : "3",
"Staff" : "2",
"Time" : "5"
}

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

/* Author: Kyle Williams
   Date:   12/18/2020
   This was originally designed to populate a virtual list portal, however, I quickly realized this could also work to allow someone to easily lookup a value list's ID or Name as well
*/

Case( 
isVirtualList = 1;

While ([ 
//initialVariable 
	 VL_Names = ValueListNames ( "" )
	;VL_IDs   = ValueListIDs ( "" )
	;FoundCount = ValueCount ( VL_IDs )
	;LoopCount = 1
	;JSON = "[{}]"
]; 
//condition 
	LoopCount ≤ FoundCount

;[ 
//logic 
	JSON = JSONSetElement (JSON
			;[ "["& LoopCount - 1 & "]id"   ; GetValue ( VL_IDs   ; LoopCount ); JSONString ]
			;[ "["& LoopCount - 1 & "]name" ; GetValue ( VL_Names ; LoopCount ); JSONString ]
 ) 
	;LoopCount = LoopCount + 1

]; 
//result 
JSONFormatElements ( JSON )

)

; //Else is for Lookup Purposes

While ([ 
//initialVariable 
	 VL_Names = ValueListNames ( "" )
	;VL_IDs   = ValueListIDs ( "" )
	;FoundCount = ValueCount ( VL_IDs )
	;LoopCount = 1
	;JSON = ""
]; 
//condition 
	LoopCount ≤ FoundCount

;[ 
//logic 
	JSON = JSONSetElement (JSON
			;[ GetValue ( VL_Names ; LoopCount )  ; GetValue ( VL_IDs   ; LoopCount ); JSONString ]
			;[ GetValue ( VL_IDs ; LoopCount )  ; GetValue ( VL_Names   ; LoopCount ); JSONString ]
 ) 
	;LoopCount = LoopCount + 1

]; 
//result 
JSONFormatElements ( JSON )

)
)

I created this function to populate a virtual list portal and then realized that it might be nice to have an easy way to lookup a value list's ID by its Name or to be able to look up it's Name by its ID..

Comments

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

JSON.GetValueLists ( isVirtualList )

Comments

Support this website.

Support this website.