All
Accepted answers
Armin Gayl · Nov 18, 2022 go to post

Hi Andre-Claude, could you please explain your solution. I have a similar problem and could need a explination. Because i have also some troubles with the WS-Security...

Armin Gayl · Jun 8, 2021 go to post

Hi, 

Why not install in several steps?
All versions are available in the wrc.

Regards

Armin

Armin Gayl · May 21, 2020 go to post

It's great that so much feedback comes together.

An advertised advantage of Atelier is the SCM functionality. How does this look like with VSCode? Is there a manual or examples? Are there differences between VSCode and Atelier?

Unfortunately, we have no experience with this yet. 

Armin Gayl · Sep 11, 2018 go to post

Ok, quick and dirty, try this

s stream=##class(%FileBinaryStream).%New()
s stream.Filename = filename
s propertyPath = "PIDgrpgrp(1).ORCgrp(1).OBXgrp(1).OBX:5(1)"
s seg=target.GetMutableSegmentAt($P(propertyPath,":",1),.tSC)
s tSC = seg.StoreFieldStreamBase64(.stream,$P(propertyPath,":",2),,0)

set tSegString=""
    set tSegStringCleared="" 
    set tSegString = target.GetValueAt("PIDgrpgrp(1).ORCgrp(1).OBXgrp(1).OBX:5(1)")
    set tSegStringCleared = $translate(tSegString,$c(13,10))
    set tSC = target.SetValueAt(tSegStringCleared,"target.{PIDgrpgrp(1).ORCgrp(1).OBXgrp(1).OBX:5(1)}","set")

Armin Gayl · Sep 11, 2018 go to post

I'll ask again so I understand you correctly. 

You want to have another OBX segment with each CRLF or another OBX:5(*) field?
More segments would create too much overhead. 
I think the IHE Radiology Profile recommends a new segment every 62k bit.

With repeated fields in OBX:5 it's not HL7 standard conform.

Or would you like an OBX:5 field with the value ABCDEFGHIJKL...

Armin Gayl · Sep 11, 2018 go to post

Hi, this is my method to remove the crlf. 
I check every stream and remove it. 

You could also change the operation, but the problem remains if you exchange data with other systems.

ClassMethod PDFfromBase64Stream(pFilename As %String, Base64Stream As %Stream.GlobalCharacter) As %Status
{
 set SGB1=##class(%Stream.GlobalBinary).%New()
 set SGB2=##class(%Stream.GlobalBinary).%New()
 set FBS = ##class(%Stream.FileBinary).%New()
 set sc = FBS.FilenameSet(pFilename)
 
 Do FBS.Rewind()
 Do Base64Stream.Rewind()    
    while 'Base64Stream.AtEnd{
        set temp=Base64Stream.Read()
        set temp=$translate(temp, $c(13,10))
        set temp=$REPLACE(temp, "\r\n","")
        do SGB1.Write(temp)}
do SGB1.Rewind()
    while 'SGB1.AtEnd{
        set temp=SGB1.Read(5700)
        set temp=$system.Encryption.Base64Decode(temp)
        do SGB2.Write(temp)}
do FBS.CopyFrom(SGB2)
set sc = FBS.%Save()
quit sc
}

Armin Gayl · Oct 30, 2017 go to post

Hi, excuse the late reply.

the problem was an error in Ensemble 2016.1 version regarding the resource query in the Ens.DeepSee.ActivityVolumeAndDurationKPI  

// Parameter RESOURCE = "%Ens_Dashboard:USE";

Parameter RESOURCE = "%Ens_Dashboard";

After adding the permissions it worked so far, but I had to add the deep sea resource to the user.

DB_activity rw
%DeepSee_Portal u   
%Ens_Dashboard u
%Ens_Portal

 

Kind regards

Armin

Armin Gayl · Sep 28, 2017 go to post

Yes, the audit is activated, but does not issue a message. (all active)
I'll contact the WRC. 

I thank you anyway and will contact you when this is fixed. :-)

Armin Gayl · Sep 28, 2017 go to post

Hi, thank you so much, yes, it works the way you described it. 
I have extended the call with a username/password. This also works as long as I assign %ALL permissions to this user. 
Unfortunately, it does not work with any other role.  

The %Ens_Dashboard: Use is assigned to the user, also the RW authorization for the db's.
I'm sure it's a little something.... 
 

 

Not connected with datasource

 

Kind regards 

Armin

Armin Gayl · Sep 27, 2017 go to post

Hi,

actual is the URL

http://ntvensemble03/csp/activity/EnsPortal.ActivityVolumeAndDuration.zen?$NAMESPACE=ACTIVITY&$NAMESPACE=ACTIVITY&

Armin Gayl · Sep 10, 2017 go to post

Hi,

did you remember to use the existing setting in the second transformation?

Can you describe the error in more detail?
I don't think I fully understand the problem.

Mit freundlichen Grüßen

Armin

Armin Gayl · Apr 4, 2017 go to post

this is the Value from the Source Message?

 

in a 2.5 message is no primary OBX Segment but a OBXgrp.OBX 

 

Try to set the MessageSchemaCategory from the Inbound Service on 2.3

Armin Gayl · Apr 4, 2017 go to post

What is the error message displayed in the log?

Can you tell me the values of the EnsLib.HL7.Message of the initial message. (Messageviewer)
- DocType
- DocTypeCategory 
- DocTypeSecondary
- DocTypeName DFT_P03

Armin Gayl · Apr 4, 2017 go to post

Hi Graham,

please try

I think the test function works differently than the right DTL
Please tell me if it has worked.

Otherwise, try this

with the PID:PatientIDInternal(1).ID did you set the PID:3.1 please append  value in the other subfields a second step. Like this:

OR

Armin Gayl · Nov 22, 2016 go to post

Good evening,

I would save the rtf-file locally and then send as attachment.

http://docs.intersystems.com/ens20081/csp/docbook/DocBook.UI.Page.cls?K…

See attachfile.

If successful, it can be deleted.

Edit: Sorry forget the extract problem...

 set FileName = source.GetValueAt("TXA:16") or something else +rtf
 set stream = source.GetValueAt("OBXgrp(6).OBX:5.5")
 set file=##class(%FileBinaryStream).%New()
set filePath = "E:\transfer\smtp\rtfs\"
set file.Filename=Filepath_Filename
set tSc = file.Rewind()
set tSC = file.Write(stream)
set tSC = file.Rewind()
set tSC = file.%Save()

Only a idea, no functional guarantee

Best regards

Armin Gayl

Armin Gayl · Feb 3, 2016 go to post

Hi,

thanks for the answer, but it doesn´t work with my settings in the Module Mapping, the * Wildcard make some troubles. 

Maybe I'll try it again soon on a test system