Здравствуйте, подскажите пожалуйста как заполнить параметр программно в скд?

Такое условие в запросе

```1c
    ВЫБОР
    КОГДА СКАНИЯ_СогласованиеДоговоровССамозанятымСотрудником.ТипСамозанятости = ЗНАЧЕНИЕ(Перечисление.СКАНИЯ_ТипыСамозанятости.СтороннийСамозанятый)
    ТОГДА СКАНИЯ_СогласованиеДоговоровССамозанятымСотрудником.Руководитель
    ИНАЧЕ &Руководитель
    КОНЕЦ КАК Руководитель
```

Пытаюсь добавить в параметр одного пользователя, никогда раньше такого не делал(

Написал:

```1c
    СтандартнаяОбработка = Ложь;
    Параметры = КомпоновщикНастроек.Настройки.ПараметрыДанных;
```
---
```1c
    Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)

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

    ВывестиСКДВТабличныйДокумент(СхемаКомпоновкиДанных, ДокументРезультат, КомпоновщикНастроек);

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

    Процедура ВывестиСКДВТабличныйДокумент(МакетСКД, ТабличныйДокумент, КомпоновщикНастроек = Неопределено)

    Если КомпоновщикНастроек = Неопределено Тогда
    КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
    КомпоновщикНастроек.ЗагрузитьНастройки(МакетСКД.НастройкиПоУмолчанию);
    КонецЕсли;

    ИДОбъекта = КомпоновщикНастроек.Настройки.Структура[1].ИдентификаторОбъекта;

    ВложеннаяСКД = СхемаКомпоновкиДанных.ВложенныеСхемыКомпоновкиДанных.Найти(ИДОбъекта);

    Если ВложеннаяСКД = Неопределено Тогда
    ВызватьИсключение НСтр("ru="Не удалось получить вложенную схему компоновки данных."");
    Возврат;
    КонецЕсли;

    НастройкиВлОбъектаКД = КомпоновщикНастроек.Настройки.Структура[1];

    ПараметрДанных = НастройкиВлОбъектаКД.Настройки.ПараметрыДанных.Элементы.Найти("Косвенные");
    ПараметрДанных.Значение = Справочники.ГруппыЗатрат.НайтиПоКоду("000000002");
    ПараметрДанных.Использование = Истина;

    ПараметрДанных = НастройкиВлОбъектаКД.Настройки.ПараметрыДанных.Элементы.Найти("Специалисты");
    ПараметрДанных.Значение = Справочники.Категории.НайтиПоКоду("000000002");
    ПараметрДанных.Использование = Истина;

    Настройки = КомпоновщикНастроек.ПолучитьНастройки();

    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;

    МакетКомпоновки = КомпоновщикМакета.Выполнить(МакетСКД, Настройки);

    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);

    ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
    ПроцессорВывода.УстановитьДокумент(ТабличныйДокумент);

    ПроцессорВывода.Вывести(ПроцессорКомпоновки);

    КонецПроцедуры
```
---
```1c
    Настройка = КомпоновщикНастроек.ПолучитьНастройки();
```

А потом можно добавить.
---
Хорошо, а далее как это выводить?
---
```1c
    Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)

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

    ВывестиСКДВТабличныйДокумент(СхемаКомпоновкиДанных, ДокументРезультат, КомпоновщикНастроек);

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

    Процедура ВывестиСКДВТабличныйДокумент(МакетСКД, ТабличныйДокумент, КомпоновщикНастроек = Неопределено)

    Если КомпоновщикНастроек = Неопределено Тогда
    КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
    КомпоновщикНастроек.ЗагрузитьНастройки(МакетСКД.НастройкиПоУмолчанию);
    КонецЕсли;

    ИДОбъекта = КомпоновщикНастроек.Настройки.Структура[1].ИдентификаторОбъекта;

    ВложеннаяСКД = СхемаКомпоновкиДанных.ВложенныеСхемыКомпоновкиДанных.Найти(ИДОбъекта);

    Если ВложеннаяСКД = Неопределено Тогда
    ВызватьИсключение НСтр("ru="Не удалось получить вложенную схему компоновки данных."");
    Возврат;
    КонецЕсли;

    НастройкиВлОбъектаКД = КомпоновщикНастроек.Настройки.Структура[1];

    ПараметрДанных = НастройкиВлОбъектаКД.Настройки.ПараметрыДанных.Элементы.Найти("Косвенные");
    ПараметрДанных.Значение = Справочники.ГруппыЗатрат.НайтиПоКоду("000000002");
    ПараметрДанных.Использование = Истина;

    ПараметрДанных = НастройкиВлОбъектаКД.Настройки.ПараметрыДанных.Элементы.Найти("Специалисты");
    ПараметрДанных.Значение = Справочники.Категории.НайтиПоКоду("000000002");
    ПараметрДанных.Использование = Истина;

    Настройки = КомпоновщикНастроек.ПолучитьНастройки();

    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;

    МакетКомпоновки = КомпоновщикМакета.Выполнить(МакетСКД, Настройки);

    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);

    ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
    ПроцессорВывода.УстановитьДокумент(ТабличныйДокумент);

    ПроцессорВывода.Вывести(ПроцессорКомпоновки);

    КонецПроцедуры
```
---
Получилось, спасибо