About FiveWin ODBC

Post Reply
xhbcoder
Posts: 100
Joined: Wed Oct 04, 2006 4:50 pm
Location: USA

About FiveWin ODBC

Post by xhbcoder »

FW,

May I know those who had experienced using FiveODBC.

Thanks,

Jose
xhbcoder
Posts: 100
Joined: Wed Oct 04, 2006 4:50 pm
Location: USA

Post by xhbcoder »

What I mean is how's the performance, specially with MS SQL server.

Thanks.
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

It works fine, but you should upgrade to FWH 32 bits, as it offers a much better integration with the operating system.
regards, saludos

Antonio Linares
www.fivetechsoft.com
xhbcoder
Posts: 100
Joined: Wed Oct 04, 2006 4:50 pm
Location: USA

Five ODBC with Clipper

Post by xhbcoder »

Antonio,

Our base code is in Clipper 5.2. I tried to convert them to xHarbour but there are issues like Telepathy lib which don't have 32 bits version and several C codes that generates errors, when linked. I looked for 32 bit version as you suggested but Extransensory Software do not have 32 bit version of Telepathy.

For now, we are trying to connect our program to SQL server for possible enhancement.

I am able to connnect using FiveODBC but it returns only one record.

Heres the code taken from your example.

******************
Function LS_odbc()
******************
Local oODBC := TOdbc():New "DsnEntry", "YourName", "YourPassword")

If !oOdbc:lSuccess
oOdbc:ShowErrorList("ODBC session not successfully initialized, aborting...")
oOdbc:End()
return nil
Endif
*oDbf := oOdbc:Query( "SELECT * FROM JOURNAL" )
Odbf := TdbOdbcDirect():New("SELECT * FROM JOURNAL WHERE JRDATE = '10/6/06' ORDER BY JRDATE, JRTIME", oOdbc)
if oOdbc:IsError()
oOdbc:ShowErrorList()
oOdbc:aErrors := {}
oDbf:End()
return nil
endif
oDbf:Open()

*oDBF:goBottom()
*msginfo(str(ODbf:recNO()))
*msgInfo(oDBF:jrzday)
*Browse( cTitle, cListName, bNnew, bModify, bDelete, bSearch, bList )
copy to tmp
Browse("Journal")
return nil

Note:
The browse shows one record only.
The tmp file contain one record only.

Can we keep clipper 5.2 and accomplish FiveODBC? Just let me know if it possible.

We don't need to convert to 32 bit right now since Clipper 5.2 version looks stable.

Gracias,

-jose
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Jose,

Have you checked at the ODBC database that there are more than one record matching that SQL sentence ?
regards, saludos

Antonio Linares
www.fivetechsoft.com
xhbcoder
Posts: 100
Joined: Wed Oct 04, 2006 4:50 pm
Location: USA

Post by xhbcoder »

Antonio,

Thanks for the quick reply.

Yes, there are over 60 rows when I querry it from SQL.
User avatar
Eugeniusz Owsiak
Posts: 60
Joined: Fri Oct 07, 2005 5:38 am
Location: Poland

Post by Eugeniusz Owsiak »

Jose

after line
oDbf:Open()

you must add

oDbf:Complete()


regards Eugeniusz
xhbcoder
Posts: 100
Joined: Wed Oct 04, 2006 4:50 pm
Location: USA

About odbc

Post by xhbcoder »

Eugeniusz,

Thanks for the hint. It works.

Regards,

Jose
Post Reply