Hi, all
[only for info]
There is letter in xHarbour forum from Anatole Kolotovkin
("dbeval incompatibility", 2008.02.25 10:07)
and it is relevant for Harbour too.
IMHO it must be included in dissonance with Clipper list.
-----
Hello, All!
in Clipper dbeval () remembers current aliase.
I do not assert that it correctly, but so is.
======== example
Func Main()
local i
altd()
dbcreate('tmp1',{{'wfld1','N',2,0}})
use tmp1 new
for i=1 to 10
dbappend()
field->wfld1:=i
next
dbcreate('tmp2',{{'wfld2','N',2,0}})
use tmp2 new
for i=1 to 10
dbappend()
field->wfld2:=i+10
next
dbselectarea(1)
dbgotop()
dbeval({|| dbselectarea(2) },;
{|| wfld1<> 0},;
{|| wfld1<> 0} )
browse()
return NIL
With best regards, Anatole Kolotovkin. E-mail: [EMAIL PROTECTED]
-----
Best regards,
Saulius
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
