lclregno = UPPER(ALLTRIM(thisform.pgfpageframe1.page4.txtCma_regno.Value))
SELECT NWC
WAIT WINDOW "reg is_" + lclregno + "_"
IF lclregno <> ""
   WAIT WINDOW "regno variable is not blank"
   IF !INDEXSEEK(lclregno,.t.,'NWC','CMA_regno')	
       WAIT WINDOW "Step 1 did not find it."
       IF !INDEXSEEK(alltrim(lclregno),.t.,'NWC','CMA_regno')
          WAIT WINDOW "Step 2 did not find it."
          IF !INDEXSEEK(upper(lclregno),.t.,'NWC','CMA_regno')
              WAIT WINDOW "Step 3 did not find."
              IF !INDEXSEEK(upper(alltrim(lclregno)),.t.,'NWC','CMA_regno')
                 WAIT WINDOW "Verify the tag information"
                     SELE NWC
                     =ataginfo(mytags,'NWC')
                     list MEMORY LIKE mytags
              ELSE
                WAIT WINDOW "Found it with upper(alltrim())" 
              ENDIF
          ELSE
              WAIT WINDOW "Found it with upper()"
          ENDIF
       ELSE
          WAIT WINDOW "Found it with alltrim()"
       ENDIF
   ELSE
      WAIT WINDOW "Found it with with indexseek()"
   ENDIF
ENDIF