Hi,
Something seems disconected, it's very basic, so it can be related to something
here, I have refreshed all the svn-tree and still fails. Could someone test it
and tell me if this works fine?
PROC Main()
RDDSETDEFAULT("DBFNTX")
DbCreate('TEMP.DBF', {{'COMPANY', 'C', 4, 0}})
USE TEMP.DBF EXCLU NEW ALIAS TEMP
Append Blank
TEMP->COMPANY := 'ARTU'
? COMPANY
Index on COMPANY to TEMP
Go Top
? Eof() // should be false.
? DbSeek('ARTU') // should be true.
Close TEMP
RETURN
It also fails with the ADS RDD.
Regards,
Jorge A.
_________________________________________________________________
Explore the seven wonders of the world
http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
