|
113 | 113 |
|
114 | 114 | Процедура УстановитьПакетПоОписанию(Знач ЗависимостьПакета, Знач УровеньЗависимости = 0) Экспорт
|
115 | 115 |
|
| 116 | + Если УровеньЗависимости < 0 Тогда |
| 117 | + ВызватьИсключение "УровеньЗависимости не может быть меньше нуля"; |
| 118 | + КонецЕсли; |
| 119 | + |
116 | 120 | Если ЗависимостьПакета.ДляРазработки Тогда
|
117 | 121 | // Зависимости разработчика устанавливаются только на первом уровне (УровеньЗависимости = 0)
|
118 | 122 | Если УстанавливатьЗависимостиРазработчика И УровеньЗависимости = 0 Тогда
|
|
135 | 139 |
|
136 | 140 | Процедура УстановитьПакетИзАрхива(Знач ФайлПакета, Знач ЭтоЗависимыйПакет = Ложь, Знач УровеньЗависимости = 0) Экспорт
|
137 | 141 |
|
| 142 | + Если УровеньЗависимости < 0 Тогда |
| 143 | + ВызватьИсключение "УровеньЗависимости не может быть меньше нуля"; |
| 144 | + КонецЕсли; |
| 145 | + |
138 | 146 | КаталогУстановки = ?(ЭтоЗависимыйПакет, КаталогУстановкиЗависимостей, ЦелевойКаталогУстановки);
|
139 | 147 | УстановкаПакета = Новый УстановкаПакета();
|
140 | 148 | УстановкаПакета.СоздаватьФайлЗапуска(СоздаватьФайлыЗапуска);
|
|
179 | 187 |
|
180 | 188 | Процедура УстановитьПакетПоИмениИВерсии(Знач ИмяПакета, Знач ВерсияПакета, ЗНач ЭтоЗависимыйПакет = Ложь, Знач УровеньЗависимости = 0) Экспорт
|
181 | 189 |
|
| 190 | + Если УровеньЗависимости < 0 Тогда |
| 191 | + ВызватьИсключение "УровеньЗависимости не может быть меньше нуля"; |
| 192 | + КонецЕсли; |
| 193 | + |
182 | 194 | ФайлПакета = РаботаСПакетами.ПолучитьПакет(ИмяПакета, ВерсияПакета, , ИмяСервера);
|
183 | 195 | УстановитьПакетИзАрхива(ФайлПакета, ЭтоЗависимыйПакет, УровеньЗависимости);
|
184 | 196 |
|
185 | 197 | КонецПроцедуры
|
186 | 198 |
|
187 | 199 | Процедура РазрешитьЗависимостиПакета(Знач Манифест, Знач УровеньЗависимости = 0) Экспорт
|
188 | 200 |
|
| 201 | + Если УровеньЗависимости < 0 Тогда |
| 202 | + ВызватьИсключение "УровеньЗависимости не может быть меньше нуля"; |
| 203 | + КонецЕсли; |
| 204 | + |
189 | 205 | Зависимости = Манифест.Зависимости();
|
190 | 206 | Если Зависимости.Количество() = 0 Тогда
|
191 | 207 | Возврат;
|
|
0 commit comments