remove one repeating field based on certain condition

There is no straight forward way of doing this in Xlate that I know of unless you want to implement some really convoluted XPM code.  It would be easy in a Tcl Preproc like:

This assumes you are checking the second subfield of the second iteration.  Feel free to modify if my assumptions are wrong

run {

   # Get message

   set mh [keylget args MSGID]

   set msg [msgget $mh]

   # Field separators

   set fldSep [string index $msg 3]    ;# Normally |

   set subSep [string index $msg 4]    ;# Normally ^

   set iterSep [string index $msg 5]   ;# Normally ~

   # Segments

   set segList [split $msg r]

   # Need location to change

   set pidLoc [lsearch -regexp $segList {^PID}]

   # PID fields

   set PID [split [lindex $segList $pidLoc] $fldSep]

   # Field 3 split into iterations

   set fld3 [split [lindex $PID 3] $iterSep]

   # PID.3.2 split into subfields

   set fld3_2 [split [lindex $fld3 1] $subSep]

   # Check for V in PID.3.2.2

   # If not there we are done just send the message on

   if {[lindex $fld3_2 1] ne “V”} { return “{CONTINUE $mh}” }

   # If here delete second iteration and modify PID

   lvarpop fld3 1

   set PID [lreplace $PID 3 3 [join $fld3 $iterSep]]

   set segList [lreplace $segList $pidLoc $pidLoc [join $PID $fldSep]]

   msgset $mh [join $segList r]

   # Send it on

   return “{CONTINUE $mh}”

}

I think this can be done in an Xlate with no Tcl.

You will need to maintain your own field (%fx) counter for the outbound. Something like %f99. Initialize %f99 at the beginning of your Xlate (COPY =0 –> $%f99 (note the $).

As you ITERATE through the field repetitions (specifying a counter like %f1) add one to your outbound counter (using MATH ADD =1 $%f99 –> $%f99 – again note the $) UNLESS (using an IF Action) the condition you specify is true. Then make sure you use the %f1 in the inbound address path and the %f99 in the outbound address path when you COPY the field.

The ~ is the default HL7 field repetition delimiter. ITERATE on the field (%f1), use IF and PATHCOPY to only copy the desired fields across to the destination. If you used BULKCOPY or PATHCOPY on the segment earlier in the xlate, you will need to first empty out the field with a PATHCOPY (source: @null, destination: path to field).

MATH ADD

Source              Destination

=1                     $%f99

$%f99

Yeah Jim I would like to that also  😀   I sent you an e-mail

Charlie,

I just sent you an email with an example.

Su I would have copied you but you don’t have your email exposed on your profile.

Still a bit confused about the requirement.  My understanding was we were to look at the only the second subfield in the second iteration.  Is that correct or could this “V” be in any iteration?

What Jim sent me works fine but it looks at all iterations.  Maybe that is what is wanted?

I yield to Jim and his Xlate tricks.  Since I eat sleep and breath Tcl perhaps I jump in that direction too quickly sometimes  😀