Looks fine to me. I dunno why it doesn't work for you.

>I am doing this for encrypting the data:
>
>select keytbl
>REPLACE ALL lickey WITH Encrypt(lickey, lcEncryptPassword)
>
>**********************************************
>I am doing this to decrypt the same from the table:
>
>lcLicKeyEncrypted = LOOKUP(keytbl.lickey,1,keytbl.id)
>SET LIBRARY to mapppath+"cipher50.fll" ADDI
>lcLicKey = decrypt(lcLicKeyEncrypted , lcEncryptPassword)
>
>***********************************************
>
>another thing is Encrypt is appearing in blue.
>
>Decrypt is not appearing in blue. (In the source code window).