Имя: Пароль:
1C
1С v8
УФ. Как добавить группу программно?
0 Анютик
 
23.04.13
15:54
Возникла необходимость в БСП в Форме Присоединенные файлы использовать иерархию. Добавила команду для создания новой группы. При создании почему-то создается элемент ЭтоГруппа=Ложь. Как правильно создать в УФ именно ГРУППУ? мне критично, так как разные подписки на события отрабатывать должны. По форуму и в гугле ничего не нашла:(
1 MSII
 
23.04.13
15:57
(0) А код какой в обработчике команды? Справочники.ПрисоединенныеФайлы.СоздатьГруппу?
2 olegves
 
23.04.13
15:58
(0) д.б. команда создать группу
3 Анютик
 
23.04.13
16:00
не, не справочник Присоединенные файлы, общая форма. Справочник к каждому объекту метаданных свой. Я же не случайно написала, что БСП.
К тому же в УФ я создаю данные заполнения и передаю в форму группы, которую открываю пользователю
В данных заполнения - ЭтоГруппа = Истина. Но при передаче в форму этот параметр теряется. Форма - назначена формой группы
4 Анютик
 
23.04.13
16:00
как таковой команды СоздатьЭлемент или СоздатьГруппу вообще нет
5 Анютик
 
23.04.13
16:00
&НаСервере
Функция СоздатьГруппуНаСервере()
   
   ЗаголовокОшибки = НСтр("ru = 'Ошибка при настройке динамического списка присоединенных файлов.'");
   ОкончаниеОшибки = НСтр("ru = 'В этом случае настройка динамического списка невозможна.'");
   
   ИмяСправочникаХранилищаФайлов = ПрисоединенныеФайлыСлужебный.ИмяСправочникаХраненияФайлов(
       Параметры.ВладелецФайла, "", ЗаголовокОшибки, Неопределено, ОкончаниеОшибки);
   
   ПолноеИмяСправочника = "Справочник." + ИмяСправочникаХранилищаФайлов;
   
   ДанныеЗаполнения = Новый Структура;
   ДанныеЗаполнения.Вставить("Автор", ПараметрыСеанса.ТекущийПользователь);
   ДанныеЗаполнения.Вставить("ДатаСоздания", ТекущаяДата());
   ДанныеЗаполнения.Вставить("ЭтоГруппа", Истина);
   ДанныеЗаполнения.Вставить("ИмяФормы", ПолноеИмяСправочника+".ФормаГруппы");
   
   Возврат ДанныеЗаполнения;
   
   
КонецФункции

&НаКлиенте
Процедура СоздатьГруппу(Команда)
   
       
   ДанныеЗаполнения = СоздатьГруппуНаСервере();
   
   Если ДанныеЗаполнения<>Неопределено Тогда
       
               
       Форма = ПолучитьФорму(ДанныеЗаполнения.ИмяФормы);
       ЗаполнитьЗначенияСвойств(Форма.Объект,ДанныеЗаполнения);
//        Форма.Объект.ЭтоГруппа = Истина;
       Форма.ВладелецФормы = ЭтаФорма;
       Форма.Открыть();        
       
       
   КонецЕсли;

   
       
КонецПроцедуры
6 olegves
 
23.04.13
16:05
(5) ПолучитьФорму(ДанныеЗаполнения.ИмяФормы, << Параметры >>)
7 Анютик
 
23.04.13
16:43
(6) и что передать в параметрах?
8 Анютик
 
23.04.13
17:14
ап
9 skyadmin
 
24.04.13
00:43
&НаКлиенте нету или &НаСервере?
10 Анютик
 
24.04.13
12:58
не поняла вопроса
11 olegves
 
24.04.13
14:22
(7) значения заполнения в виде структуры, а для заполняемых реквизитов не забыть установить флаг Заполнять из данных заполнения
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший