[Jeremy Bumgarner]

Jim:

Thanks for the phone call, patience, and overall friendliness.  It is greatly appreciated.

For everyone’s reference, here is how we (Jim) solved it:

Pathcopy the NTE(0) segment to the outbound message

Pathcopy the NTE(0) segment to NTE(1) outbound message

Copy my constants to NTE(1) that need to change.

Sometimes simple is best.  What was that old acronym from programming classes?  Oh yeah, K.I.S.S or Keep It Simple Stupid (meaning me!!).

[Jeremy Bumgarner]

More information:

This is coming in on an ORM^O01 message.

We always receive it with one NTE segment.

[Jeremy Bumgarner]

I think I may have solved the issue.  It was after I checked the Outbound Only option on the thread properties and cycled the threads that my information started collecting.

[Jeremy Bumgarner]

Very nice, thanks for the code.  And the quick response.

[Jeremy Bumgarner]

Thank you everyone!  Everything is working beautifully now.  

After I do some more testing to make sure that everything is OK, I will be done.

Again, thank you everyone!

[Jeremy Bumgarner]

Think I’m on the right track now.  Thanks to everyone.

Now I’m getting what I think is a TCL error.  I am very new to TCL, so please excuse the lack of knowledge.  Here’s the output from the Cloverleaf testing tool:

Please Wait ……

Command Issued: hcixlttest -L -n -i -e ASCII -d 3 -f nl hms_oru_allscriptslab.xlt /home/hci/AllscriptsResults/RESULT_Allscripts_ALC.hl7

Command output:

executing sql: ‘select allscriptsorder from hms2allscriptsxlate where hmspatno = 1407332 and hmsorder = 2600’

MESSAGE 1

Tcl callout error

erroCode: NONE

errorInfo:

wrong # args: extra words after “else” clause in “if” command

   while executing

“if [catch {DBCMD eval $sql}] result] {

  echo “Error from sqlite: $result”

  set xlateOutVals ERROR

} else {

  echo “sql success, result=’$result’”…”

Checking for leaked handles…

[Jeremy Bumgarner]

Thanks for the information – didn’t realize I picked post over pre.

[Jeremy Bumgarner]

Update:

In my XLT, I am using a copy command.  I use PID 18 and ORC 2 as my source values, and a Post Proc with the following code:

set visitnumber [string length [lindex $xlateInVals 0]]

set order [string length [lindex $xlateInVals 1]]

package require sqlite

set dbName “/cloverleaf/quovadx/cis5.8/integrator/eisenhower/tclprocs/hms2allscripts.db”

sqlite DBCMD $dbName

set xlateOutVals

]]

I am attempting to place the resulting order number (from the requester) into the a temp variable @ASOrder.

My problem now is that I am getting my patient admission number into my temp variable @ASOrder, not the requesting system’s order number.

Any ideas??  Just about at my wit’s end.

[Author]

Replies