go to post Cristiano Silva · Jan 22 Thanks for recognitions!! I always try to do my best in share with others DC members.
go to post Cristiano Silva · Jan 15 Hi William, In SMP go to Interoperability->Interoperate->ASTM->ASTM Schemas Structures Via Studio go to File->OpenFile, filter by AST Document "*.ast"
go to post Cristiano Silva · Dec 6, 2023 Hi Daniel, Maybe you can download the IRIS Community version, and use the code of Ens.Job and Ens.Queue classes how a reference, and implement your own version of queue processing with $System.Event.
go to post Cristiano Silva · Dec 6, 2023 Hi Water, You can use the Method Correlate form %XML.Reader class. See the docuemtnation about importing XML into Objects.
go to post Cristiano Silva · Nov 26, 2023 Hi Nimisha. Could you give us more detailed information of the scenario? Your doubt is about loop over the resulset? Or how to retrieve value from resultset and put into a SQL Query?
go to post Cristiano Silva · Nov 21, 2023 Hi Yakov, You can set in the Connection String (JDBC) or using the adapter method SetConnectAttr Check the database documentation to see the rigth values.
go to post Cristiano Silva · Oct 23, 2023 Hi João, I think you can use the $View function with -5 mode.
go to post Cristiano Silva · Oct 16, 2023 Hello Adrian, I think the problem is that you are concatenate a String with a Stream? "DOC^Application^PDF^Base64^" _ target.{PIDgrpgrp(1).ORCgrp(1).OBXgrp(1).OBX:ObservationValue(1)} You need to create a new Stream, call method write of the new Stream with the value "DOC^Application^PDF^Base64", after append the old Stream to the new one.
go to post Cristiano Silva · Aug 2, 2023 If you are talking about HL7 messages, you can use the property FullSize in a SQL statement: SELECT ID FROM EnsLib_HL7.Message WHERE FullSize > ? Take care because this is a calulated proprety and doesn't have a index.
go to post Cristiano Silva · Jul 27, 2023 Hi John the diference between the operators &, && are https://docs.intersystems.com/iris20231/csp/docbook/DocBook.UI.Page.cls?KEY=GCOS_operators#GCOS_operators_logicalcomp_list And (& or &&) And tests whether both its operands have a truth value of TRUE (1). If both operands are TRUE (that is, have nonzero values when evaluated numerically), ObjectScript produces a value of TRUE (1). Otherwise, ObjectScript produces a value of FALSE (0). There are two forms to And: The & operator evaluates both operands and returns a value of FALSE (0) if either operand evaluates to a value of zero. Otherwise it returns a value of TRUE (1). The && operator evaluates the left operand and returns a value of FALSE (0) if it evaluates to a value of zero. Only if the left operand is nonzero does the && operator then evaluate the right operand. It returns a value of FALSE (0) if the right operand evaluates to a value of zero. Otherwise it returns a value of TRUE (1). The following examples evaluate two nonzero-valued operands as TRUE and produces a value of TRUE (1). Try to eclousere all expression in parentehsis: ( ( ( ( HL7.{MSH:SendingApplication.NamespaceID}="Epic_Cupid" ) && ( HL7.{ORCgrp(1).ORC:OrderControl} IN "NW,CA" ) ) ) && ( ( ( HL7.{PIDgrp.PV1grp.PV1:AssignedPatientLocation(1).Facility.NamespaceID} NotIn "105,205" ) && ( HL7.{ORCgrp(1).OBRuniongrp.OBRunion.OBR:UniversalServiceIdentifier.Identifier} NotIn "CATH01,EP22" ) ) )) The operator & in Business Rule e Editor is string concatenation operator. Take care. https://docs.intersystems.com/iris20231/csp/docbook/DocBook.UI.Page.cls?KEY=EBUS_rule#EBUS_ruleset_editor_expression_operators
go to post Cristiano Silva · May 26, 2023 I was accessing the Open Exchange portal in a remote machine on Finland. When I access in my local machine in Brazil works fine.
go to post Cristiano Silva · May 12, 2023 Hi @Christine Nyamu Use $Piece function to get the value of a delimited string. In you specific case: Set value = $Piece(obxValue, "<>", 2) I assumed that the variable obxValue was set before in the code. Note if the in the obx segment the value change the order like, "TESTED POSITIVE FOR ANEMIA<>BLOOD WORK WAS DONE<>TESTED NEGATIVE FOR HEPATITIS", the above sample code will fail
go to post Cristiano Silva · May 5, 2023 @Jon Astle See the setting ArchivePath in documentation. Regards.
go to post Cristiano Silva · May 5, 2023 @Humza Arshad You can create a REST API/ SOAP API, or any other kind of protocol/technology, to get authentication, retrieve and send data to IRIS. See the documentation: REST SOAP These other two link are two Open Exchange apllication to create Rest Services and Form UI. RESTForms2 RESTFormsUI2 Search in the Leraning Portal for some course that help you. Best Regards.
go to post Cristiano Silva · May 4, 2023 Hi @Vinay Purohit See the Caché documentation about CSP Sessions, I think can help you.
go to post Cristiano Silva · May 4, 2023 Create a two new classes that inherit from the "Big Class", and Override the methods that you need in each specific class. When finished remove the inheritance.
go to post Cristiano Silva · May 3, 2023 Hi @Raja Mohan and @Haitem El Aaouani Bellow a sample method ClassMethod CreatProdution(package As %String = "test", name As %String = "AutoCreatedProduction") As %Status { #Dim produtionClassName As %String = package _ "." _ name If ('$ZName(produtionClasName, 4)) { Return $System.Status.Error(5001, "Invalid Production package or name.") } // Create empty production class definition #Dim productionDefinition As %Dictionary.ClassDefinition = ##Class(%Dictionary.ClassDefinition).%New() // Set productionDefinition.Name = produtionClassName Set productionDefinition.Super = "Ens.Production" Set productionDefinition.ClassVersion = 25 // // Create the XData definition #Dim xdataDefinition As %Dictionary.XDataDefinition = ##Class(%Dictionary.XDataDefinition).%New() // Set xdataDefinition.Name = "ProductionDefinition" // Do xdataDefinition.Data.WriteLine("<Production Name="""produtionClassName"""/>") // // Insert XData Definition into Production Definition Do productionDefinition.XDatas.Insert(xdataDefinition) // #Dim statusCode As %Status = productionDefinition.%Save() // If ($System.Status.IsError(statusCode)) { Return statusCode } // Compile the production class Set statusCode = $System.OBJ.Compile(produtionClassName,"k-d") If ($System.Status.IsError(%Dictionary.XDataDefinition)) { Return statusCode } // fill in production: #Dim production As Ens.Config.Production = ##Class(Ens.Config.Production).%OpenId(produtionClassName) If ('$IsObject(production)) { Return $System.Status.Error(5001, "Unable to open new production: " _ produtionClassName) } Set production.Name = produtionClassName Set production.ActorPoolSize = 2 // // save production (and item), update production class and account for Source Control Return ##Class(EnsPortal.Template.prodConfigSCPage).CallProductionUpdateAndSaveToClass(production,"","SaveProduction") }
go to post Cristiano Silva · May 3, 2023 Hi @Mohammed Alhato The error tell that the class *User.IRISPRODTEST does not exists, did you compile this class?
go to post Cristiano Silva · May 2, 2023 Hi @Scott Roth Like the @Jeffrey Drumm told, the problem are because the Database ENSLIB are Read Only. The error occur because you are using the Macros $$$FormatText and $$$Text. When you use $$$Text macro, the macro try to create a entry in the global ^IRIS.Msg. The global ^IRIS.Msg is mapped from ENSLIB database that is by default Read Only. See imagem bellow that the ^IRIS.Msg("ENSEMBLE") is mapped, but the root global ^IRIS.Msg is mapped to the namespace data base. To solve the compilation error do change calls to $$$Text("some text", "Ensemble") for some think like $$$Text("some text", "MyDomain") Click in Replace all Then compile: For more information see the documentation String Localization and Message Dictionaries Regrads.