>>>SET CENT TO VAL(LEFT(ALLT(STR(YEAR(DATE()))), 2))
>>>
>>>in my startup.prg. I didn't know about the little vfp5 bug when I submitted my Y2K docs, and said that vfp5 was compliant without SET CENTURY (whoops)...
>>
>>Set Cent to int(year(date())/100)
>
>You're right, that's shorter. I don't profess to being a date whiz :) I guess they're like puzzles to some of you, I see the contests to see who can get the shortest date function on the UT often :)

ok:

Set Cent to year(date())/100

will always be an integer