I am working on JSON and want to be prepared to handle large Objects. I try this code:
ClassMethod MaxLen() As %Status
{
set longStr=""
for i=1:1:$SYSTEM.SYS.MaxLocalLength() { set longStr = longStr_"x" }
write "Maximum string length = "_$LENGTH(longStr)
;
set longObject = {"a":(longStr),"b":(longStr)}
set file=##class(%File).%New("/tmp/longObjectFile.txt")
do file.Open("WSN")
do longObject.%ToJSON(file)
do file.Close()
;
do file.Open("RS")