Fix for <MAXSTRING> error on big %ToJSON() calls

eduard93 · eduard93 · commit 8c47ffb3a3a6 · 2018-07-26T12:23:40.000+03:00
See: https://community.intersystems.com/post/cach%C3%A9-csp-rest-error-when-writing-back-response
diff --git a/Form/JSON/SQL.cls.xml b/Form/JSON/SQL.cls.xml
@@ -331,8 +331,11 @@ nocount - do not output count of rows</Description>
 			Set aet.total=tRS.%ROWCOUNT
 		}
 		// END - FORMS - results count
-				
-		Write aet.%ToJSON()
+		
+		// <MAXSTRING> fix
+		// See https://community.intersystems.com/node/450911/
+		Write ""
+		Do aet.%ToJSON()
 	}
 	Catch(ex) {
 		Set tSC = ex.AsStatus()

Original file line number	Diff line number	Diff line change
`@@ -331,8 +331,11 @@ nocount - do not output count of rows</Description>`
`331`	`331`	`Set aet.total=tRS.%ROWCOUNT`
`332`	`332`	`}`
`333`	`333`	`// END - FORMS - results count`
`334`		`-`
`335`		`- Write aet.%ToJSON()`
	`334`	`+`
	`335`	`+ // <MAXSTRING> fix`
	`336`	`+ // See https://community.intersystems.com/node/450911/`
	`337`	`+ Write ""`
	`338`	`+ Do aet.%ToJSON()`
`336`	`339`	`}`
`337`	`340`	`Catch(ex) {`
`338`	`341`	`Set tSC = ex.AsStatus()`