Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
12 дек 2024, 15:39

Некорректно работают расшифровки

Автор katyabelova, 22 авг 2019, 09:35

0 Пользователей и 1 гость просматривают эту тему.

katyabelova

Здравствуйте, уважаемые участники форума! Помогите пожалуйста с данной проблемой.

Создала отчёт с двумя страницами. Каждая страница работает на своём макете скд.
Всё компонуется и выводится нормально, однако некорректно работают расшифровки на второй странице, с первой всё в порядке. На второй все расшифровки как-будто перемешаны или вообще берутся с первой страницы.
Использую следующие процедуры:

Процедура ТабДок1()
ЭлементыФормы.ПолеТабличногоДокумента1.Очистить();
ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных;
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(ЭтотОбъект.ПолучитьМакет("ФизическиеЛица"), ЭтотОбъект.КомпоновщикНастроек.Настройки, ДанныеРасшифровки);
ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки, , ДанныеРасшифровки, Истина);
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ЭлементыФормы.ПолеТабличногоДокумента1);
ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных, Истина);

ЭлементыФормы.ПолеТабличногоДокумента1.ПоказатьУровеньГруппировокСтрок(1);

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

Процедура ТабДок2()
ЭлементыФормы.ПолеТабличногоДокумента2.Очистить();
ДанныеРасшифровки1 = Новый ДанныеРасшифровкиКомпоновкиДанных;
КомпоновщикМакета1 = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки1 = КомпоновщикМакета1.Выполнить(ЭтотОбъект.ПолучитьМакет("ЮридическиеЛица"), ЭтотОбъект.КомпоновщикНастроек.Настройки, ДанныеРасшифровки1);
ПроцессорКомпоновкиДанных1 = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновкиДанных1.Инициализировать(МакетКомпоновки1, , ДанныеРасшифровки1, Истина);
ПроцессорВывода1 = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ПроцессорВывода1.УстановитьДокумент(ЭлементыФормы.ПолеТабличногоДокумента2);
ПроцессорВывода1.Вывести(ПроцессорКомпоновкиДанных1, Истина);

ЭлементыФормы.ПолеТабличногоДокумента2.ПоказатьУровеньГруппировокСтрок(1);

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


И ещё эту
Процедура ТабДокОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)

СтандартнаяОбработка = Ложь;

Если ТипЗнч(Расшифровка) = Тип("ИдентификаторРасшифровкиКомпоновкиДанных") тогда
ЭлементРасшифровки = ДанныеРасшифровки.Элементы[Расшифровка];
Если ТипЗнч(ЭлементРасшифровки) = Тип("ЭлементРасшифровкиКомпоновкиДанныхПоля") Тогда
Для каждого Поле Из ЭлементРасшифровки.ПолучитьПоля() Цикл
ОткрытьЗначение(Поле.Значение);
КонецЦикла;
КонецЕсли;
КонецЕсли;

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


Помогите пожалуйста, я не знаю что делать.
P.S.  Устанавливала свойство "Только просмотр"

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск