Here is an example (test.txt) . The docode Base64 is done at Cloveleaf level using a tcl script at inbound tps (fonemedDoc.tcl).

Regards

We are receiving a Base 64 report on an HL7 message but the source are sending on the OBX-5 a Line Feed at the end. He is not able to remove the Line Feed and we want to do it in Cloverleaf . How we can do it in tcl or xlate?

Thank you in advance

Mahmoud

I did a restore config for a webservice from my Prod running cloverleaf 6.1.3 under AIX 7.2 to a cloverleaf 2022.09.03 under AIX 7.2.

My webservice uste a tcl that will initiate a package require Oratcl to query after an oracle database to get ADT information.

I’m getting the following error Cannot connect on processes log:

ESAPI: Not…Read more

I want to check with you if you have a TclCurl script to share doing this: to CALL a jason API following these steps:

1-New Token Path/oauth/token
Request Method POST
Headers Content-Type: application/json
The access token can be provided retrieving a token using the method POST

2-Add Patient Path…Read more

I’m looking for a curl tcl script to :

1 -initiate a POST Token API  jason  Authorization: Bearer token

2- Add Patient using POST to jason API when i get the Token

Thanks

I’m developing for a first time an interface to send ADT to Jason API.

How can i configure my thread to do the following steps:

1-New Token Path/oauth/token

Request Method POST Headers

Content-Type: application/json

2-Add Patient Path /endpoint/patients/

Request Method POST

Headers Content-Type: application/json

Authorization:…Read more

What i need is to send ADT to Jason API .

1-Add Patient Path /endpoint/patients/
Request Method
POST
Headers Content-Type: application/json
Authorization: Bearer oauth_access_token
Description
Use this method to add eligibility data for a new patient

2-Update Patient
Path
/endpoint/patients/id
Request…Read more

I’m looking for a tcl script to convert HL7 2.3 ADT transactions to JSON.

Thanks in advance

Mahmoud

Is there a GM Cloverleaf API for Cloverleaf version 6.1.3 under Aix ? Is there any documentation how to configure it ?

Thank you

The script TCL for example and shell scripting can be run on a cron job and save it on a MYSQL database and after somebody can query the table and have all the information on the Grafana Dashboard….

I know that Cloverleaf has an API, how can we use it ???

Thank you

We are runing Cloverleaf 6.1.3 under Aix 7.2 and we are trying to make a dashboard for our Cloverleaf engine using a script that will show status for all the connections (opening, up, down) and also accumulation for every thread without affecting the engine.

Any suggestion will be very welcome

Best Regards

Mahmoud

Here is a example:

tcl>set a “~*”
~*
tcl>regsub -all — {*} $a “”

You can add the following script hciregsub.tcl on outbound TPS with arg {*} “”

Hope it will help you

Regards

Thank you

Thank you for your pint screen. It’s working now.

Have a great day

Thank you for your response. I will do and get back to you.

I found your post in 2018 but without the *.png files. Is it possible for you to make a print screen for the xlate and the proprietes for the outbound protocol.

Best Regards

Here is the error i’m getting:
<pre>[java:wrte:ERR /0:BI_checkBdOut_0:02/11/2020 15:36:35] Call to “doMsg” returned error string “BADDATA caught exception trying to processMessageFromCloverleaf: Failed to write message to database: The multi-part identifier “moe.dt_msg” could not be bound.”. Returning bad send to engine.
[dbp :wrte:ERR…Read more

I was able to connect to the SQL database after creating the Table schema List. The problem now is the following error:

[dbi :elog:INFO/0:BI_checkBdOut:02/08/2020 18:05:12] [0.0.943484155] Setting error context for message
[dbi :elog:INFO/1:BI_checkBdOut:02/08/2020 18:05:12] [0.0.943484155] Context: BADDATA caught exception trying to…Read more

I defined my Database Connection through Options/Site Options/Database Configurations from the GUI but when i tried to use Protocol:database-outbound on my thread nothing showed on Database Connection, but when i use protocol:database-inbound i was able to see my Database connection (see inbound-outbound.doc)

Thank you

I’m using a database_inbound Protocol on a thread to to an insert to MSQL table. On this table i have 5 fields .

The source message is an HL7 ORU and i’m extracting only MSH-6, OBR-7,MSH-9,PID-3,OBR-20 using a translation to a VRL , but the insertion on the table is not working and this is what i get in the log
<pre>[cmd :cmd…Read more

I think i found the problem. Instead to put

if {$isExist >= 0} {
lappend dispList “CONTINUE $mh”
} else {
lappend dispList “KILL $mh”
}

solution:

if {$isExist >= 0} {
set disposition “CONTINUE $mh”
} else {
set disposition “KILL $mh”
}

Best Regards

I have an issue with a UPOC proc  in pre_xlate. I want to filter only HL7 message that has a PID_3 who exist in  a csv file that contains a list for PID_3 and MSH_3

[tps :tps :ERR /0: UNNAMED_TID:10/26/2019 22:17:31] ‘2’ (returned by ‘FromCvs ‘) does not match { <key> <value> }
[tps :tps :ERR /0: UNNAMED_TID:10/26/2019 22:17:31] ‘…Read more

I have an issue with a tcl (FromCsv.tcl) used in Pre_Xlate. My goal is to send to the destination only the list of PID_3 (HL7.txt) that i have in a CVS (opal.csv) file.
When i tested the UPOC i get the following error:
fld1: 3000257
fld2: MGH
duplist : 3000257
fld1: 1235469
fld2: RVH
duplist : 3000257 1235469
fld1: 5487932
fld2:…Read more

Unix…we are running cloverleaf under Aix.

Thanks,

process1

> 8 threads
process2

> 11 threads
process3

> 11 threads
process4

> 3 threads
process5

> 3 threads
process6

> 1 thread
process7

> 2 thread
process8

> 1 thread

The machine is running Aix 6.1 with cloverleaf 6.1. (%idle is arround 60%)

Regards,

My resend was done on ontbound thread and ‘Await Replies’ is not checked.
All the messages are on state 11 and i’m still having a delay between 2 sec and 10 sec.

My thread is configured with Use Recovery database.

Thank you

Mahmoud
Mcgill University Health Center

If my input is = 1.23 the Output wil be : 01.230 !!!! but me i need to get 001.230

Regards

Rob Abbott wrote:
format “0%0.3f” $val

I need to format the Input to xxx.xxx (decimal lengh 7).

Example1: Input= 12  Output should be=012.120
Example2: Input=12.5 Output should be=012.500

Input= 12.34

set xlateOutVals [format “%0.3f” [lindex $xlateInVals 0]]

Output=12.340

My question: How can i padded a zero at the left to have always on the Output 012.340

Thanks
Moe