>A user can enter 2 or 4 digit value for the year section in a datetime field: (i.e. 01/01/01 or 01/01/2001)
>
>1. If the year is in the future, invalid - set to same date in previous century (i.e. 08 entered, make it 1908, or 2008 entered, make it 1908).

* Valid Event
IF YEAR(this.Value) > YEAR(DATE())
   *** Just in case somebody enter 3007 or 4007
   *** but I have no idea what you want if the user enters: 3598?
   *** what it should be: 1598 or 1998?    
*   this.Value = DATE(YEAR(this.Value)-100, MONTH(this.Value),DAY(this.Value))
    lnYear = 1900+VAL(RIGHT(TRANSFORM(YEAR(this.Value)),2))
    this.Value = DATE(lnYear, MONTH(this.Value),DAY(this.Value))
ENDIF

I thought about GOMONTH(this.Value, -12*100) but not sure if this will work correctly.


>2. If the year is between the current century and the current year (2000/00 to 2007/07), assume this century.

SET CENTURY ON ROLLOVER xxxx is enough

>3. If the year is greater than the current year, set it to the same date in the previous century.
>

See No.1 (I think it is the same)


>For some reason I am not getting this today. It should be so very very simple...