Shopping Cart

Free Newsletter
Signup

Contact

FileMaker is a registered trademark of FileMaker, Inc. in the U.S. and other countries.

FileMaker Pro Custom Functions

List | Show Random | Upload | Add This to Your Site

@JSONFormatElements ( json )

Rate this function:

Average rating: 5.0 (1 vote)
Discuss this Custom Function

Alex Zueiv, Tashkent
http://N/A

Formats JSON data in two columns: elements hierarchy and values. Version 2.0

Sample Input:

@JSONFormatElements ( "[{\"exclamation\":\"Hello\"},[{\"punctuation\":\" \"},[{\"noun\":\"World\"},[{\"punctuation\":\"!\"}]]]]" )

Sample Output:

[
    {
        "exclamation"               : "Hello"
    },
    [
        {
            "punctuation"           : " "
        },
        [
            {
                "noun"              : "World"
            },
            [
                {
                    "punctuation"   : "!"
                }
            ]
        ]
    ]
]

// @JSONFormatElements ( json ) // // A recursive function for formatting JSON documents. // Version 2.0 created 2018-05-15 by Alex Zueiv // // Calls the original JSONFormatElements() function, and then adjusts the // result to emulate a two-column view (hierarchy of the elements and a // list of their values) by aligning the values using additional spaces. // // Example: @JSONFormatElements ( "[{\"exclamation\":\"Hello\"},[{\"punctuation\":\" \"},[{\"noun\":\"World\"},[{\"punctuation\":\"!\"}]]]]" ) // // Tip: Apply a fixed-width font to align the columns. // // Note: This function calls two recursive subroutines by setting isolated // global variables and passing special parameters to itself (see below). If ( Left ( json ; 1 ) = "@" ; /* recursive subroutines */ Let ( [ $$i = $$i + 1 ; STR = GetValue ( $$jsn ; $$i ) ; POS = If ( Left ( Trim ( STR ) ; 1 ) ≠ "[" ; Position ( STR ; ": " & Filter ( "\"" ; Right ( STR ; 2 ) ) ; 1 ; 1 ) ) ] ; Case ( json = "@max()" ; // get max colon position Max ( POS ; If ( not IsEmpty ( STR ) ; @JSONFormatElements ( "@max()" ) ) ) ; json = "@align()" ; // align data column List ( If ( POS ; Replace ( STR ; POS ; 0 ; Left ( $$sps ; Length ( $$sps ) - POS ) ) ; STR ) ; If ( not IsEmpty ( STR ) ; @JSONFormatElements ( "@align()" ) ) ) ; // else, return FMP error message JSONFormatElements ( json ) ) ) ; /* main function */ Let ( [ jsn = $$jsn ; i = $$i ; sps = $$sps ; $$jsn = Substitute ( JSONFormatElements ( json ) ; Char ( 9 ) ; " " ) ; $$i = 0 ; MX = Ceiling ( ( @JSONFormatElements ( "@max()" ) - 1 ) / 4 ) * 4 + 1 ; $$sps = Substitute ( Right ( SetPrecision ( 1/3 ; MX ) ; MX ) ; 3 ; " " ) ; $$i = 0 ; RSLT = If ( Left ( $$jsn ; 1 ) = "?" ; $$jsn ; @JSONFormatElements ( "@align()" ) ) ; $$jsn = jsn ; $$i = i ; $$sps = sps ] ; RSLT ) )
Then copy & paste into FileMaker Advanced's Edit Custom Function window.

Description:

This CF is intended for developers. It allows you to visually separate the data from the document structure. This makes working with JSON API more comfortable.

Required FM16+ (no runtimes).

In this version, the previous CF was completely rewritten. Now it calls recursive subroutines by passing special parameters to itself. FMP functions JSONGetElement() and JSONListKeys() were removed. Complex hierarchical loop was replaced by two linear loops to process formatted JSON document as a plain list of values. This way it works much faster, but you should avoid using ": " in key names.

Previous version of this CF: http://www.briandunning.com/cf/2127

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

This is my Custom Function and I want to edit it

Discuss:

There are no comments yet. Be the first to post a comment about this Custom Function! Please try to keep it brief & to the point. Anyone can post:

Download the Custom Function Dashboard Widget for OS X
Keep all the latest Custom Functions right at your fingertips!

Newest Custom Functions:

1.	HexUUIDToNum_cf (_uuid)
	(Sat, Jun 16, 1:55pm)
2.	httpResponseCode ( responseHeaders )
	(Tue, Jun 12, 10:40pm)
3.	FindDuplicateCharacters ( string )
	(Fri, Jun 08, 5:01pm)
4.	FieldRepetitionLast ( field ; maxRepetition )
	(Wed, Jun 06, 6:05pm)
5.	CountModifiedRecords ( NameTimestampField ; StartTimestamp ; EndTimestamp )
	(Mon, May 28, 8:23am)
6.	JSONArrayLength ( JSONArrayStr )
	(Fri, May 25, 7:46am)
7.	interpolation (y1; y2; y3; x1; x2; x3; x1y1; x2y1; x1y2; x2y2; rnd)
	(Sat, May 19, 3:55am)
8.	@JSONFormatElements ( json )
	(Tue, May 15, 3:31am)