|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Процедура КнопкаВыполнитьНажатие(Кнопка) Для Каждого Рег Из РегистрыНакопления Цикл Если Рег.ПолучитьИспользованиеИтогов()=Ложь Тогда Рег.УстановитьИспользованиеИтогов(Истина); Состояние("Идет пересчет итогов регистра накопления " + Рег); Рег.ПересчитатьИтоги(); Сообщить("Для регистра накопления " + Рег + " включено использование итогов"); КонецЕсли; КонецЦикла; Для Каждого Рег Из РегистрыБухгалтерии Цикл Если Рег.ПолучитьИспользованиеИтогов()=Ложь Тогда Рег.УстановитьИспользованиеИтогов(Истина); Состояние("Идет пересчет итогов регистра бухгалтерии " + Рег); Рег.ПересчитатьИтоги(); Сообщить("Для регистра бухгалтерии " + Рег + " включено использование итогов"); КонецЕсли; КонецЦикла; КонецПроцедуры |
About the Author
