preventing users from adding back dated data through data entry

Question

Hi

Is there a way to prevent users from entering back dated values ?

I used the following code, but a change in system date will make it void, I have a field called Tdate (TDate = Today).

Private Sub Tdate_Validate(results As EntityValidationResultsBuilder)
            ' results.AddPropertyError("<Error-Message>")
            If Tdate < Today Then
                results.AddPropertyError("Date cannot be backdated")
            End If
            If Tdate > Today Then
                results.AddPropertyError("Date cannot be future dated")
            End If
        End Sub

Answer 1

Hi, M.Prasad.

With my applications, I use an additional date test. Get the latest saved date from Tdate and:

dim latestDate = MyCollection.Max(Function(n) n.TDate)

If (Tdate < Today) OrElse (Tdate < latestDate) then

   results.AddProperty(".......")

You can improve this method: every time that your application is openned, save the current date and used it to avoid back date input.

I hope it helps you.

Best regards,

---

Ciro

Answer 2

If you don't want dates prior to today's date, & you also don't want dates that are after today's date, why don't you just set the property to today's date in the EntityName_Created method, then make the property read-only on the screen?

---

Yann - LightSwitch Central - Click here for FREE Themes, Controls, Types and Commands

If you find a reply helpful, please click "Vote as Helpful", if a reply answers your question, please click "Mark as Answer"

By doing this you'll help people find answers faster.