User bio
Dynamic and results-driven Integration Interface Specialist with over two decades of success leading a wide range of corporate IT initiatives. Proven track record in designing and implementing integrated solutions that align with and support strategic business objectives. Adept at bridging the gap between technical systems and operational needs to create robust, scalable environments.
Core Specialties:
- Design and development of Microsoft and Oracle SQL databases
- HL7 ancillary systems integration
- Intersystems Ensemble and IRIS solutions
- Legacy systems expertise including eGate, DART, JDBC, and custom interface components
Professional Highlights:
- Deep expertise in Intersystems technologies, particularly Ensemble and Cache ObjectScript, developed through hands-on problem-solving and active engagement with the Intersystems Developer Community.
- Known for a self-driven learning style—asking the right questions, exploring solutions independently, and collaborating effectively when needed.
- Strong background in legacy integration platforms, with years of experience developing and maintaining systems and handling non-standard integration challenges.
Show all
Columbus, Ohio
Member since Mar 2, 2016
Posts:
Replies:
This is how I solved the issue...
Set tSC = pRequest.NewResponse(.tResponse) Quit:$$$ISERR(tSC) tSC
Set tResponse.encodedMessage = $get(encodedMessage)
set dMsg = $SYSTEM.Encryption.Base64Decode(tResponse.encodedMessage)
set pResponse = ##class(EnsLib.HL7.Message).%New()
set pResponse = ##class(EnsLib.HL7.Message).ImportFromString($Get(dMsg))
set pResponse.DocType = ##class(EnsLib.HL7.Schema).ResolveSchemaTypeToDocType(pResponse.TypeVersion,pResponse.Name)How would I do nested iterations if I need to get something from say example "external Positions"
"externalPositions": [
{
"pureId": 0,
"appointment": {
"uri": "string",
"term": {
"en_GB": "Some text"
}
},
"appointmentString": {
"en_GB": "Some text"
},
"period": {
"startDate": {
"year": 0,
"month": 1,
"day": 1
},
"endDate": {
"year": 0,
"month": 1,
"day": 1
}
},Certifications & Credly badges:
Global Masters badges:
Followers:
Following:
This is how i solved the issue
Set tSC = pRequest.NewResponse(.tResponse) Quit:$$$ISERR(tSC) tSC Set tResponse.encodedMessage = $get(encodedMessage) set dMsg = $SYSTEM.Encryption.Base64Decode(tResponse.encodedMessage) set pResponse = ##class(EnsLib.HL7.Message).%New() set pResponse = ##class(EnsLib.HL7.Message).ImportFromString($Get(dMsg)) set pResponse.DocType = ##class(EnsLib.HL7.Schema).ResolveSchemaTypeToDocType(pResponse.TypeVersion,pResponse.Name)