Tracy, you have a little typo here :o)))

lclregno = UPPER(ALLTRIM(thisform.pgfpageframe1.page4.txtCma_regno.Value))

You always seek for UPPER(ALLTRIM())

>Which finds it if any?
>

>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
>