1С 8.x : Как включить использование итогов регистров накопления и бухгалтерии?

 Процедура КнопкаВыполнитьНажатие(Кнопка)

	Для Каждого Рег Из РегистрыНакопления Цикл

		Если Рег.ПолучитьИспользованиеИтогов()=Ложь Тогда

			Рег.УстановитьИспользованиеИтогов(Истина);

			Состояние("Идет пересчет итогов регистра накопления " + Рег);

			Рег.ПересчитатьИтоги();

			Сообщить("Для регистра накопления " + Рег + " включено использование итогов");

		КонецЕсли;

	КонецЦикла;

	Для Каждого Рег Из РегистрыБухгалтерии Цикл

		Если Рег.ПолучитьИспользованиеИтогов()=Ложь Тогда

			Рег.УстановитьИспользованиеИтогов(Истина);

			Состояние("Идет пересчет итогов регистра бухгалтерии " + Рег);

			Рег.ПересчитатьИтоги();

			Сообщить("Для регистра бухгалтерии " + Рег + " включено использование итогов");

		КонецЕсли;

	КонецЦикла;

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