Have a look at the project https://openexchange.intersystems.com/package/JsonTraceViewer

In this project json messages are formatted

cdef.Properties.GetAt(i).Parameters.GetAt("MAXLEN")