Increible error de xHarbour o que alguien me lo explique

[Bingen Ugaldebere]

Resulta que por zar he tenido que hacer
MsgInfo(Ctod("Debe de elegir una clave compuesta de 4 a 6 dí­gitos solo
numéricos."))
que os parece que contesta 04-06-2000 toma ya es una fecha ????
En realidad para un tema de traducciones paso todos los string por 2
funciones Is_number() y Is_Date() ya que los numeros y las fechas no se
traducen, entonces me he vuelto loco por que este texto no me lo
traducí­a y resulta que es una fecha jajajajajajajaja me troncho.
Que explicación tiene?
Salu2

[Bingen Ugaldebere]

Alguien lo puede corroborar por favor? Es que me ha dejado perplejo.
Salu2.

[ssi-estono-]

El 11/02/2014 10:42, Bingen Ugaldebere escribió:
> Alguien lo puede corroborar por favor? Es que me ha dejado perplejo.
>
> Salu2.
Comprobado Bingen,me sale lo mismo.
Paco
--

[Jose Lopez Carrasco]

Confirmado.
Saludos.


Attached files

[Jose Lopez Carrasco]

Comprobado,
Es un error de harbour. He realizado una prueba en modo consola con:
Harbour 3.2.0dev (r1311222022)
Copyright (c) 1999-2013, http://harbour-project.org/
Y el resultado es el mismo.
Saludos.
Pepe.

[ignacio]

Buenas tardes,
No sé hasta que punto los desarrolladores de Harbour y xHarbour lo considerarán un error. Realmente tanto Harbour como xHarbour hacen todo lo posible para sacar una fecha válida del texto que se le da y lógicamente lo consiguen rastreando la cadena y sacando los dí­gitos de la misma hasta construir la fecha. En este caso además al no encontrar dí­gitos para el año directamente se los ha inventado. Qué deberí­a dar error o fecha en blanco, puede ser, pero ya es una cuestión de gustos.
De la misma forma esta expresión Val( "22: Lo que sea") devuelve un valor numérico 22 y si lo piensas también podrí­a ser un error y deberí­a devolver cero.
En cualqueir caso, y dicho lo dicho, en mi opinión deberí­a devolver una fecha en blanco.
Un saludo

[Bingen Ugaldebere]

Muchas gracias a todos, no sabí­a si era mi máquina que estaba guasona )
Lo he corregido cambiando la función Is_Date que utilizaba, en cuanto
encentra una letra me devuelve .F.
Salu2.