Tab.AddLineSorted

AddLineSorted (Работа со строками)
Объект: Таблица Статус разработки: Реализована Тип: Функция Обращение к БД: Нет Исключения: Невозможно превратить в строку, неверные имена столбцов Визуальность: Нет

• Начальная страница
• Общее описание
• Объекты
• Таблица

Функция добавляет новую строку и помечает ее как текущую (т.е. атрибут CurLine изменяется на индекс добавленной строки). Указанные во втором аргументе столбцы таблицы, в добавленной строке будут заполнены значениями, заданными последующими аргументами. Строка вставляется в таблицу таким образом, чтобы не нарушить сортировку, заданную наименованиями столбцов первого аргумента. Важно: таблица должна быть отсортирована по всем столбцам сортировки последовательно (т.е., должна быть проведена операция aTab.Sort(<Наименования столбцов сортировки через запятую (STRING)>), если таблица была не сортирована), иначе сохранение порядка сортировки не будет работать корректно. Важно: все столбцы сортировки должны присутствовать в столбцах добавления (порядок не важен). Данная функция может использоваться при необходимости последовательного добавления строк в таблицу, для которой важна сортировка (к примеру, будет использоваться функция Find с флагом сортировки. Как альтернатива, таблицу можно отсортировать перед началом блока с поиском, но в случае, если в одном блоке происходит и добавление строк и поиск строк по элементам, данный режим будет работать гораздо быстрее, чем последовательные вызовы сортировки перед каждым поиском (см. пример ниже).

Синтаксис

Tab.AddLineSorted(<Наименования столбцов сортировки через запятую (STRING)>,<Наименования столбцов добавления через запятую (STRING)>,<Значение столбца 1>,<Значение столбца 2>...)

Аргументы

• <Наименования столбцов сортировки через запятую (STRING)> - Наименования столбцов сортировки, разделенные запятой. Заполняемые столбцы могут не совпадать со столбцами сортировки, однако, все столбца сортировки должны входить в список столбцов добавления, иначе функция не сможет получить все значения, необходимые для нахождения индекса новой строки.
• <Наименования столбцов добавления через запятую (STRING)> - Наименования столбцов для заполнения, разделенные запятой. Количество наименований должно совпадать с количеством аргументов, следующих за данным.
• <Значение столбца ?> - (необязательный аргумент) Значения произвольного типа, которыми будут заполнены ячейки новой строки таблицы в столбцах, перечисленных во втором аргументе.

Примеры

//Создается и заполняется таблица значений
aTab:=Tab.Create("b1,b2,b3,b4");

aTab.AddLine("b1,b2,b3,b4",1,2,3,4);
aTab.AddLine("b1,b2,b3,b4",2,2,3,4);
aTab.AddLine("b1,b2,b3,b4",3,5,5,4);
aTab.AddLine("b1,b2,b3,b4",4,2,3,4);
aTab.AddLine("b1,b2,b3,b4",4,2,3,4);
aTab.AddLine("b1,b2,b3,b4",5,2,3,4);

aTab.AddLineSorted("b1,b2","b1,b2,b3,b4",2,1,3,4);

Message(aTab.CurLine);
//Выводит число 2 (была добавлена строка с индексом 2)

Сравнение скорости работы функций с сортировкой и функций без сортировки

Данный пример сравнивает скорость работы функции FindAndGoto для сортированной и не сортированной таблиц. Внутри цикла поиска также происходит увеличение массива с помощью функции AddLineSorted для проверки корректности ее работы.

См. также Пример поиска множества значений в сортированных таблицах.

ProfilerClear();
ProfilerStart();

randomize(1);
aTab:=Tab.Create("Col1,Col2,Col3");
For i:=1 To 100000 Do
  aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

For i:=1 To 10000 Do
  j:=Random(aTab.Size())+1;
  aCol1:=aTab.Get(j,"Col1");
  While _And(j>1,aTab.Get(j-1,"Col1")=aCol1) Do
    j:=j-1;
  EndDo;
  aTab.FindAndGoto(aCol1,,"Col1",1);
  If j<>aTab.CurLine Then
    Message("Проблема при поиске значения!","!");
  EndIf;
  //Добавление случайного значения внутри цикла поиска
  aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;  

randomize(1);
aTab:=Tab.Create("Col1,Col2,Col3");
For i:=1 To 100000 Do
  aTab.AddLine("Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

aTab.Sort("Col1");
For i:=1 To 10000 Do
  j:=Random(aTab.Size())+1;
  aCol1:=aTab.Get(j,"Col1");
  While _And(j>1,aTab.Get(j-1,"Col1")=aCol1) Do
    j:=j-1;
  EndDo;
  aTab.FindAndGoto(aCol1,,"Col1");
  If j<>aTab.CurLine Then
    Message("Проблема при поиске значения (2)!","!");
  EndIf;
  //Добавление случайного значения внутри цикла поиска
  aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;  

ProfilerStop();
debugbreak;

Message("Done!");
//Для i5, конечные результаты для среднего времени исполнения каждой операции:
//aTab.AddLineSorted() (нач. заполнение)   -- 3.61 сек.
//aTab.AddLine() и aTab.Sort();            -- 3.45 сек.
//aTab.FindAndGoto(aCol1,,"Col1",1);       -- 36 мс./10000
//aTab.FindAndGoto(aCol1,,"Col1");         -- 35010 мс./10000
//
//Как показывает эксперимент, для больших таблиц поиск в сортированной таблице имеет очень большое преимущество перед поиском без учета сортировки (1000 раз в нашем случае), 
//  преимущество будет только расти при увеличении количества строк в таблице
//Сортировка больших таблиц работает достаточно медленно, однако, использование функции AddLineSorted не имеет преимущества перед заполнением массива в случайном порядке, а затем его сортировкой.
//  AddLineSorted, однако, незаменим в случаях, когда необходимо добавлять строки в таблицу в цикле, в котором одновременно происходит сортированный поиск в этой же таблице.