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

Расшифровка в отчете

Автор 1cka, 15 дек 2014, 10:38

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

1cka

8.2, не СКД
Как в Процедуре "ОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)" написать условие для двух вариантов расшифровки, т.е. если по одной ячейки1 (ПараметрРасшифровки - расшифровкаПриход) клацнуть выведется одно, а по другой ячейке2 (ПараметрРасшифровки - РасшифровкаРасход) - другое?

Сейчас пишу так:

//Если Тогда
ТабДокумент = Новый ТабличныйДокумент;
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_Список";

Макет = ПолучитьМакет("Список");

Область = Макет.ПолучитьОбласть("Шапка");
Область.Параметры.ВыбНоменклатура = СокрЛП(Расшифровка.Номенклатура);
ТабДокумент.Вывести(Область);

Для Каждого СтрокаТаблицы Из ТаблицаДокументовПоступило Цикл
    Если СтрокаТаблицы.Номенклатура = Расшифровка.Номенклатура Тогда
Область = Макет.ПолучитьОбласть("Строка");
////
ТабДокумент.Вывести(Область);
    КонецЕсли;
КонецЦикла;
//ИначеЕсли
//
//КонецЕсли;


KrivosheevEV

Прежде, обратите внимание на свойство ячеи в макете: "ПараметрРасшифровки".

1cka

Цитата: KrivosheevEV от 16 дек 2014, 09:18
Прежде, обратите внимание на свойство ячеи в макете: "ПараметрРасшифровки".
Параметру Приход прописала- ПараметрРасшифровки - РасшифровкаПриход
и
Параметру Расход - ПараметрРасшифровки - РасшифровкаРасход
Добавлено: 18 дек 2014, 08:47


Если Расшифровка = "РасшифровкаПриход" Тогда//!!!!! так пишу, ни ошибки , ни результата(((

ТабДокумент = Новый ТабличныйДокумент;
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_Список";

Макет = ПолучитьМакет("Список");

Область = Макет.ПолучитьОбласть("Шапка");
Область.Параметры.ВыбНоменклатура = СокрЛП(Расшифровка.Номенклатура);
ТабДокумент.Вывести(Область);

Для Каждого СтрокаТаблицы Из ТаблицаДокументовПоступило Цикл
    Если СтрокаТаблицы.Номенклатура = Расшифровка.Номенклатура Тогда
Область = Макет.ПолучитьОбласть("Строка");
////
ТабДокумент.Вывести(Область);
    КонецЕсли;
КонецЦикла;
ИначеЕсли Расшифровка = "РасшифровкаРасход" Тогда//!!!!! ((((
///
КонецЕсли;


Теги:

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

Рейтинг@Mail.ru

Поиск