Обход группировок СКД

//Вместо: ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);<br />
ПроцессорВывода.НачатьВывод();<br />
Пока Истина Цикл<br />
ЭлементРезультатаКомпоновкиДанных = ПроцессорКомпоновкиДанных.Следующий();</p>
<p>Если ЭлементРезультатаКомпоновкиДанных = Неопределено Тогда<br />
Прервать;<br />
КонецЕсли;</p>
<p>ПроцессорВывода.ВывестиЭлемент(ЭлементРезультатаКомпоновкиДанных);<br />
Если ЭлементРезультатаКомпоновкиДанных.ЗначенияПараметров.Количество() > 0 Тогда<br />
Если ТипЗнч(ЭлементРезультатаКомпоновкиДанных.ЗначенияПараметров.П1.Значение) = Тип(«СправочникСсылка.НоменклатурныеГруппы») Тогда<br />
// группировка по номенклатурным группам<br />
ИначеЕсли ТипЗнч(ЭлементРезультатаКомпоновкиДанных.ЗначенияПараметров.П1.Значение) = Тип(«СправочникСсылка.ФизическиеЛица») Тогда<br />
// группировка по физическим лицам<br />
КонецЕсли;<br />
КонецЕсли;<br />
КонецЦикла;<br />
ПроцессорВывода.ЗакончитьВывод();

Смотрим классический код запуска СКД

//Получаем схему из макета<br />
СхемаКомпоновкиДанных = ПолучитьМакет(«ОтчетКомпановка»);</p>
<p>//Из схемы возьмем настройки по умолчанию<br />
Настройки = СхемаКомпоновкиДанных.НастройкиПоУмолчанию;</p>
<p>//Помещаем в переменную данные о расшифровке данных<br />
ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных;</p>
<p>//Формируем макет, с помощью компоновщика макета<br />
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;</p>
<p>//Передаем в макет компоновки схему, настройки и данные расшифровки<br />
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки, ДанныеРасшифровки);</p>
<p>//Выполним компоновку с помощью процессора компоновки<br />
ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;<br />
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки, ВнешниеНаборыДанных, ДанныеРасшифровки);</p>
<p>//Очищаем поле табличного документа<br />
Результат = ЭлементыФормы.ТабОтчет;<br />
Результат.Очистить();</p>
<p>//Выводим результат в табличный документ<br />
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;<br />
ПроцессорВывода.УстановитьДокумент(Результат);</p>
<p>ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);

Сохранить картинку в другом формате

//Получим и сохраним Общую картинку из библиотеку картинок конфигурации<br />
ИмяКартинки = Метаданные.ОбщиеКартинки.OutlookExpress;<br />
ВыбраннаяКартинка = БиблиотекаКартинок[ИмяКартинки.Имя];<br />
// Сохраним полученную картинку в c:temp<br />
ВыбраннаяКартинка.Записать(«c:\\temp»+ИмяКартинки.Имя+».»+Строка(ВыбраннаяКартинка.Формат()));<br />
//А теперь сохраним картинку в другом формате PNG<br />
КартинкаPNG = ВыбраннаяКартинка.Преобразовать(ФорматКартинки.PNG);<br />
КартинкаPNG.Записать(«c:\\temp»+ИмяКартинки.Имя+».»+Строка(КартинкаPNG.Формат()));

Запись структуры в JSON

Структура = Новый Структура;<br />
Структура.Вставить(«Фамилия», «Иванов»);<br />
Массив = Новый Массив;<br />
Массив.Добавить(Дата(2015,1,30));<br />
Массив.Добавить(123.45);<br />
Структура.Вставить(«Данные», Массив);</p>
<p>ЗаписьJSON = Новый ЗаписьJSON;<br />
ЗаписьJSON.УстановитьСтроку();<br />
ЗаписатьJSON(ЗаписьJSON, Структура);<br />
СтрокаJSON = ЗаписьJSON.Закрыть();

Прочитать JSON в структуру 1С

ЧтениеJSON = Новый ЧтениеJSON();<br />
ЧтениеJSON.УстановитьСтроку(СтрокаJSON);<br />
ОтветВСтруктуре1С = ПрочитатьJSON(ЧтениеJSON);<br />
ЧтениеJSON.Закрыть();

Отбор по регистратору

Набор = РегистрыНакопления.ТвойРегистр.СоздатьНаборЗаписей();<br />
Набор.Отбор.Регистратор.Установить(ТвойРегистратор);<br />
Набор.Прочитать();

Отбор по реквизиту и периоду

КурсыВалют = РегистрыСведений.КурсыВалют;<br />
НаборКурсов = КурсыВалют.СоздатьНаборЗаписей();<br />
Доллар = Справочники.Валюты.НайтиПоНаименованию(«USD»);<br />
НаборКурсов.Отбор.Валюта.Установить(Доллар);<br />
НаборКурсов.Отбор.Период.Установить(НачалоДня(ТекущаяДата()));<br />
НаборКурсов.Прочитать();<br />
Если НаборКурсов.Количество() = 0 Тогда<br />
НовыйКурс = НаборКурсов.Добавить();<br />
НовыйКурс.Валюта = Доллар;<br />
НовыйКурс.Период = ТекущаяДата();<br />
ИначеЕсли НаборКурсов.Количество() = 1 Тогда<br />
НовыйКурс = НаборКурсов[0];<br />
Иначе<br />
Предупреждение(НСтр(«ru = ‘Курс валюты задается один раз в день.’;»<br />
+ » en = ‘Rate is set once a day.'»), 60);<br />
Возврат;<br />
КонецЕсли;