Skip to content

Commit

Permalink
Merge pull request 1C-Company#15 from 1C-Company/develop
Browse files Browse the repository at this point in the history 
Релиз 1.0.4.2
  • Loading branch information
@marmyshev
marmyshev authored Jan 29, 2018
2 parents 62f167a + ba919d5 commit 0eb3acd
Show file tree
Hide file tree
Showing 32 changed files with 3,215 additions and 215 deletions.
Binary file added ConvertToEDT.png
View file
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
40 changes: 39 additions & 1 deletion GitConverter/src/Catalogs/ВерсииХранилища/Forms/ФормаСписка/Module.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -82,12 +82,34 @@

КонецЕсли;


СистемнаяИнформация = Новый СистемнаяИнформация;
ЭтоWindowsСервер = (СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86
Или СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86_64);

Для Каждого Ссылка Из ВыделенныеСтроки Цикл
ВерсияОбъект = Ссылка.ПолучитьОбъект();
УдалятьФайлы = ПроверитьНеобходимостьУдалятьФайлыВерсии(ВерсияОбъект, СостояниеСсылка);

ВерсияОбъект.Состояние = СостояниеСсылка;
ВерсияОбъект.ВыгрузкаИзменений = Ложь;
ВерсияОбъект.Записать();

// Зачистка файлов команд, если уже были сформированы
Если УдалятьФайлы Тогда
КаталогВыгрузкиВерсий = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ВерсияОбъект.Владелец, "КаталогВыгрузкиВерсий");
КаталогВыгрузкиВерсий = ОбщегоНазначенияКлиентСервер.ДобавитьКонечныйРазделительПути(КаталогВыгрузкиВерсий);

ИмяФайлаКомандыGit = "git_command_" + Формат(ВерсияОбъект.Код, "ЧДЦ=; ЧГ=0") + ?(ЭтоWindowsСервер, ".bat", ".sh");
ИмяФайлКомментария = "git_comment_" + Формат(ВерсияОбъект.Код, "ЧДЦ=; ЧГ=0") + ".txt";
Файл = Новый Файл(ИмяФайлаКомандыGit);
Если Файл.Существует() Тогда
УдалитьФайлы(ИмяФайлаКомандыGit);
КонецЕсли;
Файл = Новый Файл(ИмяФайлКомментария);
Если Файл.Существует() Тогда
УдалитьФайлы(ИмяФайлКомментария);
КонецЕсли;
КонецЕсли;
КонецЦикла;

КонецПроцедуры
Expand All @@ -101,5 +123,21 @@

КонецПроцедуры

&НаСервереБезКонтекста
Функция ПроверитьНеобходимостьУдалятьФайлыВерсии(ВерсияОбъект, НовоеСостояние)

Если НовоеСостояние = Перечисления.СостоянияВерсии.ПустаяСсылка() Тогда
Возврат Истина;
ИначеЕсли (ВерсияОбъект.Состояние = Перечисления.СостоянияВерсии.МетаданныеЗагружены
ИЛИ ВерсияОбъект.Состояние = Перечисления.СостоянияВерсии.НачалоКоммита
ИЛИ ВерсияОбъект.Состояние = Перечисления.СостоянияВерсии.ВерсияПомещена)
И НовоеСостояние <> Перечисления.СостоянияВерсии.МетаданныеЗагружены Тогда
Возврат Истина;
КонецЕсли;

Возврат Ложь;

КонецФункции

#КонецОбласти

177 changes: 145 additions & 32 deletions GitConverter/src/Catalogs/ВерсииХранилища/Forms/ФормаЭлемента/Form.form
View file
Original file line number Diff line number Diff line change
Expand Up @@ -241,22 +241,134 @@
<textEdit>true</textEdit>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>КаталогВременныхФайлов</name>
<id>61</id>
<items xsi:type="form:FormGroup">
<name>Группа2</name>
<id>92</id>
<items xsi:type="form:FormField">
<name>КаталогВременныхФайлов</name>
<id>61</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:MultiLanguageDataPath">
<paths xsi:type="form:DataPath">
<segments>Объект.КаталогВременныхФайлов</segments>
</paths>
</dataPath>
<extendedTooltip>
<name>КаталогВременныхФайловРасширеннаяПодсказка1</name>
<id>63</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>
<contextMenu>
<name>КаталогВременныхФайловКонтекстноеМеню1</name>
<id>62</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>ИмяФайлаЛога</name>
<id>94</id>
<title>
<key>ru</key>
<value>Лог</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>ИмяФайлаЛога</segments>
</dataPath>
<toolTip>
<key>ru</key>
<value>Файл лога действий с текущей версией</value>
</toolTip>
<toolTipRepresentation>Button</toolTipRepresentation>
<extendedTooltip>
<name>ИмяФайлаЛогаРасширеннаяПодсказка</name>
<id>96</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>
<contextMenu>
<name>ИмяФайлаЛогаКонтекстноеМеню</name>
<id>95</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<readOnly>true</readOnly>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<handlers>
<event>Opening</event>
<name>ИмяФайлаЛогаОткрытие</name>
</handlers>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<openButton>true</openButton>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:MultiLanguageDataPath">
<paths xsi:type="form:DataPath">
<segments>Объект.КаталогВременныхФайлов</segments>
</paths>
</dataPath>
<extendedTooltip>
<name>КаталогВременныхФайловРасширеннаяПодсказка1</name>
<id>63</id>
<name>Группа2РасширеннаяПодсказка</name>
<id>93</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
Expand All @@ -269,28 +381,11 @@
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>КаталогВременныхФайловКонтекстноеМеню1</name>
<id>62</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<throughAlign>Auto</throughAlign>
</extInfo>
</items>
<items xsi:type="form:FormField">
Expand Down Expand Up @@ -1454,6 +1549,24 @@
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ИмяФайлаЛога</name>
<title>
<key>ru</key>
<value>Имя файла лога</value>
</title>
<id>5</id>
<valueType>
<types>String</types>
<stringQualifiers/>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<formCommands>
<name>ОбновитьСостояние</name>
<title>
Expand Down
38 changes: 37 additions & 1 deletion GitConverter/src/Catalogs/ВерсииХранилища/Forms/ФормаЭлемента/Module.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -26,7 +26,15 @@
Элементы.ГруппаСостояние.Видимость = Ложь;
КонецЕсли;

КонецПроцедуры
Если ТекущийОбъект.Состояние = Перечисления.СостоянияВерсии.НачалоКоммита
ИЛИ ТекущийОбъект.Состояние = Перечисления.СостоянияВерсии.ВерсияПомещена Тогда
КаталогВыгрузкиВерсий = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ТекущийОбъект.Владелец, "КаталогВыгрузкиВерсий");
ИмяФайлаЛога = КонвертацияХранилища.ИмяФайлаЛогаКоммитаВерсии(ТекущийОбъект.Код, КаталогВыгрузкиВерсий);
Иначе
ИмяФайлаЛога = КонвертацияХранилища.ИмяФайлаЛогаОбработкиВерсии(ТекущийОбъект.КаталогВременныхФайлов);
КонецЕсли;

КонецПроцедуры

#КонецОбласти

Expand Down Expand Up @@ -54,6 +62,27 @@

#КонецОбласти

#Область ОбработчикиСобытийЭлементовШапкиФормы

&НаКлиенте
Процедура ИмяФайлаЛогаОткрытие(Элемент, СтандартнаяОбработка)

СтандартнаяОбработка = Ложь;
Если Не ЗначениеЗаполнено(ИмяФайлаЛога) Тогда
Возврат;
КонецЕсли;

Текст = Новый ТекстовыйДокумент();

ИмяФайла = "";
ПрочитатьТекстовыйФайлНаСервере(ИмяФайлаЛога, Текст, ИмяФайла);

Текст.Показать(ИмяФайла, ИмяФайла);

КонецПроцедуры

#КонецОбласти

#Область СлужебныеПроцедурыИФункции

&НаСервереБезКонтекста
Expand All @@ -72,4 +101,11 @@
КонецЕсли;
КонецПроцедуры

&НаСервереБезКонтекста
Процедура ПрочитатьТекстовыйФайлНаСервере(ПутьКФайлу, Текст, ИмяФайла, КодировкаСистемы = Ложь)

ОбщегоНазначения.ПрочитатьТекстовыйФайл(ПутьКФайлу, Текст, ИмяФайла, КодировкаСистемы);

КонецПроцедуры

#КонецОбласти
Loading

0 comments on commit 0eb3acd

Please sign in to comment.