FUNC f_Y2Kfix LOCAL lnCent, lnRoll lnCent=INT(year(date())/100) lnRoll=MOD(year(date()),100)-30 && start the window 30 years prior to today *- correct for century since prior century entries are still possible IF lnRoll < 0 lnCent = lnCent-1 lnRoll = lnRoll + 100 ENDIF SET CENTURY TO (lnCent) ROLLOVER (lnRoll)In other words, I can use standard mm/dd/yy fields to enter years 30 years back and 70 years up. so for 1967, I'd need a wider field and for 2068, I'd need a wider field, but for most business apps, this should work fine.