|
УФ СКД в обычной обработке - как получить схему | ☑ | ||
---|---|---|---|---|
0
OnePrg
19.01.24
✎
16:47
|
&НаСервере
Процедура ИнициализироватьКомпоновщик(КомпоновщикНастроек, УникальныйИдентификатор, Знач НастройкиКомпоновщика = Неопределено) СхемаКомпоновкиДанных = Новый СхемаКомпоновкиДанных; ИсточникДанных = СхемаКомпоновкиДанных.ИсточникиДанных.Добавить(); ИсточникДанных.Имя = "ИсточникДанных1"; ИсточникДанных.ТипИсточникаДанных = "Local"; НаборДанных = СхемаКомпоновкиДанных.НаборыДанных.Добавить(Тип("НаборДанныхЗапросСхемыКомпоновкиДанных")); НаборДанных.Имя = "НаборДанных1"; НаборДанных.ИсточникДанных = ИсточникДанных.Имя; НаборДанных.АвтоЗаполнениеДоступныхПолей = Ложь; НаборДанных.Запрос = "ВЫБРАТЬ ....." URLСхемыКомпоновкиДанных = ПоместитьВоВременноеХранилище(СхемаКомпоновкиДанных, УникальныйИдентификатор); КомпоновщикНастроек.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(URLСхемыКомпоновкиДанных)); Если ЗначениеЗаполнено(НастройкиКомпоновщика) Тогда КомпоновщикНастроек.ЗагрузитьНастройки(НастройкиКомпоновщика); КомпоновщикНастроек.Восстановить(СпособВосстановленияНастроекКомпоновкиДанных.Полное); Иначе КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию); <----- вот тут как получить схему? КонецЕсли; КонецПроцедуры &НаСервере Процедура ЗаполнитьДебетНаСервере() ЭлементОтбора = КомпоновщикДт.Настройки.ПараметрыДанных.Элементы.Найти("НачалоПериода"); ЭлементОтбора.Значение = МесяцНачисления; ЭлементОтбора.Использование = Истина; ЭлементОтбора = КомпоновщикДт.Настройки.ПараметрыДанных.Элементы.Найти("КонецПериода"); ЭлементОтбора.Значение = КонецМесяца(МесяцНачисления); ЭлементОтбора.Использование = Истина; Настройки = КомпоновщикДт.ПолучитьНастройки(); КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема, Настройки, ДанныеРасшифровки); КонецПроцедуры |
|||
1
OnePrg
19.01.24
✎
16:49
|
Пардон втупил. Правильный вопрос:
&НаСервере Процедура ИнициализироватьКомпоновщик(КомпоновщикНастроек, УникальныйИдентификатор, Знач НастройкиКомпоновщика = Неопределено) СхемаКомпоновкиДанных = Новый СхемаКомпоновкиДанных; ИсточникДанных = СхемаКомпоновкиДанных.ИсточникиДанных.Добавить(); ИсточникДанных.Имя = "ИсточникДанных1"; ИсточникДанных.ТипИсточникаДанных = "Local"; НаборДанных = СхемаКомпоновкиДанных.НаборыДанных.Добавить(Тип("НаборДанныхЗапросСхемыКомпоновкиДанных")); НаборДанных.Имя = "НаборДанных1"; НаборДанных.ИсточникДанных = ИсточникДанных.Имя; НаборДанных.АвтоЗаполнениеДоступныхПолей = Ложь; НаборДанных.Запрос = "ВЫБРАТЬ ....." URLСхемыКомпоновкиДанных = ПоместитьВоВременноеХранилище(СхемаКомпоновкиДанных, УникальныйИдентификатор); КомпоновщикНастроек.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(URLСхемыКомпоновкиДанных)); Если ЗначениеЗаполнено(НастройкиКомпоновщика) Тогда КомпоновщикНастроек.ЗагрузитьНастройки(НастройкиКомпоновщика); КомпоновщикНастроек.Восстановить(СпособВосстановленияНастроекКомпоновкиДанных.Полное); Иначе КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию); КонецЕсли; КонецПроцедуры &НаСервере Процедура ЗаполнитьДебетНаСервере() ЭлементОтбора = КомпоновщикДт.Настройки.ПараметрыДанных.Элементы.Найти("НачалоПериода"); ЭлементОтбора.Значение = МесяцНачисления; ЭлементОтбора.Использование = Истина; ЭлементОтбора = КомпоновщикДт.Настройки.ПараметрыДанных.Элементы.Найти("КонецПериода"); ЭлементОтбора.Значение = КонецМесяца(МесяцНачисления); ЭлементОтбора.Использование = Истина; Настройки = КомпоновщикДт.ПолучитьНастройки(); КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема, Настройки, ДанныеРасшифровки); <----- вот тут как получить схему? КонецПроцедуры |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |