Generating NTE segments based on the value of OBX|3

Sam,

Thanks for your guidance. I partially got it working.

If OBX|5 has a length of <80, it is working with no problems. The problems comes when OBX|5 is more than 80 characters in length. The current CALL statement is only generating 1 NTE segment with partial result comment values.

Do you have any idea where we have to tweak the code?

Thanks.

Arslan

Still getting the same result…. only 1 NTE segment with NTE|3 populated with the remainder of (total length of OBX-5)/80.

Is there a way to echo out xpmstore values inside the while loop?

Arslan

The echo’s are displaying correct informartion but some how xpmstore is not storing that information in NTE segments (or may be overwriting it with new information on each iteration!)

Any ideas?

Call Statement (as provided by you)

OBX5 [datget [xpmfetch $xlateId 1(0).1(0).1(%g1).OBX(0).00573] VALUE]

if {[string length $OBX5] > 80} {

set pos 0

set cnt 0

while {$pos < [string length $OBX5]} { xpmstore $xlateId {1(0).1(0).1(%g1).NTE($cnt).00098} c [string range $OBX5 $pos [expr $pos + 80]] incr pos 80 incr cnt } } else { xpmstore $xlateId {1(0).1(0).1(%g1).NTE(0).00098} c $OBX5 }

Coooooolllllll!!!!!! It worked!! 🙂)

I had no idea what you did, but it is working. Amazing!

BTW, my lab is sending “~” in OBX 5 to indicate a new line for notes/comments. Is it possible to generate NTE segments based on that “~” value?

Like if we receive the following OBX-5:

“POSITIVE~Due to the intermittent nature of~  gastrointestinal bleeding, it is recommended~  that fecal specimens on consecutive days be~ tested.  The patient should be placed on a meat~  free, high bulk diet beginning 72 hours prior~  to testing and continuing through the test~ period. All foods containing blood, such as meat and meat~  extracts, should be avoided, as well as turnips~  , horseradish and other foods containing~  peroxidase-like substances.”

Your translation will generate something like:

NTE[1] = Due to the intermittent nature of NTE[2] = gastrointestinal bleeding, it is recommended NTE[3] = that fecal specimens on consecutive days be NTE[4] = tested.  The patient should be placed on a meat NTE[5] = free, high bulk diet beginning 72 hours prior NTE[6] = to testing and continuing through the test NTE[7] = period. All foods containing blood, such as meat and meat NTE[8] = extracts, should be avoided, as well as turnips

NTE[9] =   , horseradish and other foods containing

NTE[10] = ~  peroxidase-like substances.

Can it be done using the same CALL statement?

Arslan

Sam,

Yes. We are using “~” in our encoding charaters.

I am thinking of cleaning all the “~” values from OBX-5 using a regsub command. It should fix the problem then.

What do you think?

Arslan

Sam/Jim,

I am little confused here. Each lab results with a data type of “FT” comes with a unique instance of OBX-5.

Like,

OBX|1|2|FT|4|Result comments and notes in this field||||

Currently, LAB is sending notes and comments with ‘~’ to represent a new line, like:

OBX|1|2|FT|4|POSITIVE~Due to the intermittent nature of~  gastrointestinal bleeding, it is recommended~  that fecal specimens on consecutive days be~ tested.  The patient should be placed on a meat~  free, high bulk diet beginning 72 hours prior~  to testing and continuing through the test~ period. All foods containing blood, such as meat and meat~  extracts, should be avoided, as well as turnips~  , horseradish and other foods containing~  peroxidase-like substances.||||

My guess is if I am able to remove all the ‘~’ using a regsub command, I should be able to using “SAM’s” CALL statement to generate multiple NTE segments.

Correct me if I am wrong in this interpretation.

Thanks.

Arslan

Using iterate over the OBX field, I was able to generate NTE segments. My solution works for the first OBX segment and as soon as it hits the second OBX (of type FT), I receive only one NTE segment from that OBX-5 field.

Iterate:

Type = group

Basis = 1(0).1(0).1(0)

Variable = %g1

Inside Iterate, IF 1(0).1(0).1(%g1).OBX.570 EQ FT

After IF,

ITERATE

Type = field

Basis = 1(0).1(0).1(0).OBX.573

Variable = %f1

— Now I copy OBX-5 to NTE-3

COPY 1(0).1(0).1(%g1).OBX.573(%f1)

to

1(0).1(0).1(%g1).NTE(%f1).00098

Do I have to do another iterate on OBX segment to generate all NTE’s from OBX-5 field?

Any ideas?

Thanks.

Arslan

Yes.

Thanks to Jim’s timely intervention, I was able to get all the NTE segments.

Modified solution is once again listed below for clovertech community:

Iterate:

Type = group

Basis = 1(0).1(0).1(0)

Variable = %g1

Inside Iterate, IF 1(0).1(0).1(%g1).OBX.570 EQ FT

After IF,

ITERATE

Type = field

Basis = 1(0).1(0).1(%g1).OBX.573

Variable = %f1

— Now I copy OBX-5 to NTE-3

COPY 1(0).1(0).1(%g1).OBX.573(%f1)

to

1(0).1(0).1(%g1).NTE(%f1).00098

and again sincere thanks to Sam and Jim.