Различия

Показаны различия между двумя версиями страницы.

--- wiki:1c:ckd [2019/02/28 05:47]
anton создано
+++ wiki:1c:ckd [2020/08/24 04:47] (текущий)
anton
@@ Строка 1: / Строка 1: @@
 ==== СКД ====
+=== Описание названий группировок и методика применения макета в СКД ===
+Статья находится [[https://its.1c.ru/db/metod8dev/content/1811/hdoc|здесь.]]
 === Создание документа на основании отчета СКД. 1С 8.2 ===
 <code>
@@ Строка 33: / Строка 37: @@
 КонецПроцедуры
 </code>
+=== Как добавить варианты отчета СКД на обычную форму ===
+В модуль формы добавить код:
+<code>
+Процедура УстановитьВариантыНастроек()
+	КП = ЭлементыФормы.ДействияФормы;
+	НоваяКнопка = КП.Кнопки.Вставить(1,"_ВариантыОтчета", ТипКнопкиКоманднойПанели.Подменю, "Варианты отчетов", );
+	НовоеДействие = Новый Действие("_СменаВариантаНастройки");
+	ч = 1;
+	Для каждого Настройка Из СхемаКомпоновкиДанных.ВариантыНастроек Цикл
+		НоваяКнопка = КП.Кнопки._ВариантыОтчета.Кнопки.Добавить("Вариант"+Строка(ч), ТипКнопкиКоманднойПанели.Действие,
+		Настройка.Представление,
+		НовоеДействие);
+		ч = ч + 1;
+	КонецЦикла;
+КонецПроцедуры
+Процедура ПриОткрытии()
+	УстановитьВариантыНастроек();
+КонецПроцедуры
+Процедура _СменаВариантаНастройки (Элемент)
+	Для каждого Настройка Из СхемаКомпоновкиДанных.ВариантыНастроек Цикл
+		Если Элемент.Текст = Настройка.Представление Тогда
+			КомпоновщикНастроек.ЗагрузитьНастройки(Настройка.Настройки);
+			Прервать;
+		КонецЕсли;
+	КонецЦикла;
+КонецПроцедуры;
+</code>