Icon View Incident Report

Serious Serious
Reported By: Rich Walker
Reported On: 10/13/2002
For: Version 3.17 Build 1
# 1241 Modifying a Column That is Part of Full-Text Indexing May Cause the Changes to Not Be Seen

The following code exhibits a problem with TextSearch in a multi-user or multi-session environment.

  sess1.Active := False;
  sess2.Active := False;
  db1.Directory := ExtractFilePath(Application.ExeName);
  db2.Directory := ExtractFilePath(Application.ExeName);

  tblTemp1.EmptyTable;
  tblTemp1.Open;
  tblTemp2.Open;
  tblTemp1.Filtered := False;
  tblTemp2.Filtered := False;

  tblTemp1.Append;
  tblTemp1Keywords.Value := 'kw1';
  tblTemp1.Post;

  tblTemp1.Append;
  tblTemp1Keywords.Value := 'kw2';
  tblTemp1.Post;

  tblTemp1.Append;
  tblTemp1Keywords.Value := 'kw3';
  tblTemp1.Post;

  tblTemp2.Refresh;

  ShowMessage('Table populated.  Both grids show all 3 records.');

  tblTemp1.Filter := 'TextSearch("kw2" in Keywords)';
  tblTemp1.Filtered := True;
  tblTemp2.Filter := 'TextSearch("kw2" in Keywords)';
  tblTemp2.Filtered := True;
  ShowMessage('Filters turned on.  So far, so good!');

  tblTemp1.Filtered := False;
  tblTemp2.Filtered := False;
  ShowMessage('Filters turned off.');

  tblTemp1.Locate('Keywords',VarArrayOf(['kw2']),[]);
  Assert(tblTemp1Keywords.Value = 'kw2');
  tblTemp1.Edit;
  tblTemp1Keywords.Value := '';
  tblTemp1.Post;

  tblTemp2.Refresh;
  ShowMessage('After clearing Keywords field in the second record and refreshing.  Both grids show same results.');


  tblTemp1.Filtered := True;
  tblTemp2.Filtered := True;
  ShowMessage('Filters turned back on.  Why are the results different?');



Comments Comments
This could potentially cause problems with text index updates so if you are using full text indexing it is recommended that you update to version 3.18 to correct this issue.


Resolution Resolution
Fixed Problem on 10/14/2002 in version 3.18 build 1
Image