Fecha incorrecta...Cómo saber?

[FiveWiDi]

Hola a todos,

¿Cual sería la manera de adecuada de comprobar que una fecha es INcorrecta?

Es decir, si tengo:

dMiMalaFecha := CToD( "30/02/2020" )

¿Cómo puedo saber que dMiMalaFecha es una fecha errónea?

Muchas gracias,

[Armando]

Carlos:

dMiMalaFecha Te va a quedar vacía " / / "

Saludos

[groiss]

Buenos días:
Una forma sencillita sería:

Code: Select all | Expand

iif( fecha de entrada=DToC(CToD(fecha de entrada)),.t.,.f.)

 

Un saludo

[JoseAlvarez]

otra manera...

Code: Select all | Expand

function Fnct_ValFecha(cFecha)

   Local lFechaValida 

   lFechaValida:= iif( Empty(cTod(cFecha)), .f., .t.)

return lFechaValida
 

[FiveWiDi]

Muchas gracias,

Usaré el método de comprobar si el valor es Empty().

Como curiosidad, en la clase TGet se declara un objeto oGet que tiene una DATA BadDate ( ::oGet:BadDate ), el caso es que no veo como se setea esta data y por tanto no se como lo comprueba FiveWin.

De momento lo dicho, usaré Empty().

Muchas gracias,