by nageswaragunupudi » Wed Mar 02, 2016 4:37 pm
Differences:
1) Your code has
ON CHANGE oDbfr:load().
I omitted this because for TDataBase, the DATA lBuffer is .T. by default. So every skip automatically loads the record and this statement is not necessary.
2) Your code:
FOR nCCol := 1 TO LEN( ::oBrw:acols )
::oBrw:aCols[nCCol]:nHeadStrAlign := AL_CENTER
NEXT
Instead I used
oBrw:nHeadStrAligns := AL_CENTER
This is a short cut for the above loop.
3) You used: ALIAS ::oDbfr
I used "DATASOURCE uSource" where uSource is the oDbf, which is a TDatabase object. DATASOURCE and ALIAS both in effect mean the samething as per the syntax.
4) I set filter to "!DELETED()".
I always use this and recommend this even for DBFCDX. Using this results in OrdKeyCount(), OrdKeyNo() and OrdKeyGoTo() work very accurately.
Now if and when you have time, I request you to:
1) You said you were having problem with a particular dbf. Please copy that dbf to this folder and test with t4.exe. Do you have the same problem with t4.exe also?
2) Please find and let us know (a) total number of records in that table and (b) number of deleted records in that table.
Regards
G. N. Rao.
Hyderabad, India