On Wed, 03 Dec 2008, Abeb wrote:
Hi,
> sample code i tried, and getting that error. I also tried setting a to an
> index order.
> -------------------
> USE ITEMS VIA "BMDBFCDX" NEW
> set optimize on
> DbSetFilter( {|| .f. } ) //tried .t. as well
> BM_DBSETFILTERARRAY( {10,20,30} )
> go top // <- error
> browse()
> -------------------------
This is not self contain example.
It cannot be linked and it does not have ITEMS table.
When user does not give self contain example which can be easy compiled
he forces that such example will be created by developer and it does
not eliminate possible user typos so very often is waste of time checking
them. Please rember about it in the future. It will help users because
can receive answer faster and developers because they can invest more
time in other modifications then creating real self contain examples
which can be compiled and tested until they will not find the one
which exploits the problem or they will be informed that user located
the problem in his source code.
In this case the problem is cause by this code in bmdbfcdx.c[6817]
pArea->dbfi.itmCobExpr = hb_itemPutC( NULL, NULL );
It cannot work. I do not know why Miguel added it so I cannot help you
directly. It looks like some unfinished modifications but maybe I'm wrong.
You will have to wait for Miguel response.
best regards,
Przemek
request BMDBFCDX
proc main()
field F
dbcreate( "items", {{"F", "C", 10, 0}},, .T. )
while lastrec() < 50
dbappend()
replace F with "rec:" + str( recno(), 3 )
enddo
CLOSE
USE items VIA "BMDBFCDX" NEW
set optimize on
DbSetFilter( {|| .f. } ) //tried .t. as well
BM_DBSETFILTERARRAY( {10,20,30} )
go top // <- error
browse()
return
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
