Oooh, I like this way more than my approach!
- Log in to post comments
Oooh, I like this way more than my approach!
I would recommend approaching this in three parts:
For #1, this could be as basic as:
Class Demo.Messages.SystemX.CustomBody Extends Ens.Request
{
Property Param1 As %String;
Property Param2 As %String;
Property Param3 As %String;
Property Etc As %String;
}For #2, your transform would then be something like:
.png)
And then for #3, your file operation would be something along the lines of:
Class Demo.Operations.SystemX.FileWriter Extends Ens.BusinessOperation
{
Parameter ADAPTER = "EnsLib.File.OutboundAdapter";
Property Adapter As EnsLib.File.OutboundAdapter;
Parameter INVOCATION = "Queue";
Method OnMessage(pRequest As Demo.Messages.SystemX.CustomBody, Output pResponse As Ens.Response) As %Status
{
Set Line1 = pRequest.Param1_"|"pRequest.Param2
Set Line2 = pRequest.Param3_"|"pRequest.Param4
Set Line3 = pRequest.Param5_"|"pRequest.Param6
Set outString = Line1_$C(13)_$C(10)_Line2_$C(13)_$C(10)_Line3_$C(13)_$C(10)
Set fileName = "Filename"
Set sc = ..Adapter.PutString(fileName_".dat",outString)
Quit sc
}
}
Please note that the above is a super rough draft - there's no error handling, and you'd need to consider how you'd make the filename unique per message, but I'm hoping this gets you on the right path.
I don't have anything immediately to hand as I still feel that the reuse of code in Step 3 from the original class method is not best practice, although I do have this running in a live production for 2-3 operations where this was needed.
I will try and see if I can get something put together that can be exported and put onto the Open Exchange. Just a warning, I'm not one for Docker, so it'll be a Production deployment export ![]()
Hey Yuri.
The users are held within the SQL table "Security.Users" in the %SYS namespace, so you could use embedded sql to return the information, however as you're unlikely to be executing your code directly from the %SYS namespace, I'd suggest creating a function that you pass the email address, and it returns the username.
Something like:
Class Demo.Utils.General.Users
{
ClassMethod UserFromEmail(Email As %String, Output Username As %String) As %Status
{
//Initially set this to null, as we want to return it empty when we get no results
Set Username = ""
//Hold the Namespace within a variable so we can use the variable to set the namespace back once the SQL has been run.
Set CurrNamespace = $NAMESPACE
//Change NameSpace to %SYS
Set $NAMESPACE = "%SYS"
//Run query to get the Username based on the email address - note the use of the UPPER function to remove issues with case sensitivity
&SQL(
Select ID into :Username
FROM Security.Users
WHERE UPPER(EmailAddress) = UPPER(:Email)
)
//Set namespace back to the namespace the function was run from
Set $NAMESPACE = CurrNamespace
//Evaluate SQLCODE for result
//Less than 0 is an error.
If SQLCODE <0{
WRITE "SQLCODE="_$SYSTEM.SQL.Functions.SQLCODE(SQLCODE)
QUIT 0
}
//Greater than 0 can really only mean Code 100, which is no results found.
If SQLCODE > 0 {
QUIT 1 //No Result Found
}
Else {
QUIT 1 //Result Found
}
}
}
DEMO> WRITE Class(Demo.Utils.General.Users).UserFromEmail("YuriMarx@ACME.XYZ",.Output)
1
DEMO> WRITE Output
YMARXThis is by no means perfect as I have thrown it together for the example - please forgive the messy if/else's! ![]()
There's a few "gotchas" when it comes to Character Encoding. But the key thing in you case is understanding the character encoding being used by the receiving system. This should be something specified in the specification of the receiving system, but many times it's not.
If I had to guess, it's most likely that the receiving system is using UTF-8 simply because latin1/ISO-8859-1 encodes the pound symbol as hex "A3" whereas UTF-8 encodes to "C2 A3". As there's no solitary "A3" in UTF-8, there's nothing to print, which is why you get the ? instead. I'm sure there's other character sets where this can happen, but I would start there.
Hey Joe.
To quickly answer your second question: you will want to take a look at the table Ens.MessageHeader which contains the Session ID, and then the Ens.MessageBody which is linked to the Ens.MessageHeader on the field "MessageBodyId".
Hi Thomas.
Are you trying to connect to the same API endpoint from Test and Live?
Is it possible that the end point is performing IP filtering so your request from the Live server is being rejected?
Hey Andy.
When you're copying the router from your production, it will continue to reference the same rules class in the settings as per:
.png)
After you have copied the Router, you will want to hit the magnifying glass and then use the "Save As" option in the Rule Editor. After you have done this, you can then go back to your Production and then change the rule assigned to your Router via the drop down to select the new rule.
Just make sure you create a new alias for your Rule on the "general" tab on the rule page.
Hey William.
I'm pretty sure you just need to query the table Ens.MessageHeader.
This should give you the process by way of the column SourceConfigName, and the status of the discarded messages.
For example:
You may want to consider including a time range depending on the size of the underlying database.
I ended up extending EnsLib.HL7.Operation.TCPOperation and overwriting the OnGetReplyAction method.
From there, I coped the default methods content but prepended it with a check that does the following:
If any of the above fail, the response message is passed to the original ReplyCodeAction code logic, otherwise it quits with the result from the Lookup Table.
The use of the Lookup Table then makes adding/amending error actions accessible to the wider team rather than burying it within the ObjectScript, and having the failsafe of reverting to the original ReplyCodeAction logic keeps the operation from receiving an unexpected error and breaking as it has the robustness of the original method.
Hey Patty.
If you just simply need the empty NTE to be added in using the DTL, you can set the first field to an empty string to force it to appear.
For example:
.png)
Will give this:
.png)
Note that my example is simply hardcoding the first OBX repetition of every first repeating field with no care for the content. You will likely need to do a for each where you evaluate if the source NTE:1 has a value, and then only set to an empty string if there is no content in the source.
Hey Kev.
The main way to build upon this would be to use something like Prometheus and Grafana to pull data out and then display it in a human readable way, and it has been covered on the forums a few times.
However, if you were to upgrade past IRIS 2020, you should find that you are able to utilise System Alerting and Monitoring (SAM) in your environment.
I have added these to my initial response ![]()
Mainly major version jumps unless something is problematic in the version that has ended up in our production environment.
Last jump was 2019.1 to the current 2022.1 and I'm blaming the pandemic on no upgrades between those two releases ![]()
Seeing as I just completed a production upgrade yesterday:
So upon further review, it seems that the first ACK is being generated by the Operation, and the second one is the body of the HTTP Response.
Basically, the operation will attempt to parse the http response into a HL7 message, and if that doesn't happen, it will then "generate" an ack and write the http response data at the end of the generated ack.
In my case, although there is a HL7 message in the response, it's not being parsed for some reason, so the code moves onto generating its own ack, followed by the http response body, which is the second ack I was seeing.
I'm now replicating the HTTP operation and attempting to pin down exactly where it's falling down, and failing that I will likely reach out to WRC as it seems to be an issue deeper than I can dive.
Hey Lionel.
I did write an article about this a little while ago which I hope can walk you through what you're looking to achieve, with the difference being to pivot from using the ORCGrp counts like I had, and instead using RXCgrp and then setting the transform to have a source and target class of RDE O11.
If you do ty to follow this approach, I'm more than happy to answer any questions you have.
Hey Marc.
Thank you for sharing this - I have no idea how I have yet to come across this!
If you have a record map configured and have the generated class, then the next step would be to use this generated class in a transform as your source. From there, you can transform the data into the SDA class you have set in your target for transform.
Once you have this SDA message, you can send it wherever your requirements need you to send them.
If you're working with a CSV, then you could look at the Record Mapper or Complex Record Mapper depending on the input format. From there, you could then create a transform that uses the generated class from the record mapper as your source, and then the appropriate SDA class as your destination.
However, if you're working with an actual xls/xlsx file, then I'm out of ideas.
Hey Marc.
Firstly, thank you for sharing this. This does seem to closely follow what I had intended to use, with a slight variation or two.
Would you mind giving some insight on this line "set tReadLen=..#CHUNKSIZE" as I'm not familiar with the use of the # symbol in this way. Is this acting as a modulo in this context?
...
Your Process is most likely using ..SendRequestAsync() to send to the Operation and has "pResponseRequired" set to 1 (or not set at all, so it's using the default value of 1).
There's nothing inherently wrong with this, but if you just want to send to the Operation and not worry about the response going back to your process, you could change the "pResponseRequired" flag to 0 in your call. So it would look a little like this:
Set tSC = ..SendRequestAsync("TargetOperationName",ObjToSend,0)However you may wish to consider if this approach is appropriate to your setup, or if you would be better off using "SendRequestSync()" and dealing with the response synchronously.
To parse the json, the below is a starting point for taking the content of the stream into a dynamic object, and then saving the value into its own variable.
Set DynamicObject=[].%FromJSON(pRequest.Stream)
Set Name = DynamicObject.name
Set DOB = DynamicObject.DOB
Set SSN = DynamicObject.SSNYou could then store these wherever you need to. If your SQL table is external, then you could have your Operation using the SQL Outbound Adapter to then write these in your external DB.
ETA: If you then need to pick out the values within the content of name (which I assume has come from a HL7 message) you could use $PIECE to pick out the data from the delimited string you're receiving.
Hey Daniel.
As a starting point, I would not be adding the trace when viewing the DTL in Studio, and instead I would add it when using the Data Transformation Builder:
.png)
Which gives me:
.png)
If this is not working for you, make sure that the router has "Log Trace Events" enabled in the router settings and the router has been restarted since enabling the trace. I have been caught out numerous times enabling the trace and then forgetting to restart the process/router in the production.
The issue of no results being returned is likely elsewhere in your query.
To test this, I created a basic table with the following:
CREATE TABLE Demo.BBQ (
Name varchar(100),
Type varchar(50),
isActive bit
)And I then added a few rows:
Insert into Demo.BBQ (Name, Type, isActive)
VALUES('Super Grill''s BBQ Hut','Outdoor',1)Insert into Demo.BBQ (Name, Type, isActive)
VALUES('Bobs BBQ Bistro','Indoor',1)Insert into Demo.BBQ (Name, Type, isActive)
VALUES('Rubbish Grill''s BBQ Resort','Not Known',0)This then gave me a table that looks like this (note that the double single quotes used in the insert are inserted as a single quotes into the table):
.png)
If I then run a query using the like function:
.png)
And if I want to exclude the inactive location:
.png)
The use of doubling up a single quote to escape the character is not a Intersystems specific approach, but is generally a standard SQL way of escaping the single quote.
Lose one of the single quotes where my arrow is (there was a typo in my first reply).
.png)
That way your final line should be:
like '%Forceps McGill''s Neonatal NETS%' and i.Active = 1
There's two ways around this:
Hey Scott.
I'm not sure if this will work at all, but have you tried extending your timeout for your CSP gateway?
Management Portal -> System Administration -> Configuration -> Web Gateway Management is the route to this. The username you'll then need is "CSPSystem" and the password should be the default password used when installing the system.
From within here you can navigate to "Default Parameters" and increase the Server Response Timeout parameter.
That just means you're one step closer to solving the issue!
What are the data types for each field you're attempting to insert into?
Have you tried just inserting a row with just 1 of the fields populated? Something like:
INSERT INTO Phu_Replay_Schema.ReplayMessageModel (Completed) VALUES (1)