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