HMGforum.com

ERROR al Ver el dia de la Semana CDOW en Español
Hola he detectado una cosa rara, estoy usando CDOW (DATE()) para que
me salga el dia de la semana en español y al principio del programa pongo :

REQUEST HB_LANG_ES
HB_LANGSELECT( "ES" )
SET CENTURY ON
SET DATE FRENCH
SET LANGUAGE TO SPANISH

y me está faltando la letra [ a ] --> [SABADO] -- > [S 'a' BADO ] = [ SATURDAY]
No se si en otros idiomas que no sean el Ingles está sucedirendo lo mismo ?
Estoy revisando haber si pasa en otros días de la Semana
Recuerdos
*-------------------------------------------------------------------*
ERROR to see the day of the week CDOW in Spanish
Hello I noticed a strange thing, I'm using CDOW (DATE ()) for I
out the day of the week in Spanish and at first put the program:

REQUEST HB_LANG_ES
HB_LANGSELECT ( "ES")
SET CENTURY ON
DATE SET FRENCH
SET LANGUAGE TO SPANISH

and he is missing the point [a] --> [SABADO]--- > [S 'a' BADO] = [SATURDAY]
If not in other languages other than English is sucedirendo the same?
I have reviewed if you pass on other days of the week
Regards
Mustafa

Hola a todos
he encontrado otro error en Wednesday = Miercoles
podria ser el acento ?

Hello everyone
I found another bug in Wednesday = Miercoles
could be the accent ?
Regards
Mustafa

Solucionado a mi manera
Sustituyo los dias de la semana en Ingles al Español
Sigo creyendo que el problema son los acentos
Solo hay dos días acentuados Miércoles y Sábado
*--------------------------*
Fixed it my way
Replace the days of the week in English to Spanish
I still believe that the problem is the accents
Only two days are Wednesday and Saturday accented
*---------------------------*
Set Language to English
DiaSem = CDOW (DATE())

IF DiaSem ='Monday'
@ 266,157 LABEL Label_13z VALUE 'Lunes' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Tuesday'
@ 266,157 LABEL Label_13z VALUE 'Martes' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Wednesday'
@ 266,157 LABEL Label_13z VALUE 'Miércoles' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Thursday'
@ 266,157 LABEL Label_13z VALUE 'Jueves' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Friday'
@ 266,157 LABEL Label_13z VALUE 'Viernes' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Saturday'
@ 266,157 LABEL Label_13z VALUE 'Sábado' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF

IF DiaSem ='Sunday'
@ 266,157 LABEL Label_13z VALUE 'Domingo' CENTERALIGN ;
FONT "Verdana" SIZE 16 BOLD ITALIC ;
WIDTH 285 HEIGHT 40
ENDIF
SET LANGUAGE TO SPANISH
*--------------------------------------------*
Regards
Mustafa

mustafa wrote:ERROR al Ver el dia de la Semana CDOW en Español

You must use hb_oemtoansi() function, ie:
http://www.harbour-project.org/doc/hb_oemtoansi.htm

Hola Roberto
Gracias por tu contestación como siempre tan acertada
Esperaré a los proximos días que pueda comprobar
los "días con acento, Miércoles y Sábado "
demomento tu solución funciona.

Hello Roberto
Thanks for your reply as always as successful
Wait till the next day to check
"days with an accent, Wednesday and Saturday"
demomento your solution works.
Regards
Mustafa