/// Server-side method to provide content to JSON providers.<br/>
/// <var>pWhich</var> is the name of the provider.<br/>
/// <var>pKey</var> is an app-defined key that is used to indicate which content is to be served.<br/>
/// <var>pCriteria</var>is an object containing search criteria. This is used for searching.<br/>
/// <var>pParms</var> is an array of additional parameters from the JSON provider. (not current used).<br/>
/// <var>pObject</var> is the object that will be served to the client in JSON format.<br/>
/// <var>pLoad</var> is true is this is called when the page is first being served. In this case, this method will be 
/// called even though there may a client-side method used to load the content.<br/>
ClassMethod %OnGetJSONContent(pWhich As %String, pKey As %String, ByRef pParms, Output pObject As %RegisteredObject, pCriteria As %RegisteredObject, pLoad As %Boolean = 0) As %Status
{
  #dim sql As %String = ""
  #dim tsc As %Status = $$$OK
  #dim result As %SQL.StatementResult
  
  set pObject = ##class(%ZEN.proxyObject).%New()
  
  if (pKey = "home") {
    set pObject.sectionHeader = "Branch List"
    set pObject.personList = ##class(%ListOfObjects).%New()

    set branchId=""
    for  {
      
      set branchId=$Order(^MobileApp.Branch(branchId)) quit:branchId=""
      set person = ##class(%ZEN.proxyObject).%New()
      set person.id = branchId
      set person.name = $P(^MobileApp.Branch(branchId),"^",3)
      set person.ssn = $P(^MobileApp.Branch(branchId),"^",9)
      do pObject.personList.Insert(person)      
      
            
      }
    
  } elseif (pKey = "show-branch") {
    
    set pObject.sectionHeader = "Branch Detail"
    
    set branchId=pCriteria.id
    
    set pObject.id = branchId
    set pObject.name = $P(^MobileApp.Branch(branchId),"^",2)
    set pObject.home = ##class(%ZEN.proxyObject).%New()
    set pObject.home.street = $P(^MobileApp.Branch(branchId),"^",4)
    set pObject.home.city = $P(^MobileApp.Branch(branchId),"^",5)
    set pObject.home.county = $P(^MobileApp.Branch(branchId),"^",6)
    set pObject.phone = $P(^MobileApp.Branch(branchId),"^",8)
    
  }
  
  quit $$$OK
}

callbackFunction({"Person":[{"PersonID":1,"Name":"Alan"},{"PersonID":2,"Name":"Brian"}]});

 s s="callbackFunction({""Person"":[{""PersonID"":1,""Name"":""Alan""},{""PersonID"":2,""Name"":""Brian""}]});"
 w $e(s,18,*-2)