тесты сортировки примитивных типов

Author: Mr-Rm

tests/valuetable.os

@@ -43,6 +43,11 @@
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьСверткуПоКолонкамСуммированияСРазнымиТипами");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьСверткуПоОднойКолонкеСРазнымиТипами");
 
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировку_Чисел");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировку_Булевых");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировку_Дат");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировку_Строк");
+	
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировкуНеупорядочиваемыхТипов");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировкуРазныхТипов");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьСортировкуПоПредставлению");
@@ -783,6 +788,73 @@
 	     СтрШаблон("Сумма колонки %1 для значения %2 типа %3", КолонкаСуммы, Значение, ТипЗнч(Значение)) );
 КонецПроцедуры
 
+Процедура ТестДолжен_ПроверитьСортировку_Чисел() Экспорт
+	ТЗ = Новый ТаблицаЗначений();
+	ТЗ.Колонки.Добавить("Тест");
+
+	ТЗ.Добавить().Тест = 5;
+	ТЗ.Добавить().Тест = 10;
+	ТЗ.Добавить().Тест = -2;
+
+	ТЗ.Сортировать("Тест");
+
+	юТест.ПроверитьРавенство(ТЗ[0].Тест, -2, "ТЗ[0]");
+	юТест.ПроверитьРавенство(ТЗ[1].Тест, 5, "ТЗ[1]");
+	юТест.ПроверитьРавенство(ТЗ[2].Тест, 10, "ТЗ[2]");
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьСортировку_Булевых() Экспорт
+	ТЗ = Новый ТаблицаЗначений();
+	ТЗ.Колонки.Добавить("Тест");
+
+	ТЗ.Добавить().Тест = Истина;
+	ТЗ.Добавить().Тест = Ложь;
+	ТЗ.Добавить().Тест = Истина;
+
+	ТЗ.Сортировать("Тест");
+
+	юТест.ПроверитьРавенство(ТЗ[0].Тест, Ложь, "ТЗ[0]");
+	юТест.ПроверитьРавенство(ТЗ[1].Тест, Истина, "ТЗ[1]");
+	юТест.ПроверитьРавенство(ТЗ[2].Тест, Истина, "ТЗ[2]");
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьСортировку_Дат() Экспорт
+	ТЗ = Новый ТаблицаЗначений();
+	ТЗ.Колонки.Добавить("Тест");
+
+	Сегодня = ТекущаяДата();
+	Пустая = '0001-01-01 00:00';
+	ТЗ.Добавить().Тест = Сегодня;
+	ТЗ.Добавить().Тест = Сегодня + 2;
+	ТЗ.Добавить().Тест = Сегодня - 2;
+	ТЗ.Добавить().Тест = Пустая;
+
+	ТЗ.Сортировать("Тест");
+
+	юТест.ПроверитьРавенство(ТЗ[0].Тест, Пустая, "ТЗ[0]");
+	юТест.ПроверитьРавенство(ТЗ[1].Тест, Сегодня - 2, "ТЗ[1]");
+	юТест.ПроверитьРавенство(ТЗ[2].Тест, Сегодня, "ТЗ[2]");
+	юТест.ПроверитьРавенство(ТЗ[3].Тест, Сегодня + 2, "ТЗ[3]");
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьСортировку_Строк() Экспорт
+	ТЗ = Новый ТаблицаЗначений();
+	ТЗ.Колонки.Добавить("Тест");
+
+	ТЗ.Добавить().Тест = "Ели";
+	ТЗ.Добавить().Тест = "ежи";
+	ТЗ.Добавить().Тест = "Ёлки";
+	ТЗ.Добавить().Тест = "ёжики";
+
+	ТЗ.Сортировать("Тест");
+
+	юТест.ПроверитьРавенство(ТЗ[0].Тест, "ежи", "ТЗ[0]");
+	юТест.ПроверитьРавенство(ТЗ[1].Тест, "ёжики", "ТЗ[1]");
+	юТест.ПроверитьРавенство(ТЗ[2].Тест, "Ели", "ТЗ[2]");
+	юТест.ПроверитьРавенство(ТЗ[3].Тест, "Ёлки", "ТЗ[3]");
+КонецПроцедуры
+
+
 // к issue #1577
 Процедура ТестДолжен_ПроверитьСортировкуНеупорядочиваемыхТипов() Экспорт
 	ТЗ = Новый ТаблицаЗначений();