funcion esfecha(cValor)

[Verhoven]

function esfecha(cValor)
return iif(dtos(ctod(cValor))=space(8),.f.,.t.)



Cuando se le pasa una cadena de caranteres determina si la misma es una fecha o no.

[Willi Quintana]

Function esfecha(cValor)
Return IF(VALTYPE(cValor)="D", .t., .f.)


creo que asi seria mas preciso--- )

[Verhoven]

NO, porque lo que se pretende es que teniendo como entrada de la funcion una variable tipo caracter (de ahí la c de la variable cValor), la función determine si el contenido de la misma es una fecha o una cadena de caracteres.

Esto lo utilizo en una función de búsqueda, en la que puedo buscar las facturas por factura o por fecha de la factura, para no tener que hacer un menú previo para elegir porqué campo buscar.

Saludos.