Used to PACK and Reindex the data files.
Typically you'll want to subclass this method and add your own code to cause tables to reindex. You can pass an extra parameter of .T. to have reindex return you a string of the index commands for the currently active indexes in the table in the vResult property.
.T. or .F.
When set to .t. the Index string is saved and returned to you. You can use this to override the Reindex method with a full index command which is more reliable than the default behavior.
* ** Sample Implementation
IF THIS.nDataMode = 0
IF !OpenExclusive(THIS.cDataPath + THIS.cFileName,THIS.cAlias)
THIS.SetError("Unable to open Item file due to exclusive use.")
DELETE TAG ALL
INDEX ON pk TAG pk
INDEX ON sku TAG sku
INDEX ON lower(padr(descript,10)) TAG descript
INDEX ON deleted() TAG deleted
See also:Class wwBusinessObject
Comment or report problem with topic