On Thu, 25 Jun 2009, Mindaugas Kavaliauskas wrote:
Hi,
> C:\cawi32\sample\test>cat test172.prg
> PROC main()
> SET(4, "YYYY-MM-DD")
> ? CTOD("2009-06-25 Hello")
> ? CTOD("2009-06-25 12:13:14")
> RETURN
> C:\cawi32\sample\test>TEST172.EXE
> 2009-06-25
> 2009-06-25
> C:\cawi32\sample\test>hbrun test172.prg
> 2009-06-25
> - -
Should be fixed after:
2009-06-26 11:13 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
HB_CTOT() also. I tested it with:
PROC main()
LOCAL tNow, cNow
SET DATE FORMAT TO "YYYY-MM-DD"
tNow := HB_DATETIME()
? tNow
cNow := HB_TTOC(tNow)
? cNow
? HB_CTOT(cNow)
? HB_CTOT("xxxxx0002006xxxxx/xxxx0000012yyyyy/zzzz29aa as" + ;
"x ttx11 : 001 : 00038 .xxx xx 0093456")
?
? CTOD(DTOC(DATE())+" 1")
? CTOD(DTOC(DATE())+"x1")
? CTOD("000002009.000000012.0000000000000027.1")
? CTOD(" 0002009. 000012. 000028 1")
? CTOD("xx0002009.xxx000012.xxxxxxxxxx000028 1")
? CTOD("000 02009.00 000012.000 000028 1"), "*"
? CTOD("2007 11 29")
? CTOD(" 2007 11 29 ")
? CTOD("2007-1 1-29")
? CTOD("2007- 1 1 - 2 9 ")
SET DATE FORMAT TO "YYYY.M.DD"
? CTOD("2008.1 1.23")
RETURN
best regards,
Przemek
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
