Thank you Robert. That has worked. 

In case someone would like to add the Mirror Monitor to the app I managed to do it using the following:

s rs = ##class(%ResultSet).%New()
s rs.ClassName="SYS.Mirror"
s rs.QueryName = "MemberStatusList"
d rs.Execute("MIRRORNAME")

s arrayMessage = []

While rs.%Next() {
s obj  = {}
  DO obj.%Set("MirrorMemberName", rs.GetData(1))
  DO obj.%Set("CurrentRole", rs.GetData(2))
  DO obj.%Set("CurrentStatus", rs.GetData(3))
 
  Do arrayMessage.%Push(obj)
}

Hi @Joan Cruz 

Can you tell me how you managed to get the information?

I am trying to do something similar but to show the information in a CSP page.

Best Regards,

Joao Palma