Как программно поставить галочку «использовать всегда»? |
Я |
18.09.20 — 07:22
Конфигурация ЗУП 3.1 (3.1.14.55), хотя это не важно
Документ «Табель»
Основная форма документа
В процедуре «При создании на сервере» программно добавляю новый реквизит — колонку к табличной части. Мне реквизит нужен только на форме, а не в объекте.
ДобавляемыеРеквизиты = Новый Массив;
НовыйРеквизитВремяИтогСтарое = Новый РеквизитФормы(«ВремяИтогСтарое», Новый ОписаниеТипов(«Строка»), «Объект.ДанныеОВремени», «ВремяИтогСтарое»);
ДобавляемыеРеквизиты.Добавить(НовыйРеквизитВремяИтогСтарое);
ЭтаФорма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
Реквизит добавляется, видно даже по отладке
Затем добавляю его на форму в элементы
НовыйЭлементВремяИтогСтарое = Элементы.Добавить(«ВремяИтогСтарое», Тип(«ПолеФормы»), Элементы.ДанныеОВремени);
НовыйЭлементВремяИтогСтарое.Вид = ВидПоляФормы.ПолеВвода;
НовыйЭлементВремяИтогСтарое.ПутьКДанным = «Объект.ДанныеОВремени.ВремяИтогСтарое»;
НовыйЭлементВремяИтогСтарое.ТолькоПросмотр = Истина;
На этой строчке
НовыйЭлементВремяИтогСтарое.ПутьКДанным = «Объект.ДанныеОВремени.ВремяИтогСтарое»;
выходит ошибка:
«Ошибка при установке значения атрибута контекста (ПутьКДанным)» по причине: Недопустимое значение
Нашел в интеренте причину: напротив таблицы «ДанныеОВремени» снята галочка «Использовать всегда». Если галочку нажать, ошибки не будет. Предполагаю, что вновь программно созданный реквизит-колонка «ВремяИтогСтарое» при добавлении заимствует значение этого флажка у своего родителя, т.е. флажок сброшен. Без этой галочки к колонке обратиться нельзя, следовательно нельзя и добавить на форму.
Нужно программно установить эту галочку для этой колонки
Нашел в интернете метод УстановитьОбязательноеИспользование(<Поле>, <Использование>), но не понятно где и как его использовать.
Во всех примерах он используется для динамического списка, а у меня табличная часть.
Пробывал писать так:
Объект.ДанныеОВремени.УстановитьОбязательноеИспользование(…, …)
Элементы.ДанныеОВремени.УстановитьОбязательноеИспользование(…, …)
Везде пишет «Метод объекта не обнаружен»
Подскажите как программно поставить эту галочку для моей колонки.
1 — 18.09.20 — 07:29
Глянь свойства элемента формы.
PS: Какое небо голубое…
2 — 18.09.20 — 08:06
(0) ЭтаФорма[«ИмяТаблицы»].УстановитьОбязательноеИспользование(ИмяКолонки, Истина);
3 — 18.09.20 — 08:21
А оплату за консультацию пришлите мне.
4 — 30.09.20 — 06:29
(2) Нет, не работает.
ДанныеОВремени это табличная чать документа (Объект.ДанныеОВремени), которая также расположена на форме, а реквизит «СЗВ_ВремяИтогСтарое» я добавляю только на форму в эту табличную часть
Все перепробовал, везде вываливается в исключение, в комментарии ошибка, которая выходит
Попытка
Элементы.ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«2: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
Попытка
Объект.ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«3: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
Попытка
ЭтаФорма.ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«4: » + ОписаниеОшибки());//Поле объекта не обнаружено (ДанныеОВремени)
КонецПопытки;
Попытка
ЭтаФорма.Элементы.ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«5: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
Попытка
ЭтаФорма.Объект.ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«6: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
Попытка
ЭтаФорма[«ДанныеОВремени»].УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«7: » + ОписаниеОшибки());//Поле объекта не обнаружено (ДанныеОВремени)
КонецПопытки;
Попытка
ЭтаФорма[«Элементы.ДанныеОВремени»].УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«8: » + ОписаниеОшибки());//Поле объекта не обнаружено (Элементы.ДанныеОВремени)
КонецПопытки;
Попытка
ЭтаФорма[«Объект.ДанныеОВремени»].УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«9: » + ОписаниеОшибки());//Поле объекта не обнаружено (Объект.ДанныеОВремени)
КонецПопытки;
Попытка
ЭтаФорма[«Элементы»].ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«10: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
Попытка
ЭтаФорма[«Объект»].ДанныеОВремени.УстановитьОбязательноеИспользование(«СЗВ_ВремяИтогСтарое», Истина);
Исключение
Сообщить(«11: » + ОписаниеОшибки());//Метод объекта не обнаружен (УстановитьОбязательноеИспользование)
КонецПопытки;
5 — 30.09.20 — 07:29
(4) должен быть Динамический список. Надо ваи его создать.
6 — 30.09.20 — 11:17
(5) Документ типовой, там табличная чать
И к тому же, я же руками могу поставить эту галку, значит и программно должна ставиться
Когда я руками ставлю, все отрабатывает отлично
7 — 30.09.20 — 11:25
(6) Не все программно можно выполнить, например флажок «Автозаполнение» у командной панели не доступен программно.
Тут может быть аналогично.
Попробуйте перенести в расширение и там поставить флажок вручную.
8 — 30.09.20 — 11:33
(6) Вам же в (5) написали УстановитьОбязательноеИспользование — это метод динамического списка.
9 — 01.10.20 — 06:33
(8) Я тоже все примеры находил на динамический список. Значит нужен какой-то другой метод. Я не могу переделать табличную часть в динамический список, я работаю с данными в документе, мне их нужно изменять, это абсурд.
yesmax7
10 — 01.10.20 — 06:35
(7) Походу сделаю так
По хорошему мне надо галку ни табличной части ставить, а моему добавленному полю, а его тогда тоже в расширение руками добавлять, а не программно
(@sadovod)
Сообщения: 258
Prominent Member
При работе с управляемой формой есть возможность не передавать все данные с сервера на клиента.
При создании формы на сервере, платформа анализирует состав элементов и определяет, с какими данными они связаны. Соответственно, остальные данные можно не передавать на клиента. Но может возникнуть необходимость доступа к этим данным из модуля на клиенте. Для этого введено свойство Использовать всегда.
Если у реквизита данное свойство установлено, он будет передан на клиента независимо от того, связан ли с ним какой-либо элемент формы.
Размещено : 13/07/2021 9:49 дп
Содержание
- 1 Реквизиты формы
- 1.1 Типы данных, доступные в управляемой форме
- 1.2 Преобразование прикладных объектов в данные формы
- 1.3 Передача данных между клиентской и серверной частями управляемой формы
- 1.4 Методы для преобразования данных прикладных объектов в данные формы
- 2 Программный интерфейс
- 2.1 ДанныеФормыДерево (FormDataTree)
- 2.1.1 ПолучитьЭлементы (GetItems)
- 2.1.2 НайтиПоИдентификатору (FindById)
- 2.2 ДанныеФормыЭлементДерева (FormDataTreeItem)
- 2.3 ДанныеФормыКоллекцияЭлементовДерева (FormDataTreeItemCollection)
- 2.1 ДанныеФормыДерево (FormDataTree)
- 3 Особенности работы с деревом значений
- 3.1 Обновление дерева
Реквизиты формы
Набор реквизитов формы описывает состав данных, которые отображаются, редактируются или хранятся в форме. При этом реквизиты формы сами по себе не обеспечивают возможности отображения и редактирования данных. Для отображения и редактирования служат элементы формы (смотрите раздел «Элементы формы» данной главы), связанные с реквизитами формы. Совокупность всех реквизитов формы будем называть данными формы.
Важно! Необходимо помнить, что, в отличие от обычных форм, все данные управляемой формы должны быть описаны в виде реквизитов. Не допускается использование переменных модуля формы в качестве источников данных для элементов формы.
Имеется возможность назначить Основной реквизит формы, т. е. реквизит, который будет определять стандартную функциональность формы (расширение формы). Следует помнить, что основной реквизит у формы может быть только один.
Расширение формы – это дополнительные свойства, методы и параметры формы объекта УправляемаяФорма, характерные для объекта, являющегося основным элементом формы.
В процессе разработки формы можно явно задать возможность просмотра и редактирования конкретных реквизитов формы, в разрезе ролей, с помощью свойств Просмотр и Редактирование (подробнее смотрите раздел «Ролевая настройка формы» главы «Редакторы»). Кроме того, доступность того или иного реквизита в самой форме можно настраивать с помощью функциональных опций (подробнее о функциональных опциях можно посмотреть в главе «Управление интерфейсом конфигурации»).
Свойство реквизита формы Сохраняемые данные является признаком того, что интерактивное изменение реквизита будет приводить к попытке блокировки данных формы для редактирования, а также к автоматической установке признака модифицированности формы.
Типы данных, доступные в управляемой форме
Управляемая форма отличается от обычной формы также и типами данных, с которыми она работает. Если обычная форма работает с большинством типов, которые предоставляет 1С:Предприятие (в том числе и вида СправочникОбъект, ДокументОбъект и т. д.), то в управляемой форме можно выделить следующие категории типов:
- типы, которые непосредственно используются в форме – это те типы, которые существуют на стороне тонкого и Веб-клиента (например, Число, СправочникСсылка.Товары, ГрафическаяСхема, ТабличныйДокумент);
- типы, которые будут преобразованы в специальные типы данных – типы данных управляемой формы. Такие типы отображаются в списке реквизитов формы в круглых скобках, например (СправочникОбъект.Товары);
- динамический список (подробнее см. раздел «Динамический список» данной главы).
Преобразование прикладных объектов в данные формы
Некоторые прикладные типы (такие как СправочникОбъект и т. д.) не существуют на стороне тонкого и Веб-клиентов (подробнее см. главу «Концепция управляемого приложения»). Поэтому для представления в форме таких прикладных типов в платформе введены специальные типы данных, предназначенные для работы в управляемых формах. Эта особенность управляемого приложения обуславливает необходимость выполнять преобразование прикладных объектов в данные формы (и обратно).
Используются следующие типы данных:
- ДанныеФормыСтруктура – содержит набор свойств произвольного типа. Свойствами могут быть другие структуры, коллекции или структуры с коллекциями. Таким типом представляется, например, в форме СправочникОбъект.
- ДанныеФормыКоллекция – это список типизированных значений, похожий на массив. Доступ к элементу коллекции осуществляется по индексу или по идентификатору. Доступ по идентификатору может отсутствовать в некоторых случаях. Это обусловлено типом прикладного объекта, который представлен этой коллекцией. Идентификатором может быть любое целое число. Таким типом представляется, например, в форме табличная часть.
- ДанныеФормыСтруктураСКоллекцией – это объект, который представлен в виде структуры и коллекции одновременно. С ним можно обращаться как с любой из этих сущностей. Таким типом представляется, например, в форме набор записей.
- ДанныеФормыДерево – объект предназначен для хранения иерархических данных.
Прикладной объект представлен либо одним, либо несколькими элементами данных формы. В общем виде иерархия и состав данных формы зависят от сложности и взаимосвязи прикладных объектов управляемой формы.
Например, документ, содержащий табличную часть, будет представлен объектом типа ДанныеФормыСтруктура (собственно документ), которому подчинен объект типа ДанныеФормыКоллекция (табличная часть документа).
Важно! Во время разработки конфигурации важно помнить, что прикладные объекты доступны только на сервере, в то время как объектами данных форм можно пользоваться и на сервере, и на клиенте.
Передача данных между клиентской и серверной частями управляемой формы
Фактически можно сказать, что данные формы – это унифицированное представление данных различных прикладных объектов, с которыми форма работает единообразно и которые присутствуют и на сервере, и на клиенте. То есть форма содержит некоторую «проекцию» данных прикладных объектов в виде своих собственных типов данных и выполняет преобразование между ними при необходимости. Однако в случае если разработчик конфигурации реализует свой алгоритм обработки данных, то преобразование данных (из специализированных типов в прикладные и обратно) он должен выполнять самостоятельно.
При редактировании реквизитов формы в специализированном редакторе (подробнее см. раздел «Реквизиты формы» главы «Редакторы») имеется возможность влиять на передачу данных между клиентом и сервером во время работы формы. Для этого служит колонка редактора реквизитов Использовать всегда. Действие этого свойства различается для трех типов реквизитов:
- Для реквизита, подчиненного динамическому списку (колонке динамического списка):
- свойство включено – реквизит всегда считывается из базы данных и включается в данные формы;
- свойство выключено – реквизит считывается из базы данных и включается в данные формы только тогда, когда есть видимый в данный момент элемент формы, связанный с реквизитом или его подчиненным реквизитом.
- Для реквизита, подчиненного коллекции движений:
- свойство включено – движения документа считываются из базы данных и будут присутствовать в данных формы;
- свойство выключено – движения документа не будут считываться из базы данных и не попадут в данные формы (если нет элемента формы, ссылающегося на движения документа).
- Остальные реквизиты формы:
- свойство включено – реквизит будет присутствовать в данных формы вне зависимости от того, есть или нет хоть один элемент формы, который связан с реквизитом или его подчиненным реквизитом;
- свойство выключено – реквизит будет присутствовать в данных формы только в том случае, если есть элемент формы, связанный с реквизитом или его подчиненным реквизитом. В отличие от реквизитов динамического списка, здесь не играет роли видимость элемента, связанного с реквизитом.
Примечание. Следует помнить, что свойство, установленное у родительского реквизита, действует на все подчиненные реквизиты. Например, если свойство Использовать всегда снято у табличной части документа, то система считает, что это свойство снято и у всех подчиненных реквизитов (несмотря на фактическое состояние свойства).
Методы для преобразования данных прикладных объектов в данные формы
Для конвертирования прикладных объектов в данные формы и обратно существует набор глобальных методов:
- ЗначениеВДанныеФормы(),
- ДанныеФормыВЗначение(),
- КопироватьДанныеФормы().
Важно! Методы, работающие с прикладными объектами, доступны только в серверных процедурах. Метод для копирования значений между данными формы доступен на сервере и на клиенте, так как не требует прикладных объектов в качестве параметров.
Во время конвертирования данных формы в прикладной объект нужно учитывать их совместимость.
- ЗначениеВДанныеФормы() – преобразует объект прикладного типа в данные формы;
- ДанныеФормыВЗначение() – преобразует данные формы в объект прикладного типа;
- КопироватьДанныеФормы() – производит копирование данных формы, обладающих совместимой структурой. Возвращает значение Истина, если копирование произведено, или Ложь, если структура объектов несовместима.
Примечание. При выполнении стандартных действий (открытие формы, выполнение стандартной команды Записать и т. д.) формы с основным реквизитом, преобразование выполняется автоматически.
Приведем пример, как использовать преобразование данных в собственных алгоритмах.
&НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) ОбъектТовар = Справочники.Товары.НайтиПоНаименованию(«Кофейник»).ПолучитьОбъект(); ЗначениеВДанныеФормы(ОбъектТовар, Объект); КонецПроцедуры &НаКлиенте Процедура Записать() ЗаписатьНаСервере(); КонецПроцедуры &НаСервере Процедура ЗаписатьНаСервере() ОбъектТовар = ДанныеФормыВЗначение(Объект, Тип(«СправочникОбъект.Товары»)); ОбъектТовар.Записать(); КонецПроцедуры
Также у объекта УправляемаяФорма существуют методы, доступные на сервере:
- ЗначениеВРеквизитФормы() – выполняет преобразование объекта прикладного типа в заданный реквизит формы.
- РеквизитФормыВЗначение() – преобразует реквизит данных формы в объект прикладного типа.
Использование данных методов обычно удобнее, так как они, имеют, например, информацию о типе реквизита формы. Кроме того, метод РеквизитФормыВЗначение() выполняет установку соответствия данных формы и объекта, которая используется при формировании сообщений. Подробнее об этом можно прочитать в главе «Сервисные возможности навигации».
Приведем пример использования этих методов.
&НаСервере Процедура ПересчитатьНаСервере() // Преобразует реквизит Объект в прикладной объект. Документ = РеквизитФормыВЗначение(«Объект»); // Выполняет пересчет методом, определенным в модуле документа. Документ.Пересчитать(); // Преобразует прикладной объект обратно в реквизит. ЗначениеВРеквизитФормы(Документ, «Объект»); КонецПроцедуры
Программный интерфейс
ДанныеФормыДерево (FormDataTree)
Методы:
- НайтиПоИдентификатору (FindById)
- ПолучитьЭлементы (GetItems)
Описание:
Предназначен для моделирования дерева в данных управляемой формы.
Доступность: клиент, сервер, тонкий клиент, веб-клиент. Данный объект может быть сериализован в/из XDTO. Тип XDTO, соответствующий данному объекту определяется в пространстве имен . Имя типа XDTO:
ПолучитьЭлементы (GetItems)
Синтаксис:
ПолучитьЭлементы()
Возвращаемое значение:
Тип: ДанныеФормыКоллекцияЭлементовДерева.
Описание:
Получает коллекцию элементов дерева верхнего уровня.
Доступность: клиент, сервер, тонкий клиент, веб-клиент.
НайтиПоИдентификатору (FindById)
Синтаксис:
НайтиПоИдентификатору(<Идентификатор>)
Параметры:
<Идентификатор> (обязательный)
Тип: Число. Идентификатор элемента дерева.
Возвращаемое значение:
Тип: ДанныеФормыЭлементДерева.
Описание:
Получает элемент коллекции по идентификатору.
Доступность: клиент, сервер, тонкий клиент, веб-клиент.
ДанныеФормыЭлементДерева (FormDataTreeItem)
Свойства:
<Имя свойства> (<Имя свойства>)
Методы:
- ПолучитьИдентификатор (GetId)
- ПолучитьРодителя (GetParent)
- ПолучитьЭлементы (GetItems)
- Свойство (Property)
Описание:
Элемент дерева данных формы.
Доступность: клиент, сервер, тонкий клиент, веб-клиент. Данный объект может быть сериализован в/из XDTO. Тип XDTO, соответствующий данному объекту определяется в пространстве имен . Имя типа XDTO:
ДанныеФормыКоллекцияЭлементовДерева (FormDataTreeItemCollection)
Элементы коллекции:
ДанныеФормыЭлементДерева
Для объекта доступен обход коллекции посредством оператора Для каждого … Из … Цикл. При обходе выбираются элементы коллекции.
Возможно обращение к элементу коллекции посредством оператора […]. В качестве аргумента передается индекс элемента.
Методы:
- Вставить (Insert)
- Добавить (Add)
- Индекс (IndexOf)
- Количество (Count)
- Очистить (Clear)
- Получить (Get)
- Сдвинуть (Move)
- Удалить (Delete)
Описание:
Коллекция элементов дерева.
Доступность: клиент, сервер, тонкий клиент, веб-клиент.
См. также:
- ДанныеФормыЭлементДерева, метод ПолучитьЭлементы
- ДанныеФормыДерево, метод ПолучитьЭлементы
Особенности работы с деревом значений
Обновление дерева
Существует проблема падения платформы при обновлении дерева.
Если в дереве был развернут какой-либо узел и выбран подчиненный узел, то при обновлении дерева функцией ЗначениеВДанныеФормы
происходит падение платформы.
Решение: перед обновлением нужно очищать дерево.
Например:
&НаСервере Процедура ОчиститьДерево(элементы) Для каждого элемент из элементы Цикл ОчиститьДерево(элемент.ПолучитьЭлементы()); КонецЦикла; элементы.Очистить(); КонецПроцедуры &НаСервере Процедура ЗаполнитьДеревоПонятий() дзПонятия = срСвойства.ПостроитьДеревоПонятий(НаДату, Мета.ТекущаяИБ()); ОчиститьДерево(ДеревоПонятий.ПолучитьЭлементы()); ЗначениеВДанныеФормы(дзПонятия, ДеревоПонятий); КонецПроцедуры &НаКлиенте Процедура НаДатуПриИзменении(Элемент) ЗаполнитьДеревоПонятий(); КонецПроцедуры
В данной статье описаны примеры программного создания объектов управляемой формы 1С : элементов, команд, реквизитов, а также описание стандартных возможностей для работы с ними.
Contents
- 1 Введение в управляемая форма 1С реквизиты элементы команды
- 2 Программное переопределение обработчиков событий формы и элементов формы
- 3 Программное создание групп формы.
- 4 Программное добавление команды на форму.
- 5 Программное создание декораций форм.
- 6 Программное добавление реквизита на форму.
- 7 Вывод реквизитов на форму.
- 8 Вызов процедур при создании на сервере 1С
- 9 Некоторые советы при программном редактировании формы
- 10 Полезные ссылки
Рекомендуется модифицировать управляемые формы типового решения 1С программно для удобного будущего обновления и исключения конфликтов, а также для удобной работы с изменениями и надежности при использовании механизма расширений.
В некоторых типовых конфигурациях 1С (ЕРП 2, УТ 11) используется механизм упрощенного изменения конфигурации. Статьи о типовом механизме можно найти в разделе полезных ссылок. Данный механизм используется в БСП, и его необходимо знать при модификации типовых конфигураций.
При добавлении элементов на форму программно можно отредактировать практически любое свойство из панель свойств, которое можно установить вручную в конфигураторе.
Также все описанные в текущем разделе процедуры и функции находятся во внешней обработке УпрФормы.
Примеры работы с объектом «ДанныеФормыКоллекция» и созданием дин. списка и таблицы значений программно можно будет посмотреть в части 2.
Для запуска обработки в режиме предприятия необходимо наличие объектов «Справочники.Номенклатура», подчиненный ему «Справочники.ХарактеристикиНоменклатуры» и «РегистрыСведений.ЦеныНоменклатуры”.
Программное переопределение обработчиков событий формы и элементов формы
Переопределить обработчики событий формы можно в обработчике «ПриСозданииНаСервере» (кроме самого обрабочика «ПриСозданииНаСервере») или в теле модуля формы в контексте сервера (например, Переопределение событий ПриЧтениинаСервере и ПриСозданииНаСервере).
&НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) ЭтаФорма.УстановитьДействие(“ОбработкаВыбора”, “пр_ОбработкаВыбора”) КонецПроцедуры
В теле модуля формы:
#Если Сервер Тогда ЭтаФорма.УстановитьДействие("ПриСозданииНаСервере", "пр_ПриСозданииНаСервере"); #КонецЕсли
А в новой процедуре нужно добавить вызов основной, если такая процедура есть.
&НаСервере Процедура пр_ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) ПриСозданииНаСервере(Отказ, СтандартнаяОбработка); КонецПроцедуры
Аналогично можно поступить и с обработчиками элементов формы:
Элементы.Номенклатура.УстановитьДействие(“ПриИзменении”, “пр_НоменклатураПриИзменении”)
Программное создание групп формы.
&НаСервере Процедура пр_СоздатьГруппы() ГруппаСтраницы = Элементы.Добавить("пр_Страницы", Тип("ГруппаФормы"),ЭтаФорма); ГруппаСтраницы.Вид = ВидГруппыФормы.Страницы; НоваяСтраница = Элементы.Добавить("пр_Страница", Тип("ГруппаФормы"),ГруппаСтраницы); НоваяСтраница.Вид = ВидГруппыФормы.Страница; НоваяСтраница.Заголовок = "Страница 1"; НоваяГруппа = Элементы.Добавить("пр_Группа1", Тип("ГруппаФормы"),НоваяСтраница); НоваяГруппа.Вид = ВидГруппыФормы.ОбычнаяГруппа; НоваяГруппа.Группировка = ГруппировкаПодчиненныхЭлементовФормы.ГоризонтальнаяЕслиВозможно; НоваяГруппа.Заголовок = "Группа 1"; КонецПроцедуры
Доступные виды групп формы:
Программное добавление команды на форму.
Удалить команду можно при помощи метода коллекции формы команд: Команды.Удалить(<Команда>). Удалять можно только те команды, которые были созданы программно.
&НаСервере Процедура пр_СоздатьНовуюКоманду() //создать новую команду у формы НоваяКоманда = Команды.Добавить("пр_Команда1"); НоваяКоманда.Действие = "пр_Команда1"; НоваяКоманда.Картинка = БиблиотекаКартинок.Облако; НоваяКоманда.Отображение = ОтображениеКнопки.Картинка; //вывести команду в элементы ЭлементКоманда = Элементы.Добавить("пр_Команда1", Тип("КнопкаФормы"), Элементы.ФормаКоманднаяПанель); ЭлементКоманда.Заголовок = "Вывести сообщение"; ЭлементКоманда.ИмяКоманды = "пр_Команда1"; //удалить команду //Команды.Удалить(НоваяКоманда); КонецПроцедуры &НаКлиенте Процедура пр_Команда1(Команда) Сообщить("Команда выполнена."); КонецПроцедуры
Программное создание декораций форм.
&НаСервере Процедура пр_СоздатьДекорацию() //добавить надпись Элемент = Элементы.Добавить("Надпись1", Тип("ДекорацияФормы"), Элементы["пр_Группа1"]); Элемент.Вид = ВидДекорацииФормы.Надпись; Элемент.Заголовок = "Добавленная надпись"; //для того, чтобы добавить картинку, необходимо выбрать ВидДекорацииФормы.Картинка Элемент = Элементы.Добавить("Картинка1", Тип("ДекорацияФормы"), Элементы["пр_Группа1"]); Элемент.Вид = ВидДекорацииФормы.Картинка; Элемент.Картинка = БиблиотекаКартинок.Бесконечность; КонецПроцедуры
Программное добавление реквизита на форму.
Добавлять новые реквизиты в управляемую форму и удалять необходимо с помощью метода ИзменитьРеквизиты(), куда в параметры передается массив добавляемых реквизитов и массив удаляемых. Удалять при этом можно только те реквизиты, которые были созданы программно.
&НаСервере Процедура пр_СоздатьРеквизиты() // Массив для новых реквизитов ДобавляемыеРеквизиты = Новый Массив; // Опишем ревизиты формы Реквизит_Использование = Новый РеквизитФормы("пр_Использование", Новый ОписаниеТипов("Булево"), "", "Использование"); Реквизит_Номенклатура = Новый РеквизитФормы("пр_Номенклатура", Новый ОписаниеТипов("СправочникСсылка.Номенклатура"), "", "Номенклатура"); Реквизит_Характеристика = Новый РеквизитФормы("пр_Характеристика", Новый ОписаниеТипов("СправочникСсылка.ХарактеристикиНоменклатуры"), "", "Характеристика"); Реквизит_Количество = Новый РеквизитФормы("пр_Количество", Новый ОписаниеТипов("Число", , , Новый КвалификаторыЧисла(10, 3)), "", "Количество"); Реквизит_УдалитьКоличество = Новый РеквизитФормы("пр_УдалитьКоличество", Новый ОписаниеТипов("Число", , , Новый КвалификаторыЧисла(10, 3)), "", "Удалить_Количество"); //если используется БСП, то можно для определения описания типов использовать функцию //ОбщегоНазначения.ОписаниеТипаСтрока(ДлинаСтроки) //ОбщегоНазначения.ОписаниеТипаЧисло(Разрядность, РазрядностьДробнойЧасти = 0, ЗнакЧисла = Неопределено) //ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты) Реквизит_Информация = Новый РеквизитФормы("пр_Информация", ОбщегоНазначения.ОписаниеТипаСтрока(100), "", "Информация"); // Для наглядности заполним массив после описания реквизитов формы ДобавляемыеРеквизиты.Добавить(Реквизит_Использование); ДобавляемыеРеквизиты.Добавить(Реквизит_Номенклатура); ДобавляемыеРеквизиты.Добавить(Реквизит_Характеристика); ДобавляемыеРеквизиты.Добавить(Реквизит_Количество); ДобавляемыеРеквизиты.Добавить(Реквизит_УдалитьКоличество); ДобавляемыеРеквизиты.Добавить(Реквизит_Информация); // Добавим новые реквизиты в форму ИзменитьРеквизиты(ДобавляемыеРеквизиты); КонецПроцедуры &НаСервере Процедура пр_УдалитьРеквизиты() // Массив для удаляемых реквизитов УдаляемыеРеквизиты = Новый Массив; //указываем путь к удаляемому реквизиту УдаляемыеРеквизиты.Добавить("пр_УдалитьКоличество"); //К добавленным реквизитам нужно обращаться через переменную ЭтаФорма // Добавим новые реквизиты в форму ИзменитьРеквизиты(,УдаляемыеРеквизиты); КонецПроцедуры
Вывод реквизитов на форму.
&НаСервере Процедура пр_ВывестиРеквизитыНаФорму() НовыйЭлемент = Элементы.Добавить("пр_Использование", Тип("ПолеФормы"), Элементы.пр_Страница1); НовыйЭлемент.ПутьКДанным = "пр_Использование"; НовыйЭлемент.Вид = ВидПоляФормы.ПолеФлажка; НовыйЭлемент.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Право; //установим обработчик события элементы НовыйЭлемент.УстановитьДействие("ПриИзменении", "пр_ИспользованиеПриИзменении"); НовыйЭлемент = Элементы.Добавить("пр_Номенклатура", Тип("ПолеФормы"), Элементы.пр_Страница1); НовыйЭлемент.ПутьКДанным = "пр_Номенклатура"; НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода; //установить параметр выбора элемента НовыйМассив = Новый Массив(); НовыйПараметр = Новый ПараметрВыбора("Отбор.ПометкаУдаления", Ложь); НовыйМассив.Добавить(НовыйПараметр); НовыеПараметры = Новый ФиксированныйМассив(НовыйМассив); НовыйЭлемент.ПараметрыВыбора = НовыеПараметры; НовыйЭлемент.УстановитьДействие("ПриИзменении", "пр_НоменклатураПриИзменении"); НовыйЭлемент = Элементы.Добавить("пр_Характеристика", Тип("ПолеФормы"), Элементы.пр_Страница1); НовыйЭлемент.ПутьКДанным = "пр_Характеристика"; НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода; НовыйЭлемент.Заголовок = "Характеристика номенклатуры"; //добавить связь параметров выбора по реквизиту владелец в зависимости от выбранной номенклатуры НоваяСвязь = Новый СвязьПараметраВыбора("Отбор.Владелец", "пр_Номенклатура"); НовыйМассив = Новый Массив(); НовыйМассив.Добавить(НоваяСвязь); НовыйЭлемент.СвязиПараметровВыбора = Новый ФиксированныйМассив(НовыйМассив); НовыйЭлемент.УстановитьДействие("ПриИзменении", "пр_ХарактеристикаПриИзменении"); НовыйЭлемент = Элементы.Добавить("пр_Количество", Тип("ПолеФормы"), Элементы.пр_Страница1); НовыйЭлемент.ПутьКДанным = "пр_Количество"; НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода; //установить формат НовыйЭлемент.ФорматРедактирования = "ЧДЦ=0; ЧРГ=.; ЧН=Отсутствует"; НовыйЭлемент = Элементы.Добавить("пр_Информация", Тип("ПолеФормы"), Элементы.пр_Страница1); НовыйЭлемент.ПутьКДанным = "пр_Информация"; НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода; //установить список выбора НовыйЭлемент.РежимВыбораИзСписка = Истина; Массив = Новый Массив; Массив.Добавить("Необходимо дозаказать"); Массив.Добавить("Достаточно"); Массив.Добавить("Оформить полный заказ"); НовыйЭлемент.СписокВыбора.ЗагрузитьЗначения(Массив); КонецПроцедуры &НаКлиенте Процедура пр_ИспользованиеПриИзменении(Элемент) КонецПроцедуры
Вызов процедур при создании на сервере 1С
После описания всех процедур выводим их в процедуре ПриСозданииНаСервере. Также можно изменить программно некоторые свойства формы, например, заголовок. Чтобы был виден только наш заголовок, нужно отключить свойство Автозаголовок.
&НаСервере &НаСервере Процедура пр_ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) //установим заголовок формы ЭтаФорма.Заголовок = "Шаблон для программной работы с реквизитами, командами и элементами формы"; ЭтаФорма.АвтоЗаголовок = Ложь; пр_СоздатьГруппы(); пр_СоздатьНовуюКоманду(); пр_СоздатьДекорацию(); пр_СоздатьРеквизиты(); пр_УдалитьРеквизиты(); пр_ВывестиРеквизитыНаФорму(); КонецПроцедуры
Некоторые советы при программном редактировании формы
- Если вы не используете префиксы при создании новых команд и элементов рекомендуется проверять существование создаваемых объектов по имени с помощью метода Найти(), который вернет Неопределено, если объект в коллекции не найден:
- Элементы.Найти(«пр_Владелец»);
- Команды.Найти(«пр_НоваяКоманда»);
- Чтобы проверить уникальность реквизита на форме можно воспользоваться следующей функцией:
&НаКлиентеНаСервереБезКонтекста // Функция определяет существует ли реквизит у объекта. // Функция ЕстьРеквизитОбъекта(мОбъект, ИмяРеквизита) КлючУникальности = Новый УникальныйИдентификатор; СтруктураРеквизита = Новый Структура(ИмяРеквизита, КлючУникальности); ЗаполнитьЗначенияСвойств(СтруктураРеквизита, мОбъект); Возврат СтруктураРеквизита[ИмяРеквизита] <> КлючУникальности; КонецФункции // ЕстьРеквизитОбъекта()
- Свойства, методы и коллекции управляемой формы описаны в синтакс-помощнике в разделе «Интерфейс (управляемый)»;
- Изучите БСП, если она имеется в вашей конфигурации. Например в общем модуле «ОбщегоНазначения» уже описаны функции для создания объекта ОписаниеТипов, необходимого при создании новых реквизитов на форме:
- ОбщегоНазначения.ОписаниеТипаСтрока(ДлинаСтроки) — Создает объект ОписаниеТипов, содержащий тип Строка;
- ОбщегоНазначения.ОписаниеТипаЧисло(Разрядность, РазрядностьДробнойЧасти = 0, ЗнакЧисла = Неопределено) — Создает объект ОписаниеТипов, содержащий тип Число;
- ОбщегоНазначения.ОписаниеТипаДата(ЧастиДаты) — Создает объект ОписаниеТипов, содержащий тип Дата;
- ОбщегоНазначенияВызовСервера.ЦветСтиля(ИмяЦветаСтиля) — Функция получает цвет стиля по имени элемента стиля;
- ОбщегоНазначенияВызовСервера.ШрифтСтиля(ИмяШрифтаСтиля) — Функция получает шрифт стиля по имени элемента стиля.
Итак, взглянем на получившийся результат. Все элементы на форме созданы программно:
Полезные ссылки
1. Типовой механизм упрощенного изменения конфигурации в ERP 2.0 и УТ 11
2. Типовой функционал модификации конфигурации линейки ERP-решений (УТ 11, КА 2 и ERP 2)
3. 1С Управляемые Формы. Программное создание таблицы значений и динамического списка (Часть 2)