...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::Name);
// Delete the following line.
TempRec.SETRANGE(Word,COPYSTR(Name,1,20));
IF TempRec.FIND('-') THEN
REPEAT
...
...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::Name);
// Add the following line.
TempRec.SETRANGE(Word,COPYSTR(Name,1,MAXSTRLEN(TempRec.Word)));
IF TempRec.FIND('-') THEN
REPEAT
...
...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::Street);
// Delete the following line.
TempRec.SETRANGE(Word,COPYSTR(Address,1,20));
IF TempRec.FIND('-') THEN
REPEAT
...
...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::Street);
// Add the following line.
TempRec.SETRANGE(Word,COPYSTR(Address,1,MAXSTRLEN(TempRec.Word)));
IF TempRec.FIND('-') THEN
REPEAT
...
...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::City);
// Delete the following line.
TempRec.SETRANGE(Word,COPYSTR(City,1,20));
IF TempRec.FIND('-') THEN
REPEAT
...
...
TempRec.SETRANGE("Source Type","Source Type");
TempRec.SETRANGE("Data Type",TempRec."Data Type"::City);
// Add the following line.
TempRec.SETRANGE(Word,COPYSTR(City,1,MAXSTRLEN(TempRec.Word)));
IF TempRec.FIND('-') THEN
REPEAT
...