IF multiple condition in TCL

Hello,

I am trying to do the most simplest thing and today I cannot get this code to work…  I am not getting the “OR” condition to work (||).

proc PP_nte_rename { args } {

   keylget args MODE mode                      ;# Fetch mode

   set dispList {}                             ;# Nothing to return

   # ‘run’ mode always has a MSGID; fetch and process it

              keylget args MSGID mh

   set msg [msgget $mh]

   set splitMsg [split $msg r]

   set ormCheck [lindex [split [lindex $splitMsg [lsearch $splitMsg “MSH|*”]] |] 8]

   set ormCheck [string range $ormCheck 0 2]

   set OBRsegID [lsearch -glob $splitMsg OBR|*]

   set OBRseg [lindex $splitMsg $OBRsegID]

   set OBRsplit [split $OBRseg |]

   set tstCd [lindex $OBRsplit 4]        

   set tstCd [string trimleft [lindex [split $tstCd ^] 0] 0]

             array set note_labels {}

             set segments {}

 if {$tstCd ne “FCPNH” || $tstCd ne “DERMP”} {

                 lappend dispList “KILL $mh”

      } ; # close the main IF loop (before the foreach)

} ; #close the main proc

This message should CONTINUE as the test data has the right code “FCPNH”; however, it is killing this message.  Pls. advise.

Femina