New post
AllAccepted answers
Javier Gonzalez · Jul 14, 2017

My problem was that I had disabled the user UnknowUser and could not access the management portal. I needed to reactivate the user. He could not access the terminal either.

The solution that you proposed to Natasa and that it worked for her, used by Docker, the reality is that I did not know how to implement it since I do not know what is docker. I thank you that you can tell the community about what goes docker and so we document a little more.

Thank you !

Javier Gonzalez · Jun 6, 2017

Thanks Sean,

 

With %RegisteredObject occurring same as with %Library.DynamicObject, the dynamic attribute is not serialized.

The REST service architecture is a BusinessService that invokes a BusinessOperation. In this BO I have a block "code" that does the following:

set response.Value="OK" 
set response.Res.Message = "I am a message"    
set response.Res.Code = 999
set response.Res.Info = ##class(CitaResponseOMI360).%New()
set response.Res.Info.idCita = 1

 

Return to the BS, I perform the serialization with class:

##class(Ens.Utils.JSON).ObjectToJSONStream(tRsp, .tStream)

and return the result with:

do tStream.OutputToDevice ().

The result of invoking the  REST service from POSTMAN or SOAPUI is this:

{
  "Value": "OK",
  "Res": {
    "Code": "999",
    "Message": "I am a message"
  }
}

From the terminal this is the result

"{"_$c(13,10)_"    ""Value"":""OK"","_$c(13,10)_"    ""Res"": {"_$c(13,10)_"        ""Code"":""999"","_$c(13,10)_"        ""Message"":""I am a message"","_$c(13,10)_"        ""Info"": {"_$c(13,10)_"            ""idCita "":""1""}"_$c(13,10)_"    }"_$c(13,10)_"}"

 

In order to provide some detail, this is the definition of the classes involved:

Class Respuesta Extends (%SerialObject, %XML.Adaptor) {
Property Value As %String;
Property Res As RespuestaNodo;
}

 

Class RespuestaNodo Extends (%SerialObject, %XML.Adaptor) {
Property Code As %String;
Property Message As %String;
Property Info As %RegisteredObject;
}

 

Class CitaResponseOMI360 Extends Ens.Response
{
Property idCita As %String;
Property FechaHora As %TimeStamp;
Property agenda As AgendaOMI360;
Property paciente As PacienteOMI360;
Property observaciones As %String;
Property estado As %String;
​}

 

I thank your contribution because I am confused.