>Now it makes sense. Thank you very much.

David,

What's happening here is that VFP is assuming that the integer is signed, rather than unsigned. Here's another way around the problem:

lnresult = BITLSHIFT(lnsomevalue, 4)
IF BITTEST(lnresult, 31)
  lnresult = lnresult + (2 ^ 32)
ENDIF
? TRANSFORM(lnresult, "@0")

Should get you what you want.