I only found 2 things wrong with Sergey's code after talking to him. One, the decrypt did not like spaces, so I had to use the alltrim(), and it had to be done to one field at a time since there was 5 fields in the dbf that was not encrypted. The code that I came up with worked for me.
If anyone else ever has problems with a decrypt, remember that most decrypts are not fond of spaces and will give you argument errors unless you use the alltrim. I am sure that I could have used the variable and replaced all the fields if all of them was encrypted.

TKS for all the help guys!!!!

Here it is:

set proc to udfprocs

public constdebug
constdebug = 0

select 0
use tech
goto top
scan
replace wc_12v with decrypt(alltrim(wc_12v))
endscan
use