is a date

[Bob Sneidar]

Old trick I learned in Foxpro. Convert something then convert it back and see if it is identical. 

put 20 into tDate
put tDate into tOldDate
convert tDate to dateitems
convert tDate to short date
return ((tDate is a date) and (tDate is tOldDate))

Bob S