SQLRDD with Index File FILTER&BRWOSE Problem - xharbour

Hi

does you set mysql to use UTF-8 as codepage for the database?

Regards
Luiz

On 30 set, 06:23, "kokoo...@gmail.com" <kokoo...@gmail.com> wrote:
> hi Everyone :
>
> Anyone use SQLRDD ?
>
> Would you ever open a database filter and browse it ?
> Sure , Every minutes.
>
> I TRANSFER SQLRDD(MYSQL) FROM "DBFCDX" ABOUT 3 MONTHS.
>
> If I Filter 2 Bytes Database With a index file , and Browse it .
> SQLRDD will be Error with "Order by" SQL Command.
>
> error message:
> Application
> ===========
> Path and name: D:\PROGRAM\xHarBour\PSS_SQL\PSS_SQL.exe (32 bits)
> Size: 5,071,872 bytes
> Time from start: 0 hours 0 mins 26 secs
> Error occurred at: 2008/09/19, 14:30:33
> Error description: Error SR_MYSQL/0 SQLExecDirect Error
> (1064) You have an error in your SQL syntax; check the manual that
> corresponds to your MySQL server version for the right syntax to use
> near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC, A.`sr_recno` DESC
> LIMIT 32' at line 1 - You have an error in your SQL syntax; check
> the manual that corresponds to your MySQL server version for the right
> syntax to use near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
> A.`sr_recno` DESC LIMIT 32' at line 1
> Command : SELECT A.`no`, A.`hand`, A.`pric`, A.`ldt`, A.`safe`,
> A.`place`, A.`items`, A.`descript`, A.`sr_recno`, A.`sr_deleted` FROM
> `item` A WHERE ( ( A.`items` <= 'A-®¦¯SºûÅ@' AND A.`no` <=
> 'ENTER-$MAINTAINS' AND A.`sr_recno` <= 203) OR ( A.`items` = 'A-®¦¯Sºû
> Å@' AND A.`no` < 'ENTER-$MAINTAINS' ) OR ( A.`items` < 'A-®¦¯SºûÅ@' )
> ) AND ( ITEMS LIKE 'A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
> A.`sr_recno` DESC LIMIT 32 /* Skip BWD */
>
> Here is my sample :
> ***********************
> STATIC FUNCTION TEST2()
>
> LOCAL aDBF,cCOND
>
> aDbf := {}
> AADD(aDbf, { "NO" , "C",10, 0 })
> AADD(aDbf, { "ITEMS" , "C",10, 0 })
>
> //
>
> DBCREATE( "TEST1" , aDbf)
>
> USE TEST1 NEW EXCL
>
> INDEX ON ITEMS + NO TO "TEST1" //==>please not mark this line
>
> TEST1->(DBAPPEND())
> TEST1->NO := "0001"
> TEST1->ITEMS := "A-®¦¯SºûÅ@"
>
> TEST1->(DBAPPEND())
> TEST1->NO := "0002"
> TEST1->ITEMS := "TEST2 "
>
> TEST1->(DBAPPEND())
> TEST1->NO := "0003"
> TEST1->ITEMS := "TEST3 "
>
> TEST1->(DBAPPEND())
> TEST1->NO := "0004"
> TEST1->ITEMS := "A-®¦¯SºûÅ@"
>
> cCOND:=" ITEMS = 'A-®¦¯SºûÅ@' "
>
> SR_SETFILTER(cCOND)
> GO TOP
> BROWSE() // ERROR WHEN onen INDEX
>
> TEST1->(DBCLOSEAREA())
>
> RETURN NIL
>
> ***************
>
> SQLRDD not suppot index filter with 2 Bytes word ?
>
> --
> Best Regards
> --------------------------------------------------------------
> kokoo KAO

Hi, I am using SQLRDD/SQL Server/Chinese/ Native Syntex without any problem

<kokookao@gmail.com> ¼¶¼g©ó¶l¥ó·s»D:bad69620-9d72-4c2f-a173-512807aa475b@k13g2000hse.googlegroups.com...
hi Everyone :

Anyone use SQLRDD ?

Would you ever open a database filter and browse it ?
Sure , Every minutes.

I TRANSFER SQLRDD(MYSQL) FROM "DBFCDX" ABOUT 3 MONTHS.

If I Filter 2 Bytes Database With a index file , and Browse it .
SQLRDD will be Error with "Order by" SQL Command.

error message:
Application
===========
Path and name: D:\PROGRAM\xHarBour\PSS_SQL\PSS_SQL.exe (32 bits)
Size: 5,071,872 bytes
Time from start: 0 hours 0 mins 26 secs
Error occurred at: 2008/09/19, 14:30:33
Error description: Error SR_MYSQL/0 SQLExecDirect Error
(1064) You have an error in your SQL syntax; check the manual that
corresponds to your MySQL server version for the right syntax to use
near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC, A.`sr_recno` DESC
LIMIT 32' at line 1 - You have an error in your SQL syntax; check
the manual that corresponds to your MySQL server version for the right
syntax to use near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
A.`sr_recno` DESC LIMIT 32' at line 1
Command : SELECT A.`no`, A.`hand`, A.`pric`, A.`ldt`, A.`safe`,
A.`place`, A.`items`, A.`descript`, A.`sr_recno`, A.`sr_deleted` FROM
`item` A WHERE ( ( A.`items` <= 'A-®¦¯SºûÅ@' AND A.`no` <=
'ENTER-$MAINTAINS' AND A.`sr_recno` <= 203) OR ( A.`items` = 'A-®¦¯Sºû
Å@' AND A.`no` < 'ENTER-$MAINTAINS' ) OR ( A.`items` < 'A-®¦¯SºûÅ@' )
) AND ( ITEMS LIKE 'A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
A.`sr_recno` DESC LIMIT 32 /* Skip BWD */

Here is my sample :
***********************
STATIC FUNCTION TEST2()

LOCAL aDBF,cCOND


aDbf := {}
AADD(aDbf, { "NO" , "C",10, 0 })
AADD(aDbf, { "ITEMS" , "C",10, 0 })

//

DBCREATE( "TEST1" , aDbf)

USE TEST1 NEW EXCL

INDEX ON ITEMS + NO TO "TEST1" //==>please not mark this line

TEST1->(DBAPPEND())
TEST1->NO := "0001"
TEST1->ITEMS := "A-®¦¯SºûÅ@"

TEST1->(DBAPPEND())
TEST1->NO := "0002"
TEST1->ITEMS := "TEST2 "

TEST1->(DBAPPEND())
TEST1->NO := "0003"
TEST1->ITEMS := "TEST3 "

TEST1->(DBAPPEND())
TEST1->NO := "0004"
TEST1->ITEMS := "A-®¦¯SºûÅ@"


cCOND:=" ITEMS = 'A-®¦¯SºûÅ@' "

SR_SETFILTER(cCOND)
GO TOP
BROWSE() // ERROR WHEN onen INDEX


TEST1->(DBCLOSEAREA())

RETURN NIL

***************

SQLRDD not suppot index filter with 2 Bytes word ?

--
Best Regards
--------------------------------------------------------------
kokoo KAO

Hi

did you set your xharbour app codepage to your locale?


you also can use the follow functions to convert from utf8 to ansi and
vice versa
cString := hb_utf8tostr(cuTh8)

cUtf8 := hb_strtoutf8(cString) and use this string as parameters to
query

Regards
Luiz

Thank you Eneryone for hlep .

>did you set your xharbour app codepage to your locale?
==> yes

Attention Please :
1)What My filter 2 Bytes word which second byte is "@".
like Chinese Word "$B0l(B" , "$B8n(B" , When The condition of filter string
not include "@" , no problem.

2) The Error only when Open or Create a Index file. If there is no
index file , No problem there .
INDEX ON ITEMS + NO TO "TEST1" // sample of Created index file

3) Anyone test My sample ?
please look at line browse() , The errr only when opend or Created
a Index file.
SQLRDD transfer "@" to some thing when sr_setgilter() with a index
file.
(SQL Query command: Order BY...)


--
Best Regards
--------------------------------------------------------------
kokoo KAO



On 9$B7n(B30$BF|(B, $B2<8a(B11$B;~(B03$BJ,(B, "cul...@gmail.com" <cul...@gmail.com> wrote:
> Hi
>
> did you set your xharbour app codepage to your locale?
>
> you also can use the follow functions to convert from utf8 to ansi and
> vice versa
> cString := hb_utf8tostr(cuTh8)
>
> cUtf8 := hb_strtoutf8(cString) and use this string as parameters to
> query
>
> Regards
> Luiz

Hi

send your sample direct to marcelo@xharbour.com.br

Regards
Luiz

On 30 set, 12:50, "kokoo...@gmail.com" <kokoo...@gmail.com> wrote:
> Thank you Eneryone for hlep .
>
> >did you set your xharbour app codepage to your locale?
>
> ==> yes
>
> Attention Please :
> 1)What My filter 2 Bytes word which second byte is "@".
> like Chinese Word "$B0l(B" , "$B8n(B" , When The condition of filter string
> not include "@" , no problem.
>
> 2) The Error only when Open or Create a Index file. If there is no
> index file , No problem there .
> INDEX ON ITEMS + NO TO "TEST1" // sample of Created index file
>
> 3) Anyone test My sample ?
> please look at line browse() , The errr only when opend or Created
> a Index file.
> SQLRDD transfer "@" to some thing when sr_setgilter() with a index
> file.
> (SQL Query command: Order BY...)
>
> --
> Best Regards
> --------------------------------------------------------------
> kokoo KAO
>
> On 9$B7n(B30$BF|(B, $B2<8a(B11$B;~(B03$BJ,(B, "cul...@gmail.com" <cul...@gmail.com> wrote:
>
> > Hi
>
> > did you set your xharbour app codepage to your locale?
>
> > you also can use the follow functions to convert from utf8 to ansi and
> > vice versa
> > cString := hb_utf8tostr(cuTh8)
>
> > cUtf8 := hb_strtoutf8(cString) and use this string as parameters to
> > query
>
> > Regards
> > Luiz

hi Marcelo :

Just send it .

thank you.

---------
Regards
kokoo Kao


On 10$B7n(B1$BF|(B, $B>e8a(B4$B;~(B45$BJ,(B, "culikr@gmail.com" <culikr@gmail.com> wrote:
> Hi
>
> send your sample direct to mar...@xharbour.com.br
>
> Regards
> Luiz
>

Hi,

after testing with the tested source, result is as follow :

xharbour + sqlrdd/bcc got the same error result when use sr_setfilter()

the test source is working fine when changed from sr_setfilter() to "set
filter to" or dbsetfilter() syntex

thanks

<kokookao@gmail.com> wrote in message
news:bad69620-9d72-4c2f-a173-512807aa475b@k13g2000hse.googlegroups.com...
hi Everyone :

Anyone use SQLRDD ?

Would you ever open a database filter and browse it ?
Sure , Every minutes.

I TRANSFER SQLRDD(MYSQL) FROM "DBFCDX" ABOUT 3 MONTHS.

If I Filter 2 Bytes Database With a index file , and Browse it .
SQLRDD will be Error with "Order by" SQL Command.

error message:
Application
===========
Path and name: D:\PROGRAM\xHarBour\PSS_SQL\PSS_SQL.exe (32 bits)
Size: 5,071,872 bytes
Time from start: 0 hours 0 mins 26 secs
Error occurred at: 2008/09/19, 14:30:33
Error description: Error SR_MYSQL/0 SQLExecDirect Error
(1064) You have an error in your SQL syntax; check the manual that
corresponds to your MySQL server version for the right syntax to use
near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC, A.`sr_recno` DESC
LIMIT 32' at line 1 - You have an error in your SQL syntax; check
the manual that corresponds to your MySQL server version for the right
syntax to use near ''A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
A.`sr_recno` DESC LIMIT 32' at line 1
Command : SELECT A.`no`, A.`hand`, A.`pric`, A.`ldt`, A.`safe`,
A.`place`, A.`items`, A.`descript`, A.`sr_recno`, A.`sr_deleted` FROM
`item` A WHERE ( ( A.`items` <= 'A-®¦¯SºûÅ@' AND A.`no` <=
'ENTER-$MAINTAINS' AND A.`sr_recno` <= 203) OR ( A.`items` = 'A-®¦¯Sºû
Å@' AND A.`no` < 'ENTER-$MAINTAINS' ) OR ( A.`items` < 'A-®¦¯SºûÅ@' )
) AND ( ITEMS LIKE 'A-®¦¯Sºû?ORDER BY A.`items` DESC, A.`no` DESC,
A.`sr_recno` DESC LIMIT 32 /* Skip BWD */

Here is my sample :
***********************
STATIC FUNCTION TEST2()

LOCAL aDBF,cCOND


aDbf := {}
AADD(aDbf, { "NO" , "C",10, 0 })
AADD(aDbf, { "ITEMS" , "C",10, 0 })

//

DBCREATE( "TEST1" , aDbf)

USE TEST1 NEW EXCL

INDEX ON ITEMS + NO TO "TEST1" //==>please not mark this line

TEST1->(DBAPPEND())
TEST1->NO := "0001"
TEST1->ITEMS := "A-®¦¯SºûÅ@"

TEST1->(DBAPPEND())
TEST1->NO := "0002"
TEST1->ITEMS := "TEST2 "

TEST1->(DBAPPEND())
TEST1->NO := "0003"
TEST1->ITEMS := "TEST3 "

TEST1->(DBAPPEND())
TEST1->NO := "0004"
TEST1->ITEMS := "A-®¦¯SºûÅ@"


cCOND:=" ITEMS = 'A-®¦¯SºûÅ@' "

SR_SETFILTER(cCOND)
GO TOP
BROWSE() // ERROR WHEN onen INDEX


TEST1->(DBCLOSEAREA())

RETURN NIL

***************

SQLRDD not suppot index filter with 2 Bytes word ?

--
Best Regards
--------------------------------------------------------------
kokoo KAO

Hello,

Please try to use SQLRDD Support NG for SQLRDD related questions.
Thank you.

Patrick

hi Patrick :

I paste it in SQLRDD Support NG for few days .

But no one can hele.

--
Best Regards
--------------------------------------------------------------
kokoo KAO

On 10$B7n(B2$BF|(B, $B2<8a(B7$B;~(B34$BJ,(B, Patrick Mast <Patrick.RemoveThis.M...@xHarbour.com>
wrote:
> Hello,
>
> Please try to use SQLRDD Support NG for SQLRDD related questions.
> Thank you.
>
> Patrick