() hristoff, Добавил в отчет автоматическую подстановку ответственного лица (Бухгалтер) при желании можно поменять на то, что вам нужно, например Руководитель. Для этого в процедуре "ОбновитьОтчет", модуля формы, поправить строку 65:
Пока НЕ ВыборкаДетальныеЗаписи.ОтветственноеЛицо = Перечисления.ОтветственныеЛицаОрганизаций.ГлавныйБухгалтер Цикл
На
Пока НЕ ВыборкаДетальныеЗаписи.ОтветственноеЛицо = Перечисления.ОтветственныеЛицаОрганизаций.Руководитель Цикл
Чтобы не качать целиком обработку можете поменять код всей процедуры ОбновитьОтчет:
Процедура ОбновитьОтчет() Экспорт
//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ОтветственныеЛицаОрганизацийСрезПоследних.ФизическоеЛицо КАК Физлицо,
| ОтветственныеЛицаОрганизацийСрезПоследних.Должность,
| ОтветственныеЛицаОрганизацийСрезПоследних.ОтветственноеЛицо КАК ОтветственноеЛицо
|ИЗ
| РегистрСведений.ОтветственныеЛицаОрганизаций.СрезПоследних(&ДатаСреза, ) КАК ОтветственныеЛицаОрганизацийСрезПоследних";
Запрос.УстановитьПараметр("ДатаСреза", ТекущаяДата());
Результат = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = Результат.Выбрать();
Пока НЕ ВыборкаДетальныеЗаписи.ОтветственноеЛицо = Перечисления.ОтветственныеЛицаОрганизаций.ГлавныйБухгалтер Цикл
// Вставить обработку выборки ВыборкаДетальныеЗаписи
//Руководители = РегламентированнаяОтчетность.ОтветственныеЛицаОрганизаций(ОтвЛица.ГлавныйБухгалтер, ТекущаяДата(),);
ВыборкаДетальныеЗаписи.Следующий();
КонецЦикла;
//}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
Бухгалтер = ВыборкаДетальныеЗаписи.Физлицо.Наименование;
СостояниеМодифицированности = Модифицированность;
Если ПанельНастроекНарисована <> Истина Тогда
ОбновлениеОтображения();
КонецЕсли;
ТиповыеОтчеты.ЗагрузитьВРеквизитЗначенияНастроекПанелиПользователя(ЭтотОбъект, ЭтаФорма);
ПараметрыПанели = ТиповыеОтчеты.ПолучитьПараметрыПанелиПользователяОбъекта(ОтчетОбъект);
ЗначенияНастроек = ТиповыеОтчеты.ПолучитьЗначенияНастроекПанелиПользователяОбъекта(ОтчетОбъект);
Отказ = ложь;
ТиповыеОтчеты.ПроверитьЗначенияПараметров(ЗначенияНастроек, ПараметрыПанели, Отказ);
Если Отказ тогда
Возврат;
КонецЕсли;
СформироватьОтчет(ЭлементыФормы.Результат, ДанныеРасшифровки);
// Вывод ФИО руководителя
Макет = ПолучитьМакет("МакетПодписи");
ОбластьВывести = Макет.ПолучитьОбласть("Подпись");
ОбластьВывести.Параметры.ФИОГлБух = Бухгалтер;
ЭлементыФормы.Результат.Вывести(ОбластьВывести);
// Конец вывод Руководителя
УправлениеОтчетами.УстановитьКолонтитулыПоУмолчанию(ЭлементыФормы.Результат, Заголовок, Строка(ПараметрыСеанса.ТекущийПользователь));
Модифицированность = СостояниеМодифицированности;
КонецПроцедуры
Показать
