Merge branch 'master' into develop

# Conflicts:
#	packagedef

Author: arkuznetsov

src/Классы/tool1CD.os

@@ -132,7 +132,7 @@
 
 КонецПроцедуры
 
-Процедура ПриПолученииТаблицыВерсий(ТаблицаВерсий, ПутьКХранилищу, СтандартнаяОбработка) Экспорт
+Процедура ПриПолученииТаблицыВерсий(ТаблицаВерсий, ПутьКХранилищу, НачальнаяВерсия, СтандартнаяОбработка) Экспорт
 
 	Если НЕ ПроверитьПутьКХранилищю(ПутьКХранилищу) Тогда
 		Возврат;
@@ -159,6 +159,18 @@
 	ТаблицаВерсий = КонвертироватьТаблицуВерсийИзФорматаБД(ТаблицаВерсий, ТаблицаБД);
 	ТаблицаВерсий.Сортировать("НомерВерсии");
 
+	Если ТипЗнч(НачальнаяВерсия) = Тип("Число") И НачальнаяВерсия > 0 Тогда
+		МассивУдаляемых = Новый Массив();
+		Для Каждого ТекСтрокаВерсии Из ТаблицаВерсий Цикл
+			Если ТекСтрокаВерсии.НомерВерсии < НачальнаяВерсия Тогда
+				МассивУдаляемых.Добавить(ТекСтрокаВерсии);
+			КонецЕсли;
+		КонецЦикла;
+		Для Каждого ТекСтрокаВерсии Из МассивУдаляемых Цикл
+			ТаблицаВерсий.Удалить(ТекСтрокаВерсии);
+		КонецЦикла;
+	КонецЕсли;
+
 КонецПроцедуры
 
 // Считывает таблицу USERS пользователей хранилища