0
art93
12.08.15
✎
12:10
|
УТ11+CRM
Делаю выборку из регистра сведений, нахожу нужные имена макетов печатных форм.
Нужно добавить в ПодменюПечать программно все команды из выборки.
Подскажите пожалуйста как это реализовать
Вот что то начал делать, может чушь конечно
Процедура ДобавлениеПриИзменении()
Выборка = ВыборкаМакетов();
ПроверкаСоответствияДоговора();
Пока Выборка.Следующий() Цикл
ИмяКоманды = Выборка.Получить(0);
Элемент = ЭтаФорма.Элементы.ПодменюПечать.ПодчиненныеЭлементы..Добавить("Печать_"+ИмяКоманды,Тип("КомандаФормы"),ЭтаФорма.Элементы.ПодменюПечать);
Элемент.Заголовок =СокрЛП(ИмяКоманды);
Элемент.Действие = "Подключаемый_ПечатьВнешнегоМакета";
Элемент.ИзменяетСохраняемыеДанные = Ложь;
Элемент.Отображение = ОтображениеКнопки.КартинкаИТекст;
КонецЦикла;
КонецПроцедуры
|
|