In one of my method, I proceed like this :

Set objJSON = {}
Set objInfo1 = []
Set objInfo2 = []

Populate your Info1 like this : 

While(i < X)
{
    Set objData = {}
    Set objData.name_i = Value_i
    
    // Push Value in info1
    do objInfo1 %Push(objData)    
}

Add your info1 to object JSON result : 

Set objJSON."info1" = objInfo1 

Then populate info2 

While(i < X)
{
    Set objData = {}
    Set objData.name_i = Value_i
    
    // Push Value in info2
    do objInfo2 %Push(objData)    
}

Add your info2 to object JSON result : 

Set objJSON."info2" = objInfo2 

In your response, return the result : 

Set pResponse.result = objJSON.%ToJSON()

I hope this will help u.

Regards

// If file exist

If ##class(%File).Exists("path/filename")

Regards,

Cedric