default value in date filed

[Martix]

I need to have the field on a form generate a default value for the date based on time of day, basically the reporting for next days business is based on the "shift date". shift date doesnt end until 7am the next day, so after midnight the form is stamping the next days date when in fact i need it to continue stamping the shift date. please help

 

[IcesMaster]

I think you must create a function in module. For example:

Function CheckDate(CurrentTime)
If CurrentTime <= &quot;07:00&quot;
CheckDate = Date() - 1
Endif
End Function


So you can use the function in your procedures or form, like:

CurTime = Time(Date())
ShiftDate = CheckDate([CurTime])