Reply To: Tcl Help – Removing OBX segment if OBX|5 value is blank

[Rentian Huang]

Arslan,

Are you doing a BULKCOPY/PATHCOPY before this tcl?

I think what you should do in your situation is:

Code:

ITERATE on OBX

  CALL:
  set OBX_Seg [getHL7Segment $msg OBX]
  set Result_Value [getHL7Field $OBX_Seg 5]
  if {([regexp “^ *$” $Result_Value])} {
     set @flag “false”
  } else {
     set @flag “true”
  }

  IF: @flag eq “true”
           PATHCOPY on OBX

Hope this helps,

Sam  8)