Hi All,

Often overlooked in our mad rush to make our older FP applications Y2K compliant is the fact that the PC BIOS may not be Y2K compliant. There are many quality apps out there that will fail on 1/1/2000 because the BIOS will start believing that its 1/1/1900. What to do? I've started wrapping all DATE() calls with a little program called Y2KDATE:

FUNCTION Y2KDATE
PARAMETERS dDate
IF PARAMETERS() < 1
   dDate=DATE()
ENDIF
IF dDate < {01/01/1980}
   dDate = GOMONTH(dDate,1200)
ENDIF
RETURN dDate

No PC BIOS will have a date before 1980, and if it does, adding 1200 months (not 100 years) to the system will fix it. The syntax for this is Y2KDATE(DATE()).