anchor.diff:    logger.Debug('Found ' + IntToStr(rows) + ' rows in source table of destination table ' + aTable.DestinationTableName);
     logger.Debug('Performed ' + IntToStr(performedInserts) + ' insert commands to destination table ' + aTable.DestinationTableName);
     logger.Debug('Performed ' + IntToStr(performedUpdates) + ' update commands to destination table ' + aTable.DestinationTableName);
  +  logger.Debug('Performed ' + IntToStr(performedDeletes) + ' delete commands to destination table ' + aTable.DestinationTableName);
     {$ENDIF}
     if Assigned(aResults) then
     begin
  
positive.code:           end;
          end;
  
          sourceFieldsMap.Clear;
          sourceQuery.Open;
          rows := 0;
          performedInserts := 0;
          performedUpdates := 0;
  
negative.code:           if sourceFieldsMap.Count = 0 then
            begin
              for q := 0 to sourceQuery.AsDataset.Fields.Count - 1 do
              begin
                sourceFieldsMap.Add(Uppercase(sourceQuery.AsDataset.Fields[q].FieldName), sourceQuery.AsDataset.Fields[q]);
                {$IFDEF DEBUG}
                logger.Debug('Add source field ' + Uppercase(sourceQuery.AsDataset.Fields[q].FieldName) + ' to map...' );
                {$ENDIF}
              end;
            end;
  
            curKeyString:= '';
  