Determining Segment Order

[Michael Brande]

Does anyone have a good way to determine Segment Order?

Any scripts out there that can be run against a file with HL7 transactions?

Topic

[Jim Kosloskey]

I am not sure I understand the question. Can you elaborate?

email: jim.kosloskey@jim-kosloskey.com 29+ years Cloverleaf, 59 years IT - old fart.

[Charlie Bursell]

Something simple

# Get file – read as binary because of CR

set file [open <hl7 filename> rb]

foreach seg [split $file \r] {

# Last CR will cause empty
if {$seg eq “”}  {continue}

echo [string range $seg 0 2]
}

 

But as Jim says I am not really sure what you want here

 

[Author]

Replies