Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
06 фев 2026, 06:05

Изменение настроеек компоновки данных

Автор sali, 27 янв 2026, 12:23

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

sali

есть форма где расположен отбор скд, как поменять отбор скид одной схемы на другую?
когда нажимаем на "Выгружать маршруты" то скд отбор должен поменяться на схему для маршрутов. стоит ли перезаписывать адрес настройки отбора или новый создать?
Если ЭтоАдресВременногоХранилища(Параметры.АдресНастроекРегламента) Тогда

АдресНастроекРегламента = Параметры.АдресНастроекРегламента;
НастройкиРегламента = ПолучитьИзВременногоХранилища(АдресНастроекРегламента);

НастройкиКомпоновкиДанныхКонтрагентов = РегистрыСведений.ЭДОН_ПараметрыРегламентныхЗаданий.ПолучитьЗначениеКлючаСтруктурыНастроек(НастройкиРегламента.Контрагенты, "НастройкиКомпоновкиДанныхКонтрагентов");


ВыгружатьКонтрагентов       = РегистрыСведений.ЭДОН_ПараметрыРегламентныхЗаданий.ПолучитьЗначениеКлючаСтруктурыНастроек(НастройкиРегламента.Контрагенты, "ВыгружатьКонтрагентов");     

СтруктураССхемамиК = ЭДОН_РегламентныеЗадания.ПолучитьСтруктуруСхемКомпоновки();

АдресСхемы = ПоместитьВоВременноеХранилище(СтруктураССхемамиК.Контрагенты, УникальныйИдентификатор);
КомпоновщикНастроекКомпоновкиДанныхКонтрагентов.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(АдресСхемы));
КомпоновщикНастроекКомпоновкиДанныхКонтрагентов.ЗагрузитьНастройки(НастройкиКомпоновкиДанныхКонтрагентов);
КомпоновщикНастроекКомпоновкиДанныхКонтрагентов.Восстановить(СпособВосстановленияНастроекКомпоновкиДанных.ПроверятьДоступность);

Иначе

Сообщить("Некорректные настройки. Продолжить невозможно.");
Отказ = Истина;

КонецЕсли;

&НаКлиенте
Процедура Применить(Команда)

Закрыть(ПрименитьНаСервере());

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

&НаСервере
Функция ПрименитьНаСервере()

Настройки = ПолучитьИзВременногоХранилища(АдресНастроекРегламента);

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

лАдресНастроекРегламента = ПоместитьВоВременноеХранилище(Настройки, УникальныйИдентификатор);

ПараметрыФормы = Новый Структура;
ПараметрыФормы.Вставить("АдресНастроекРегламента", лАдресНастроекРегламента);

Возврат ПараметрыФормы;

КонецФункции


Теги:

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

Рейтинг@Mail.ru

Поиск