Добавлена команда установки состояния "Версия помещена" с

предупреждением

GitConverter/src/Catalogs/ВерсииХранилища/Forms/ФормаСписка/Form.form

@@ -724,6 +724,35 @@
           <autoMaxHeight>true</autoMaxHeight>
           <placementArea>UserCmds</placementArea>
         </items>
+        <items xsi:type="form:Button">
+          <name>СписокКонтекстноеМенюУстановитьСостояниеВерсияПомещена</name>
+          <id>89</id>
+          <visible>true</visible>
+          <enabled>true</enabled>
+          <userVisible>
+            <common>true</common>
+          </userVisible>
+          <extendedTooltip>
+            <name>СписокКонтекстноеМенюУстановитьСостояниеВерсияПомещенаРасширеннаяПодсказка</name>
+            <id>90</id>
+            <visible>true</visible>
+            <enabled>true</enabled>
+            <userVisible>
+              <common>true</common>
+            </userVisible>
+            <type>Label</type>
+            <autoMaxWidth>true</autoMaxWidth>
+            <autoMaxHeight>true</autoMaxHeight>
+            <extInfo xsi:type="form:LabelDecorationExtInfo">
+              <horizontalAlign>Left</horizontalAlign>
+            </extInfo>
+          </extendedTooltip>
+          <commandName>Form.Command.УстановитьСостояниеВерсияПомещена</commandName>
+          <representation>Auto</representation>
+          <autoMaxWidth>true</autoMaxWidth>
+          <autoMaxHeight>true</autoMaxHeight>
+          <placementArea>UserCmds</placementArea>
+        </items>
         <items xsi:type="form:Button">
           <name>СписокКонтекстноеМенюСброситьСостояние</name>
           <id>87</id>
@@ -1444,6 +1473,23 @@
     </action>
     <currentRowUse>DontUse</currentRowUse>
   </formCommands>
+  <formCommands>
+    <name>УстановитьСостояниеВерсияПомещена</name>
+    <title>
+      <key>ru</key>
+      <value>Установить состояние &quot;Версия помещена&quot;</value>
+    </title>
+    <id>5</id>
+    <use>
+      <common>true</common>
+    </use>
+    <action xsi:type="form:FormCommandHandlerContainer">
+      <handler>
+        <name>УстановитьСостояниеВерсияПомещена</name>
+      </handler>
+    </action>
+    <currentRowUse>Auto</currentRowUse>
+  </formCommands>
   <commandInterface>
     <navigationPanel/>
     <commandBar/>

GitConverter/src/Catalogs/ВерсииХранилища/Forms/ФормаСписка/Module.bsl

@@ -53,6 +53,23 @@
 	
 КонецПроцедуры
 
+&НаКлиенте
+Процедура УстановитьСостояниеВерсияПомещена(Команда)
+	
+	ТекстВопроса = НСтр("ru = 'Изменения по версиям не будут отражены в репозитории.
+						|Вы уверены, что необходимо установить состояние ""Версия помещена""?'");
+	
+	ОписаниеОповещенияОЗавершении = Новый ОписаниеОповещения("УстановитьСостояниеВерсияПомещенаЗавершение", ЭтотОбъект, Неопределено);
+	
+	Кнопки = Новый СписокЗначений();
+	Кнопки.Добавить(КодВозвратаДиалога.Да, НСтр("ru = 'Уверен, установить ""Версия помещена""'"));
+	Кнопки.Добавить(КодВозвратаДиалога.Отмена);
+	
+	ПоказатьВопрос(ОписаниеОповещенияОЗавершении, ТекстВопроса, Кнопки);
+	
+КонецПроцедуры
+
+
 &НаКлиенте
 Процедура СброситьСостояние(Команда)
 	
@@ -139,5 +156,17 @@
 	
 КонецФункции
 
+&НаКлиенте
+Процедура УстановитьСостояниеВерсияПомещенаЗавершение(Ответ, ДополнительныеПараметры) Экспорт
+	
+	Если Ответ <> КодВозвратаДиалога.Да Тогда
+		Возврат;
+	КонецЕсли;
+	
+	УстановитьСостояниеНаСервере(Элементы.Список.ВыделенныеСтроки, "ВерсияПомещена");
+	ОповеститьОбИзмененииВыделенныеСтроки();
+	
+КонецПроцедуры
+
 #КонецОбласти