Merge pull request #34 from Untru/feat/27_3

Логирование команд

src/Catalogs/Базы/Forms/ФормаЭлемента/Form.form

@@ -3,6 +3,12 @@
   <items xsi:type="form:FormGroup">
     <name>ГруппаОсновная</name>
     <id>40</id>
+    <items xsi:type="form:FormGroup">
+      <name>Группа1</name>
+      <id>97</id>
+      <items xsi:type="form:FormGroup">
+        <name>ГруппаЛево</name>
+        <id>95</id>
         <items xsi:type="form:FormField">
           <name>Владелец</name>
           <id>4</id>
@@ -346,6 +352,37 @@
             <checkBoxType>Switcher</checkBoxType>
           </extInfo>
         </items>
+        <visible>true</visible>
+        <enabled>true</enabled>
+        <userVisible>
+          <common>true</common>
+        </userVisible>
+        <title>
+          <key>ru</key>
+          <value>Основное</value>
+        </title>
+        <extendedTooltip>
+          <name>ГруппаЛевоРасширеннаяПодсказка</name>
+          <id>96</id>
+          <type>Label</type>
+          <autoMaxWidth>true</autoMaxWidth>
+          <autoMaxHeight>true</autoMaxHeight>
+          <extInfo xsi:type="form:LabelDecorationExtInfo">
+            <horizontalAlign>Left</horizontalAlign>
+          </extInfo>
+        </extendedTooltip>
+        <type>UsualGroup</type>
+        <extInfo xsi:type="form:UsualGroupExtInfo">
+          <group>HorizontalIfPossible</group>
+          <behavior>Auto</behavior>
+          <representation>WeakSeparation</representation>
+          <showLeftMargin>true</showLeftMargin>
+          <united>true</united>
+          <showTitle>true</showTitle>
+          <throughAlign>Auto</throughAlign>
+          <currentRowUse>Auto</currentRowUse>
+        </extInfo>
+      </items>
       <items xsi:type="form:FormGroup">
         <name>Группа1С</name>
         <id>44</id>
@@ -446,7 +483,7 @@
           <id>16</id>
           <title>
             <key>ru</key>
-          <value>Имя пользователя</value>
+            <value>Логин</value>
           </title>
           <visible>true</visible>
           <enabled>true</enabled>
@@ -492,7 +529,7 @@
           <id>19</id>
           <title>
             <key>ru</key>
-          <value>Пароль пользователя</value>
+            <value>Пароль</value>
           </title>
           <visible>true</visible>
           <enabled>true</enabled>
@@ -538,6 +575,10 @@
         <items xsi:type="form:FormField">
           <name>БазаПубликации</name>
           <id>78</id>
+          <title>
+            <key>ru</key>
+            <value>URL</value>
+          </title>
           <visible>true</visible>
           <enabled>true</enabled>
           <userVisible>
@@ -607,6 +648,35 @@
           <currentRowUse>Auto</currentRowUse>
         </extInfo>
       </items>
+      <visible>true</visible>
+      <enabled>true</enabled>
+      <userVisible>
+        <common>true</common>
+      </userVisible>
+      <title>
+        <key>ru</key>
+        <value>Группа1</value>
+      </title>
+      <extendedTooltip>
+        <name>Группа1РасширеннаяПодсказка</name>
+        <id>98</id>
+        <type>Label</type>
+        <autoMaxWidth>true</autoMaxWidth>
+        <autoMaxHeight>true</autoMaxHeight>
+        <extInfo xsi:type="form:LabelDecorationExtInfo">
+          <horizontalAlign>Left</horizontalAlign>
+        </extInfo>
+      </extendedTooltip>
+      <type>UsualGroup</type>
+      <extInfo xsi:type="form:UsualGroupExtInfo">
+        <group>AlwaysHorizontal</group>
+        <behavior>Auto</behavior>
+        <showLeftMargin>true</showLeftMargin>
+        <united>true</united>
+        <throughAlign>Auto</throughAlign>
+        <currentRowUse>Auto</currentRowUse>
+      </extInfo>
+    </items>
     <items xsi:type="form:FormGroup">
       <name>ГруппаХранилище</name>
       <id>70</id>
@@ -904,7 +974,7 @@
       </userVisible>
       <title>
         <key>ru</key>
-        <value>Доступ к SQL</value>
+        <value>Доступ к SQL (Для IBCMD)</value>
       </title>
       <extendedTooltip>
         <name>ГруппаSQLРасширеннаяПодсказка</name>
@@ -919,7 +989,8 @@
       <type>UsualGroup</type>
       <extInfo xsi:type="form:UsualGroupExtInfo">
         <group>Vertical</group>
-        <behavior>Auto</behavior>
+        <behavior>Collapsible</behavior>
+        <collapsed>true</collapsed>
         <representation>WeakSeparation</representation>
         <showLeftMargin>true</showLeftMargin>
         <united>true</united>

src/CommonModules/КомандыЗапускаПриложения/Module.bsl

@@ -8,7 +8,7 @@
 
 Функция НовыйКомандаПолученияВеток() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("branch");
 	КомандаЗапуска.Добавить("--no-color");
@@ -23,7 +23,7 @@
 
 Функция НовыйКомандаПерейтиНаНовуюВетку(НоваяВетка) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("switch");
 	ДобавитьОпцию(КомандаЗапуска, "-c", НоваяВетка);
@@ -37,7 +37,7 @@
 
 Функция НовыйКомандаПерейтиНаВеткуЛокально(ИмяВетки) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("checkout");
 	КомандаЗапуска.Добавить(ИмяВетки);
@@ -51,7 +51,7 @@
 
 Функция НовыйКомандаОтправить() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("push");
 	КомандаЗапуска.Добавить("--all");
@@ -66,7 +66,7 @@
 //@skip-check export-procedure-missing-comment
 Функция НовыйКомандаТекущаяВетка() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("symbolic-ref");
 	КомандаЗапуска.Добавить("--short");
@@ -83,7 +83,7 @@
 //
 Функция НовыйКомандаИндексироватьВсе() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("add");
 	КомандаЗапуска.Добавить(".");
@@ -100,7 +100,7 @@
 //
 Функция НовыйКомандаКоммит(Комментарий) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("commit");
 	КомандаЗапуска.Добавить("-m");
@@ -118,7 +118,7 @@
 //
 Функция НовыйКомандаНастройкаSSLVerify() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("config");
 	КомандаЗапуска.Добавить("--global");
@@ -137,7 +137,7 @@
 //
 Функция НовыйКомандаОбновитьРепозиторийИзУдаленного() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("pull");
 	
@@ -153,7 +153,7 @@
 //
 Функция НовыйКомандаСтатусГит() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("status");
 	
@@ -169,7 +169,7 @@
 //
 Функция НовыйКомандаКлонироватьРепозиторий(URLРепозитория) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("clone");
 	КомандаЗапуска.Добавить(URLРепозитория);
@@ -186,7 +186,7 @@
 //
 Функция НовыйКомандаИзвлечениеИзменений() Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("git");
 	КомандаЗапуска.Добавить("fetch");
 	КомандаЗапуска.Добавить("--all");
@@ -225,9 +225,8 @@
 
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
-	КомандаЗапуска.Добавить("oscript");
+	КомандаЗапуска.Добавить("pivo-cli");
-	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("Branch");
 	ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
 	
@@ -248,13 +247,14 @@
 	ДобавитьОпцию(КомандаЗапуска, "--NameDBWeb", ПараметрыБазы.БазаПубликации);
 	ДобавитьОпцию(КомандаЗапуска, "--ServerDBWeb", ПараметрыБазы.СерверПубликации);	
 	
-	//ПараметрыЗадачи
 	ДобавитьОпцию(КомандаЗапуска, "--NewBranch", ПараметрыЗадачи.ИмяВетки);
 	ДобавитьОпцию(КомандаЗапуска, "--LoadDB", Формат(ПараметрыЗадачи.ДорабатыватьКонфигурацию, "БЛ=false; БИ=true"));		
 	ДобавитьОпцию(КомандаЗапуска, "--NamesDataProcessors", ПараметрыЗадачи.ВнешниеФайлы);
 
 	ДобавитьОпцию(КомандаЗапуска, "--Extensions", ПараметрыЗадачи.Расширения);
 	
+	ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
+	
 	ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
 	
 	КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -268,7 +268,7 @@
 
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("BranchToDevelop");
@@ -313,7 +313,7 @@
 
 Функция НовыйКомандаПереходаНаВеткуDevelop(ПараметрыБазы) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("BranchDevelop");
@@ -350,9 +350,8 @@
 
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
-	КомандаЗапуска.Добавить("oscript");
+	КомандаЗапуска.Добавить("pivo-cli");
-	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("commit");
 	
 	ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
@@ -381,10 +380,10 @@
 	КонецЕсли;
 	
 	ДобавитьОпцию(КомандаЗапуска, "--Extensions", ПараметрыЗадачи.Расширения);
-	
-	//ПараметрыЗадачи
 	ДобавитьОпцию(КомандаЗапуска, "--TextCommit", ДополнительныеПараметры.ТекстКоммита);
 			
+	ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
+	
 	ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
 			
 	КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -403,7 +402,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("CreateBranch");
@@ -431,7 +430,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("pivo-cli");
 	КомандаЗапуска.Добавить("init");
 	
@@ -440,6 +439,7 @@
 	ДобавитьОпцию(КомандаЗапуска, "--UserName", НастройкиПользователя.ИмяПользователяGit);	
 	ДобавитьОпцию(КомандаЗапуска, "--UserEmail", НастройкиПользователя.ПочтаПользователяGit);
 			
+	ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
 				
 	КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
 	КомандаЗапуска = ОбщегоНазначенияСлужебныйКлиентСервер.БезопаснаяСтрокаКоманды(КомандаЗапуска);		
@@ -469,7 +469,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("BuildRelease");
@@ -534,7 +534,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("CompileDataProcessors");
@@ -587,7 +587,7 @@
 //
 Функция НовыйКомандаПлановоеОбновлениеБазы(ПараметрыБазы, Релиз) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("UpdateDB");
@@ -674,7 +674,7 @@
 	
 	//ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("UpdateDBDataProcessors");
@@ -735,7 +735,7 @@
 //
 Функция НовыйКомандаОбновлениеОбработкиИзПапки(ПараметрыБазы, ПутьКПапкеВнешнихОбработок) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("UpdateDataProcessorsFromFolder");
@@ -792,9 +792,8 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
-	КомандаЗапуска.Добавить("oscript");
+	КомандаЗапуска.Добавить("pivo-cli");
-	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("CreateMergeRequest");
 	
 	ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
@@ -810,6 +809,8 @@
 	
 	ДобавитьОпцию(КомандаЗапуска, "--TextMR", ДополнительныеПараметры.ТекстМерджРеквеста);
 	
+	ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
+	
 	ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
 	
 	КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -840,7 +841,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("gh");
 	КомандаЗапуска.Добавить("pr");
 	КомандаЗапуска.Добавить("create");
@@ -882,7 +883,7 @@
 
 	ПараметрыКомандЗапуска = ПараметрыСеанса.ПараметрыКомандЗапуска;
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ПараметрыКомандЗапуска.oscript);
 	КомандаЗапуска.Добавить("MakeDataProcessors");
@@ -927,7 +928,7 @@
 	
 	ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
 		
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("UpdateDataProcessors");
@@ -970,7 +971,7 @@
 //
 Функция НовыйКомандаЗаблокироватьБазу(ПараметрыБазы, Релиз) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("block");
@@ -1002,7 +1003,7 @@
 //
 Функция НовыйКомандаПингБазы(ПараметрыБазы) Экспорт
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить("oscript");
 	КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
 	КомандаЗапуска.Добавить("scorpion");
@@ -1033,7 +1034,7 @@
 		ПараметрыБазы.ИмяJobJenkins
 	);	
 	
-	КомандаЗапуска = Новый Массив;
+	КомандаЗапуска = Новый Массив; //Массив Из Строка
 	КомандаЗапуска.Добавить(ЮрлЗапускаJob);
 	
 	КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -1119,4 +1120,20 @@
 	
 КонецФункции
 
+// Записать команду в журнал регистрации.
+// 
+// Параметры:
+//  КомандаЗапуска - Массив Из Строка
+Процедура ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска)
+	
+	Комментарий = Новый Массив; //Массив Из Строка
+	
+	Для Каждого Элемент Из КомандаЗапуска Цикл
+		Комментарий.Добавить(?(СтрНайти(Элемент, """")> 0 , Элемент, """" + Элемент + """"));	
+	КонецЦикла;
+	ЗаписьЖурналаРегистрации("GIT.АргументыКоманды", 
+		УровеньЖурналаРегистрации.Информация, , , СтрСоединить(Комментарий, ","));
+		
+КонецПроцедуры
+
 #КонецОбласти