#150 Кнопки в командную панель, переименовать методы по стандарту

Author: Untru

src/Инструменты/src/DataProcessors/УИ_РедакторРеквизитовОбъекта/Forms/ФормаОбъекта/Module.bsl

@@ -42,7 +42,7 @@
 		Элементы.ГруппаПараметрыЗаписи);
 	УИ_ОбщегоНазначения.ФормаИнструментаПриСозданииНаСервере(ЭтотОбъект, Отказ, СтандартнаяОбработка);
 
-	вДобавитьКомандуОчисткиТаблицы(Элементы._НаборЗаписей, "_НаборЗаписей");
+	ДобавитьКомандуОчисткиТаблицы(Элементы._НаборЗаписей, "_НаборЗаписей");
 КонецПроцедуры
 
 &НаКлиенте
@@ -1251,7 +1251,7 @@
 КонецФункции
 
 &НаСервере
-Процедура вДобавитьКомандуОчисткиТаблицы(Таблица, ПутьКДанным)
+Процедура ДобавитьКомандуОчисткиТаблицы(Таблица, ПутьКДанным)
 	ИмяКоманды = "_ОчиститьТаблицу_" + ПутьКДанным;
 	Если Команды.Найти(ИмяКоманды) <> Неопределено Тогда
 		Возврат;
@@ -1261,14 +1261,7 @@
 	НоваяКоманда.Действие = "Подключаемый_ОчиститьТаблицу";
 	НоваяКоманда.Заголовок = "Очистить таблицу";
 
-	ИмяГруппыКнопок = "ГруппаОчистка_" + ПутьКДанным;
-	ГруппаКнопок = Элементы.Найти(ИмяГруппыКнопок);
-	Если ГруппаКнопок = Неопределено Тогда
-		ГруппаКнопок = Элементы.Добавить(ИмяГруппыКнопок, Тип("ГруппаФормы"), Таблица.КонтекстноеМеню);
-		ГруппаКнопок.Вид = ВидГруппыФормы.ГруппаКнопок;
-	КонецЕсли;
-
-	Кнопка = Элементы.Добавить("ОчиститьТаблицу_" + ПутьКДанным, Тип("КнопкаФормы"), ГруппаКнопок);
+	Кнопка = Элементы.Добавить("ОчиститьТаблицу_" + ПутьКДанным, Тип("КнопкаФормы"), Таблица.КоманднаяПанель);
 	Кнопка.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
 	Кнопка.ИмяКоманды = ИмяКоманды;
 КонецПроцедуры
@@ -1277,11 +1270,11 @@
 Процедура Подключаемый_ОчиститьТаблицу(Команда)
 	Префикс = "_ОчиститьТаблицу_";
 	ПутьКДанным = Сред(Команда.Имя, СтрДлина(Префикс) + 1);
-	вОчиститьТаблицуНаСервере(ПутьКДанным);
+	ОчиститьТаблицуНаСервере(ПутьКДанным);
 КонецПроцедуры
 
 &НаСервере
-Процедура вОчиститьТаблицуНаСервере(ПутьКДанным)
+Процедура ОчиститьТаблицуНаСервере(ПутьКДанным)
 	ЭтаФорма[ПутьКДанным].Очистить();
 КонецПроцедуры
 
@@ -1624,7 +1617,7 @@
 				Кнопка.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
 				Кнопка.ИмяКоманды = "ОткрытьОбъект";
 
-				вДобавитьКомандуОчисткиТаблицы(НоваяТаблица, ИмяТаб);
+				ДобавитьКомандуОчисткиТаблицы(НоваяТаблица, ИмяТаб);
 			КонецЦикла;
 		КонецЕсли;
 	КонецЕсли;