I made a discovery regarding this nagging error that has been
reported occasionally during Indexing operations.
We found this out because we made a subtle change to our app's
statusbar display of today's date. All we did is make a call to
__SetCentury(.t.), and the ADS 6619 error started occurring
intermittently during indexing.
xHarbour provides a "Listener" feature that forwards
*SETTINGS* that need to stay in sync with ADS. Consider the following
standard calls to Set():
case HB_SET_DATEFORMAT :
case HB_SET_DEFAULT :
case HB_SET_DELETED :
case HB_SET_EPOCH :
case HB_SET_EXACT :
case HB_SET_PATH :
case HB_SET_DECIMALS :
Most of these - especially SET_DATEFORMAT - are not immediately
considered "database calls". In my case, __SetCentury() is considered
purely a UI function. BUT internally it calls Set(HB_SET_DATEFORMAT),
and this then produces a call to AdsSetDateFormat(), which produces the
6619 error if it occurs while a callback is being processed.
To sum it up:
Any call that changes any of the above settings, directly or indirectly,
will call an ACE32 function that will throw error 6619 if a callback
is being processed.
It was all the more hidden because this call is done on our main window
refresh to show the date and time on the statusbar-not by any data
processing code or even the actual callback handler for the
Indexing Progress display. But if it happens in the split second while
we receive the callback and paint the meter, the error occurs.
I need to spend some more time on this to determine what to do
so it's not a lurking problem for everyone.
Basically, there are a LOT of standard calls that are not safe to
be using while you've registered an ADS callback for indexing or
packing, etc. But it's not quite safe to turn off the Listener because
these settings do need to stay in sync..
--
Brian Hays
Abacus Data Systems, Inc.
------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing.
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers