レコードをJSONとして取得

詳細
カテゴリ: FileMaker Custom Function
参照数: 1960

フィールド名を key として、1レコード分のデータを json として取得。

除外フィールド:計算,集計,オブジェクト,グローバル

FileMaker Pro 18 以降

 

繰り返しフィールド対応版は、コチラ。
GetRecordAsJSON2 ( TableName )
レコードをJSONとして取得(繰り返しフィールド対応)
https://fm-aid.com/custom-function/28-getrecordasjson2

function(関数):
GetRecordAsJSON ( TableName )
Sample input(入力例):
GetRecordAsJSON ( "TableName" )
Sample output(出力例):
{"FieldName01":"Value01","FieldName02":"Value02",.....}
formula(式): 

Let (
[
￠query = " SELECT TableName ,FieldName
FROM FILEMAKER_FIELDS
WHERE TableName = '{TableName}'
AND
FieldClass = 'Normal'
AND
FieldType NOT LIKE 'global%' /*除外 グローバルフィールド*/
AND
FieldType <> 'binary' /*除外 オブジェクトフィールド*/

"
;￠query=Substitute ( ￠query ; "{TableName}" ; TableName )
;￠FieldNames = ExecuteSQL ( ￠query　; "::" ; "" )
]; 

While ( 
	[ 
		￠json=""
		;￠MAX = ValueCount ( ￠FieldNames )
		;￠n= 1 
	] ; 
	￠n <= ￠MAX ; 
	[
		￠FieldName=GetValue ( ￠FieldNames ; ￠n )
		;￠key = GetValue ( Substitute ( ￠FieldName ; "::" ; ¶ ) ; 2 )
		;￠json = JSONSetElement ( ￠json ; ￠key ; GetField ( ￠FieldName ) ; JSONString)
		;￠n=￠n+1
	] ;
	￠json
)

)