go to post David Reche · May 4, 2016 I understand you want to retrive images?In that case I used C-MOVED. You can send a C-MOVED to the PACS and establish the target to Ensemble, so Ensemble will receive a C-STORE and then you can save the DICOM Message to disk.¿Makes sense?
go to post David Reche · May 4, 2016 Yes.. sorry was a typing error... I used GetAt: <when condition="Document.myList.GetAt(1)="AA""> Moreover assume here that we use %ListOfDataTypes... the problem is the same using any type of List Class Test.TestMessage Extends Ens.Request { Property myList As list Of %String; } Thanks !!
go to post David Reche · May 4, 2016 ERROR <Ens>ErrParsingExpression: Error al analizar la expresión 'Document.myList.GetAt(1)="AA"': ERROR <Ens>ErrInvalidToken: Token no válido en el desplazamiento 22 > ERROR #5490: Error $ZE='HCIS.Rules.Test:evaluateRuleDefinition' al ejecutar el generador del método '%2'. > ERROR #5030: Se produjo un error mientras se compilaba la clase HCIS.Rules.Test
go to post David Reche · Feb 17, 2016 But ... another problem...What if a need to send a JSON object with properties with underscore characters like "not_a_number"?Is because that I used %ZEN.proxyObject...
go to post David Reche · Feb 17, 2016 PERFECT !!I see now my mistake I fixed the code like this:Class test.DummyClass Extends %RegisteredObject{Property notanumber As %String;Property aboolean As %Boolean;Method outout2JSON(){ set tBody = ##class(%GlobalCharacterStream).%New() do ##class(Ens.Util.JSON).ObjectToJSONStream(##this,.tBody,"aelotw") w tBody.Read()}ClassMethod Test(){ set dummy = ##class(test.DummyClass).%New() set dummy.notanumber = "28001" set dummy.aboolean = 1 do dummy.outout2JSON()}} And now:USER>do ##class(test.DummyClass).Test(){ "notanumber":"28001", "aboolean":true}
go to post David Reche · Feb 17, 2016 Stefan. I used a registered class with typed properties and doesn't works I made this test class: Class test.DummyClass Extends %RegisteredObject { Property notanumber As %String; Property aboolean As %Boolean; Method outout2JSON() { set tProxyRequest = ##class(%ZEN.proxyObject).%New() set tProxyRequest.notanumber = ..notanumber set tProxyRequest.aboolean = ..aboolean set tBody = ##class(%GlobalCharacterStream).%New() do ##class(Ens.Util.JSON).ObjectToJSONStream(tProxyRequest,.tBody,"aelotwu") w tBody.Read() } ClassMethod Test() { set dummy = ##class(test.DummyClass).%New() set dummy.notanumber = "28001" set dummy.aboolean = 1 do dummy.outout2JSON() } } And this is the result : USER>do ##class(test.DummyClass).Test(){ "aboolean":1, "notanumber":28001}USER>w $zvCache for Windows (x86-64) 2015.2.1 (Build 705U) Mon Aug 31 2015 16:45:59 EDT What's wrong? Thanks
go to post David Reche · Jan 25, 2016 I think the repo is well created and populated https://github.com/drechema/ensemble-smime Tell me if works and anything you need in order to fork it
go to post David Reche · Jan 24, 2016 Thanks Timur, I want to use Atelier, but in that case the source classes are not XML projected. There is any "indication" about the Repository format. In other hand, yes, I know how to create and publish the Repository, but my doubt is about how to fork it on https://github.com/intersystems, I guess you re-create the repository there, true? Thanks for the clarification
go to post David Reche · Dec 3, 2015 Stefan, the link gives me "Sorry, the page you were looking for in this blog does not exist"