Whenever I want to search for a expression regardless of being
capitals or not, I have to write as bellow:

locate for UPPER(name) = UPPER(nm)
locate for UPPER (city) = UPPER(Ct)
locate for UPPER (street) = UPPER (st)

I would like to avoid writting UPPER ( ) and instead of that, write something in my main.prg so that I could write as bellow:

locate for name = nm
locate for city = Ct
locate for = BA


May anybody suggest a function ?