JSON Serialisation and Deserialisation Code Sample

Key Objects Used

• finBL.Runtime.WebUtilities
• ISKeyValueList

Code

' ── Serialise an object to JSON ──
Dim Accounts As New List(Of AccountDetails)
Dim jsonOutput As String

' Add items to a collection
Accounts.Add(New AccountDetails("ACC001", "Personal Loan"))
Accounts.Add(New AccountDetails("ACC002", "Home Loan"))

' Serialise the list to a JSON string
finBL.Runtime.WebUtilities.SerialiseObjectToJsonString(Accounts, jsonOutput)
' Result: [{"AccountId":"ACC001","Name":"Personal Loan"}, ...]

' ── Parse JSON parameters from an HTML Widget ──
Dim Parameters As ISKeyValueList = finBL.CreateKeyValueList()
Parameters.FromSimpleJsonString(parametersJson)

' Read typed values from the key-value list
Dim amount As Decimal = Parameters.GetDecimal("Amount")
Dim term As String = Parameters.GetString("Term")
Dim includeInsurance As Boolean = Parameters.GetBoolean("IncludeInsurance")