Не уникальное имя реквизита
Автор SkyNetYar, 06 июл 2015, 11:37
0 Пользователей и 1 гость просматривают эту тему.
Добрый день!
Делаю обработку,корректировка номенклатуры ,вылетает ошибка
{Форма.Форма.Форма(597)}: Ошибка при вызове метода контекста (ИзменитьРеквизиты)
ИзменитьРеквизиты(МассивРеквизитов, ДобавленныеРеквизиты.ВыгрузитьЗначения());
по причине:
Неуникальное имя реквизита. Имя: "ДрагоценныеМатериалы"
Вот кусок обработки:
//Доп реквизиты
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ДополнительныеРеквизитыИСведения.Наименование КАК Наименование,
| ДополнительныеРеквизитыИСведения.Ссылка,
| ДополнительныеРеквизитыИСведения.ТипЗначения
|ИЗ
| ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения КАК ДополнительныеРеквизитыИСведения
|ГДЕ
| ДополнительныеРеквизитыИСведения.НаборСвойств = &НаборСвойств";
Запрос.УстановитьПараметр("НаборСвойств",Справочники.НаборыДополнительныхРеквизитовИСведений.Справочник_Номенклатура_Общие);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
пИмяКолонки = ЗаменитьНедопустимыеСимволыВИмениФайла(ВыборкаДетальныеЗаписи.Наименование,"");
//пИмяКолонки = СтрЗаменить(ВыборкаДетальныеЗаписи.Наименование, " ", "");
РеквизитФормы = Новый РеквизитФормы(пИмяКолонки,ВыборкаДетальныеЗаписи.ТипЗначения, ТаблицаЭлемент.Имя, ВыборкаДетальныеЗаписи.Наименование);
Если МассивИменРеквизитов.Найти(пИмяКолонки) = Неопределено Тогда
МассивРеквизитов.Добавить(РеквизитФормы);
МассивИменРеквизитов.Добавить(Колонка.Имя);
КонецЕсли;
КонецЦикла;
//Доп реквизиты
ИзменитьРеквизиты(МассивРеквизитов, ДобавленныеРеквизиты.ВыгрузитьЗначения());
ДобавленныеРеквизиты.Очистить();
Это возникает когда начинаю добавлять отбор по группе,если без отбора то список товаров появляется нормально.
а по моему все логично, такое имя реквизита уже есть/уже добавлено, задайте другое имя
Помогли — Скажи спасибо! Решил сам — поделись решением!
Цитата: Rasty от 06 июл 2015, 13:37
а по моему все логично, такое имя реквизита уже есть/уже добавлено, задайте другое имя
А как поправить? подскажите не допетриваю что то …
Как то надо очищать предыдущий отбор ?
перед тем как вы создаете реквизиты, посмотрите в отладчике какие реквизиты у вас есть, а чтоб вообще не мучиться, давайте им именна Имя +»1″, тогда точно не будет таких проблем
Помогли — Скажи спасибо! Решил сам — поделись решением!
И точно,проверил,если сразу делать отбор на пустом списке,тогда все работает,а если потом менять отбор на другой,то выдает такую ошибку,надо очищать форму перед новым отбором,только как не понимаю..
Вот что дальше в коде:
//добавляем элементы управления
Для Каждого Реквизит Из МассивРеквизитов Цикл
Если Реквизит.ТипЗначения.СодержитТип(Тип("ТаблицаЗначений")) Тогда
Продолжить;
КонецЕсли;
Если Реквизит.Имя = "ДополнительныеРеквизиты" Тогда
Иначе
ДобавленныеРеквизиты.Добавить(Реквизит.Путь + "." + Реквизит.Имя, Реквизит.Заголовок, Истина);
Элемент = Элементы.Добавить(ТаблицаЭлемент.Имя + Реквизит.Имя, Тип("ПолеФормы"), ТаблицаЭлемент);
Элемент.Вид = ВидПоляФормы.ПолеВвода;
Элемент.ПутьКДанным = ТаблицаЭлемент.Имя + "." + Реквизит.Имя;
Элемент.ВыбиратьТип = Ложь;
Если Найти("Код", Реквизит.Имя) Тогда
Элемент.ТолькоПросмотр = Истина;
Иначе
Элемент.ТолькоПросмотр = Ложь;
КонецЕсли;
ДобавленныеЭлементы.Добавить(Элемент.Имя);
КонецЕсли;
КонецЦикла;
//заполнение данными
РедТЗ = РеквизитФормыВЗначение(ТаблицаЭлемент.Имя);
РедТЗ.Очистить();
Для Каждого Стр ИЗ ТЗ Цикл
НовСтр = РедТЗ.Добавить();
ЗаполнитьЗначенияСвойств(НовСтр, Стр);
НовСтр.ЗаменитьНа = Справочники.Номенклатура.ПустаяСсылка();
НовСтр.Выбрать = Истина;
Если ОбъектПоиска = Неопределено Тогда
Продолжить;
КонецЕсли;
Если ОбъектПоиска.Тип = "Справочник" Тогда
Если Стр.Объект.ЭтоГруппа Тогда
Если Стр.Объект.ПометкаУдаления Тогда
НовСтр.Картинка = БиблиотекаКартинок.Папка;
Иначе
НовСтр.Картинка = БиблиотекаКартинок.Папка;
КонецЕсли;
Иначе
Если Стр.Объект.ПометкаУдаления Тогда
НовСтр.Картинка = БиблиотекаКартинок.ПометитьНаУдаление;
Иначе
НовСтр.Картинка = БиблиотекаКартинок.ПустаяКартинка;
КонецЕсли;
КонецЕсли;
Иначе
Если Стр.Объект.Проведен Тогда
НовСтр.Картинка = 7;
ИначеЕсли Стр.Объект.ПометкаУдаления Тогда
НовСтр.Картинка = 8;
Иначе
НовСтр.Картинка = 6;
КонецЕсли;
КонецЕсли;
КонецЦикла;
ЗначениеВРеквизитФормы(РедТЗ, ТаблицаЭлемент.Имя);
сохраните куда нибудь имена созданных вами реквизитов, а перед заполнением удалите их
ну или вставьте в имя какой нибудь определитель чтобы все имена реквизитов, которые вы создали, вы смогли отличить.
я добавляю в имена реквизитов строку перед ним «мрк» + Имя, а потом перебором ищу их Если СтрНайти(ИмяРеквизита,»мрк») > 0 Тогда
Помогли — Скажи спасибо! Решил сам — поделись решением!
Ошибка при вызове метода контекста (ИзменитьРеквизиты) |
Я |
17.09.19 — 03:58
В договоре контрагентов есть поле ТипДополненияДоговора, при создании договора и перевыборе этого поля
выходит ошибка. Из за чего эта ошибка и как её устранить?
{ОбщийМодуль.УправлениеДополнениямиДоговоровПБ.Модуль(32)}: Ошибка при вызове метода контекста (ИзменитьРеквизиты)
Форма.ИзменитьРеквизиты(Реквизиты);
по причине:
Неуникальное имя реквизита. Имя: «ИспользоватьДопСведения»
по причине:
Неуникальное имя реквизита. Имя: «ИспользоватьДопСведения»
Неуникальное имя реквизита. Имя: «ИспользоватьДопСведения»
{ОбщийМодуль.УправлениеДополнениямиДоговоров.Модуль(65)}: Форма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
{ОбщийМодуль.УправлениеДополнениямиДоговоров.Модуль(113)}: ПриСозданииНаСервере(Форма, ТекущийОбъект, ИмяЭлементаДляРазмещения);
{ОбщийМодуль.УправлениеДополнениямиДоговоров.Модуль(230)}: ПриЧтенииНаСервере(Форма, Объект);
{Справочник.ДоговорыКонтрагентов.Форма.ФормаЭлемента.Форма(160)}: УправлениеДополнениямиДоговоров.ДополнительныеСведенияПриИзменении(ЭтотОбъект, ИмяЭлемента);
{Справочник.ДоговорыКонтрагентов.Форма.ФормаЭлемента.Форма(99)}: ВызовОбработчикаПриИзменении(Элемент.Имя);
по причине:
Неуникальное имя реквизита. Имя: «ИспользоватьДопСведения»
1 — 17.09.19 — 04:08
Ошибка на строке Форма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
Туда передается массив, там все элементы уникальны.
// Создает основные реквизиты и поля формы, необходимые для работы.
// Вызывается из обработчика ПриСозданииНаСервере формы объекта справочника ДоговорыКонтрагентов
//
// Параметры:
// Форма — УправляемаяФорма — в которой будут отображаться дополнительные реквизиты.
//
// Объект — ДанныеФормыСтруктура — СправочникОбъект.ДоговорыКонтрагентов.
//
// ИмяЭлементаДляРазмещения — Строка — имя группы формы, в которой будут размещены свойства.
//
Процедура ПриСозданииНаСервере(Форма, Объект, ИмяЭлементаДляРазмещения) Экспорт
Если Объект.ТипДополненияДоговора = Перечисления.ТипыДополненияДоговоров.БезДополнений Тогда
Возврат;
Иначе
ДобавляемыеРеквизиты = Новый Массив;
СоздатьДополнительныеОбъектыФормы(Форма, ИмяЭлементаДляРазмещения, ДобавляемыеРеквизиты);
ИмяМодуля = ПараметрыСеанса.СоответствияОбработчиковДополненийДоговоров.Получить(Объект.ТипДополненияДоговора);
Если ИмяМодуля <> Неопределено Тогда
МодульУправленияДополнениями = ОбщегоНазначения.ОбщийМодуль(ИмяМодуля);
МодульУправленияДополнениями.ПриСозданииНаСервере(Форма, Объект, ИмяЭлементаДляРазмещения, ДобавляемыеРеквизиты);
Иначе
Форма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
КонецЕсли;
Форма.ИспользоватьДопСведения = Истина;
Форма.ДопСведения_ИмяЭлементаДляРазмещения = ИмяЭлементаДляРазмещения;
КонецЕсли;
КонецПроцедуры
2 — 17.09.19 — 04:08
Уважаемый, я бы посоветовал заюзать отладчик, и посмотреть, что там происходит. Тебе даже в ошибке написано, где расставлять точки останова.
3 — 17.09.19 — 04:10
Есть мнение, что вот тут
{ОбщийМодуль.УправлениеДополнениямиДоговоровПБ.Модуль(32)}: Ошибка при вызове метода контекста (ИзменитьРеквизиты)
Форма.ИзменитьРеквизиты(Реквизиты);
в переменной «Реквизиты» вот эта фигня «ИспользоватьДопСведения» у тебя встречается несколько раз.
4 — 17.09.19 — 04:22
(2) Так я же смотрю. (1) Туда передается массив, в нем все элементы уникальны.
Не понимаю, вот и спросил. Благодарен если кто подскажет. Куда продвинуться, и начать выявлять.
5 — 17.09.19 — 04:30
(3) Если бы я увидел что несколько раз там, задумался бы. И стал искать как это поправить. Но там это все уникально.
6 — 17.09.19 — 05:25
Я буду неоригинальным… Но вдруг на форме уже есть такой реквизит?
7 — 17.09.19 — 05:27
Это происходит если при создании на сервере я делаю эту строку
Элементы.ТипДополненияДоговора.СписокВыбора.Добавить(Перечисления.ТипыДополненияДоговоров.ПоОбращениюСОтходами);
Если её нет, то нет этого значения в списке выбора, но и ошибки нет при выборе значений что есть.
Как открываю добавление этой строки, идет ошибка.
8 — 17.09.19 — 07:05
(6) А если он там уже есть, каково должно быть поведение ? Почему так работает?
9 — 17.09.19 — 07:20
(8) Он так работает, потому что он там уже есть. И это правильное поведение. Я бы на месте 1с ещё и линейкой по рукам надавал бы.
10 — 17.09.19 — 07:24
(9) Так код то типовой. Я лишь добавляю перечисление в список выбора (7)
И в предприятии создаю договор, и меняю значения ТипДополненияДоговора
смотрю поведение формы, но начинает идти эта ошибка. Я не знаю как её устранить, если весь
функционал типовой.
11 — 17.09.19 — 09:31
Вот
Форма.ИзменитьРеквизиты(Реквизиты);
В массиве Реквизиты есть элемент ИспользоватьДопСведения
Если смотреть в отладчике Форма, он есть там тоже. И в чем суть ошибки? Как её устранить, что сделать?
http://joxi.ru/D2PlR54CqyJRk2
12 — 17.09.19 — 09:46
Перед кодом Форма.ИзменитьРеквизиты(Реквизиты);
добавь процедуру проверки уже имеющихся реквизитов
13 — 17.09.19 — 09:49
(11) Попробуй себя устранить…
falselight
14 — 17.09.19 — 10:36
(13) Только что подумал.
Элемент формы «Дополнительный реквизит», имя складывается из Уникального идентификатора элемента справочника «НаборыДополнительныхРеквизитовИСведений»
и уникального идентификатора записи плана видов характеристик «ДополнительныеРеквизитыИСведения», соответствующей «дополнительному реквизиту».
|
ИмяРеквизитаЗначение = «ДополнительныйРеквизитЗначение_» + СтрЗаменить(ВРег(Строка(ОписаниеСвойства.Набор.УникальныйИдентификатор())), «-«, «x») + «_» + СтрЗаменить(ВРег(Строка(ОписаниеСвойства.Свойство.УникальныйИдентификатор())), «-«, «x»); |
Contents
- 1 Введение
- 2 Архитектура
- 3 Использование
- 4 Особенности реализации
- 5 Источники
Введение
В этой статье я хотел бы рассказать об архитектуре, использовании и особенностях реализации подсистемы «Свойства» из инструментария разработчика «1С:Библиотека стандартных подсистем» (1С БСП).
Для начала предлагаю разобраться с терминологией 1С БСП: согласно ИТС дополнительные реквизиты и сведения — это свойства. По моему мнению, подсистема «Свойства» (Управление свойствами) — это очень мощный функционал, который позволяет во многих случаях отказаться от снятия конфигурации с поддержки или внесения ненужных изменений и ошибок в конфигурацию.
Архитектура
Описание работы с подсистемой «Свойства» на сайте ИТС 1С является исчерпывающим для типовых конфигураций, но в любом случае, для того, чтобы начать работать со свойствами в любой конфигурации с внедрённым 1С БСП необходимо установить установить константу «Использовать дополнительные реквизиты и сведения» в значение «Истина». После этого мы можем открыть справочник «Наборы дополнительных реквизитов и сведений», который содержит список объектов для которых можно создавать дополнительные реквизиты и сведения. При добавлении через стандартные формы 1С БСП пользователь создаёт новый элемент «Плана видов характеристик», который добавляется в табличную часть элемента.
Дополнительные сведения отличаются от дополнительных реквизитов прежде всего расположением, дополнительные сведения содержатся в отдельном регистре с одноименным названием, а дополнительные реквизиты являются табличной частью объекта, к которому относятся. На рисунке ниже слева-направо изображены: элемент справочника «Наборы дополнительных реквизитов и свойств», элемент плана видов характеристик и список регистра сведений «Дополнительные сведения».
Следующий рисунок изображает пример дополнительного реквизита, слева-направо: элемент справочника «Наборы дополнительных реквизитов и свойств», элемент плана видов характеристик и элемент справочника, в который был добавлен дополнительный реквизит.
Также стоит учитывать, что большая часть объектов метаданных в справочнике «Наборы дополнительных реквизитов и сведений» является предопределённой:
Однако, заполнение этих данных происходит программно, при внедрении 1С БСП или обновлении информационной базы — для этого в общих модулях добавляют процедуру ПриПолученииПредопределенныхНаборовСвойств. Уникальный идентификатор задаётся в явном виде, в т.ч. для того чтобы облегчить процедуры обмена между базами.
// См. УправлениеСвойствамиПереопределяемый.ПриПолученииПредопределенныхНаборовСвойств.
//
// Параметры:
// Наборы - см. УправлениеСвойствамиПереопределяемый.ПриПолученииПредопределенныхНаборовСвойств.Наборы
//
Процедура ПриПолученииПредопределенныхНаборовСвойств(Наборы) Экспорт
Набор = Наборы.Строки.Добавить();
Набор.Имя = "Справочник_ПапкиФайлов";
Набор.Идентификатор = Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000");
КонецПроцедуры
С точки зрения интеграции с объектами механизм работы с формами не сильно отличается от аналогичных у других подсистем 1С БСП: из модуля УправлениеСвойствами вызываются процедуры и функции с названиями соответствующими названиям событий для которых они вызываются, например:
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
// Обработчик подсистемы "Свойства"
ДополнительныеПараметры = Новый Структура;
ДополнительныеПараметры.Вставить("Объект", Объект);
ДополнительныеПараметры.Вставить("ИмяЭлементаДляРазмещения", "ГруппаДополнительныеРеквизиты");
УправлениеСвойствами.ПриСозданииНаСервере(ЭтаФорма, ДополнительныеПараметры);
КонецПроцедуры
Полный список функций и процедур находится в общем модуле УправлениеСвойствами в блоке, озаглавленным: «Процедуры и функции для стандартной обработки дополнительных реквизитов».
Использование
Каждый дополнительный реквизит или свойство содержит поле «Имя», подразумевается, что для программного использования будет использоваться этот реквизит.
Пример использования имени для получения дополнительного реквизита:
ВЫБРАТЬ ГражданствоФизическихЛиц.ФизическоеЛицо КАК ФизическоеЛицо, ФизическиеЛицаДополнительныеРеквизиты.Значение КАК Рост, ГражданствоФизическихЛиц.Страна КАК Страна ИЗ Справочник.ФизическиеЛица.ДополнительныеРеквизиты КАК ФизическиеЛицаДополнительныеРеквизиты ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ГражданствоФизическихЛиц КАК ГражданствоФизическихЛиц ПО ГражданствоФизическихЛиц.ФизическоеЛицо = ФизическиеЛицаДополнительныеРеквизиты.Ссылка ГДЕ ГражданствоФизическихЛиц.ФизическоеЛицо = &ФизическоеЛицо И ФизическиеЛицаДополнительныеРеквизиты.Свойство.Имя = &Имя
Результат:
Пример запроса для получения всех дополнительных свойств:
ВЫБРАТЬ ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура, ЦеныНоменклатурыСрезПоследних.ТипЦен КАК ТипЦен, ЦеныНоменклатурыСрезПоследних.Цена КАК Цена, ДополнительныеСведения.Свойство КАК Свойство, ДополнительныеСведения.Значение КАК Значение, ДополнительныеСведения.Свойство.Имя КАК ИмяСвойства ИЗ РегистрСведений.ЦеныНоменклатуры.СрезПоследних( &Дата, Номенклатура = &Номенклатура И ТипЦен = &ТипЦен) КАК ЦеныНоменклатурыСрезПоследних ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДополнительныеСведения КАК ДополнительныеСведения ПО ЦеныНоменклатурыСрезПоследних.Номенклатура = ДополнительныеСведения.Объект ИТОГИ МАКСИМУМ(Номенклатура), МАКСИМУМ(Цена) ПО ОБЩИЕ, ТипЦен
Результат:
Примеры получения свойств без запроса:
Рост = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.найтиПоРеквизиту("Имя", "Рост_12f49d4f164847b79effd75a758186c3");
// Получение дополнительного реквизита
Рост = УправлениеСвойствами.ЗначениеСвойства(ФизическоеЛицо.Ссылка, Рост);
// Получение всех дополнительных реквизитов и сведений объекта
ВсеСвойства = УправлениеСвойствами.ЗначенияСвойств(ФизическоеЛицо.Ссылка);
Особенности реализации
Если с запросами и функциями всё более менее ясно неприятным сюрпризом может стать то, что дополнительный реквизит на форме содержит название, отличающееся от этого реквизита, например, такое:
Чтобы найти реквизит на форме 1С БСП создаёт новые реквизиты формы Свойства_ОписаниеДополнительныхРеквизитов и Свойства_ОписаниеЗависимыхДополнительныхРеквизитов, с помощью них можно установить однозначное соответствие между элементом и значением объекта:
Второй особенностью реализации можно выделить невозможность создания свойства с мутабельным типом, с одной стороны это очевидное ограничение, с другой тип «Список значений» вполне допустим, но только для дополнительного реквизита (у дополнительных сведений невозможность связана с архитектурными ограничениями, так как объект и свойство — это измерения регистра «Дополнительные сведения»). Возможно, отсутствие такого типа связано со сложностями при обмене, а возможно в скором времени это будет реализовано, предлагаю посмотреть на пример такой реализации ниже.
Добавим новый дополнительный реквизит для справочника физические лица «Номера счетов»
Добавляем программно, вторую запись в табличную часть «Дополнительные реквизиты» справочника «Физические лица» с тем же самым свойством:
Немного модифицируем код функции ЗначенияСвойств в общем модуле УправлениеСвойствамиСлужебный:
А также код процедуры ЗаполнитьДополнительныеРеквизитыВФорме в общем модуле УправлениеСвойствами:
Таким образом мы можем сохранять и восстанавливать значения реквизитов, которые, принимают множество значений.
// Создает/пересоздает дополнительные реквизиты и элементы в форме владельца свойств.
//
// Параметры:
// Форма - ФормаКлиентскогоПриложения - уже настроена в процедуре ПриСозданииНаСервере.
//
// Объект - Неопределено - взять объект из реквизита формы "Объект".
// - СправочникОбъектИмяСправочника -
// - ДокументОбъектИмяДокумента -
// - ПланВидовХарактеристикОбъектИмяПланаВидовХарактеристик -
// - БизнесПроцессОбъектИмяБизнесПроцесса -
// - ЗадачаОбъектИмяЗадачи -
// - ПланВидовРасчетаОбъектИмяПланаВидовРасчета -
// - ПланСчетовОбъектИмяПланаСчетов -
// - ДанныеФормыСтруктура -
//
// ПоляНадписей - Булево - если указать Истина, то вместо полей ввода на форме будут созданы поля надписей.
//
// СкрытьУдаленные - Неопределено - не менять текущий режим скрытия удаленных, установленный ранее.
// - Булево - установить/отключить режим скрытия удаленных.
// При вызове процедуры ПередЗаписьюНаСервере в режиме скрытия удаленных, удаленные значения
// очищаются (не переносятся обратно в объект), а режим СкрытьУдаленные устанавливается Ложь.
//
Процедура ЗаполнитьДополнительныеРеквизитыВФорме(Форма, Объект = Неопределено, ПоляНадписей = Ложь, СкрытьУдаленные = Неопределено) Экспорт
Если НЕ Форма.Свойства_ИспользоватьСвойства
ИЛИ НЕ Форма.Свойства_ИспользоватьДопРеквизиты Тогда
Возврат;
КонецЕсли;
Если ТипЗнч(СкрытьУдаленные) = Тип("Булево") Тогда
Форма.Свойства_СкрытьУдаленные = СкрытьУдаленные;
КонецЕсли;
Если Объект = Неопределено Тогда
ОписаниеОбъекта = Форма.Объект;
Иначе
ОписаниеОбъекта = Объект;
КонецЕсли;
Форма.Свойства_НаборыДополнительныхРеквизитовОбъекта = Новый СписокЗначений;
КлючНазначения = Неопределено;
НаборыСвойствОбъекта = УправлениеСвойствамиСлужебный.ПолучитьНаборыСвойствОбъекта(
ОписаниеОбъекта, КлючНазначения);
УправлениеСвойствамиСлужебный.ЗаполнитьНаборыСДополнительнымиРеквизитами(
НаборыСвойствОбъекта,
Форма.Свойства_НаборыДополнительныхРеквизитовОбъекта);
ОбновитьКлючНазначенияФормы(Форма, КлючНазначения);
ОписаниеСвойств = УправлениеСвойствамиСлужебный.ЗначенияСвойств(
ОписаниеОбъекта.ДополнительныеРеквизиты.Выгрузить(),
Форма.Свойства_НаборыДополнительныхРеквизитовОбъекта,
Ложь);
ОписаниеСвойств.Колонки.Добавить("ИмяРеквизитаЗначение");
ОписаниеСвойств.Колонки.Добавить("СтрокаСсылочногоТипа");
ОписаниеСвойств.Колонки.Добавить("ИмяСсылочногоРеквизитаЗначение");
ОписаниеСвойств.Колонки.Добавить("ИмяУникальнаяЧасть");
ОписаниеСвойств.Колонки.Добавить("ДополнительноеЗначение");
ОписаниеСвойств.Колонки.Добавить("Булево");
УдалитьСтарыеРеквизитыИЭлементы(Форма);
// Создание реквизитов.
ДобавляемыеРеквизиты = Новый Массив();
Для каждого ОписаниеСвойства Из ОписаниеСвойств Цикл
ТипЗначенияСвойства = ОписаниеСвойства.ТипЗначения;
СписокТипов = ТипЗначенияСвойства.Типы();
СтроковыйРеквизит = (СписокТипов.Количество() = 1) И (СписокТипов[0] = Тип("Строка"));
// Поддержка строк неограниченной длины.
ИспользоватьНеограниченнуюСтроку = УправлениеСвойствамиСлужебный.ИспользоватьНеограниченнуюСтроку(
ТипЗначенияСвойства, ОписаниеСвойства.МногострочноеПолеВвода);
Если ИспользоватьНеограниченнуюСтроку Тогда
ТипЗначенияСвойства = Новый ОписаниеТипов("Строка");
ИначеЕсли ТипЗначенияСвойства.СодержитТип(Тип("Строка"))
И ТипЗначенияСвойства.КвалификаторыСтроки.Длина = 0 Тогда
// Если нельзя использовать неограниченную строку, а в свойствах реквизита она неограниченная,
// то устанавливаем ограничение в 1024 символа.
ТипЗначенияСвойства = Новый ОписаниеТипов(ОписаниеСвойства.ТипЗначения,
,,, Новый КвалификаторыСтроки(1024));
КонецЕсли;
ОписаниеСвойства.ИмяУникальнаяЧасть =
СтрЗаменить(ВРег(Строка(ОписаниеСвойства.Набор.УникальныйИдентификатор())), "-", "x")
+ "_"
+ СтрЗаменить(ВРег(Строка(ОписаниеСвойства.Свойство.УникальныйИдентификатор())), "-", "x");
// {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:51].
Если ОписаниеСвойств.Найти("ДополнительныйРеквизитЗначение_" + ОписаниеСвойства.ИмяУникальнаяЧасть) <> Неопределено Тогда
ОписаниеСвойства.ИмяУникальнаяЧасть = ОписаниеСвойства.ИмяУникальнаяЧасть + "_" + ОписаниеСвойств.Индекс(описаниеСвойства);
КонецЕсли;
// }} {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:51].
ОписаниеСвойства.ИмяРеквизитаЗначение =
"ДополнительныйРеквизитЗначение_" + ОписаниеСвойства.ИмяУникальнаяЧасть;
ОписаниеСвойства.СтрокаСсылочногоТипа = Ложь;
Если СтроковыйРеквизит
И Не ИспользоватьНеограниченнуюСтроку
И ОписаниеСвойства.ВыводитьВВидеГиперссылки Тогда
ФорматированнаяСтрока = Новый ОписаниеТипов("ФорматированнаяСтрока");
ОписаниеСвойства.СтрокаСсылочногоТипа = Истина;
ОписаниеСвойства.ИмяСсылочногоРеквизитаЗначение = "СсылочныйДополнительныйРеквизитЗначение_" + ОписаниеСвойства.ИмяУникальнаяЧасть;
Реквизит = Новый РеквизитФормы(ОписаниеСвойства.ИмяСсылочногоРеквизитаЗначение, ФорматированнаяСтрока, , ОписаниеСвойства.Наименование, Истина);
ДобавляемыеРеквизиты.Добавить(Реквизит);
КонецЕсли;
Если ОписаниеСвойства.Удалено Тогда
ТипЗначенияСвойства = Новый ОписаниеТипов("Строка");
КонецЕсли;
Реквизит = Новый РеквизитФормы(ОписаниеСвойства.ИмяРеквизитаЗначение, ТипЗначенияСвойства, , ОписаниеСвойства.Наименование, Истина);
ДобавляемыеРеквизиты.Добавить(Реквизит);
ОписаниеСвойства.ДополнительноеЗначение =
УправлениеСвойствамиСлужебный.ТипЗначенияСодержитЗначенияСвойств(ТипЗначенияСвойства);
ОписаниеСвойства.Булево = ОбщегоНазначения.ОписаниеТипаСостоитИзТипа(ТипЗначенияСвойства, Тип("Булево"));
КонецЦикла;
Форма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
// Создание элементов формы.
Для Каждого ОписаниеСвойства Из ОписаниеСвойств Цикл
ИмяЭлементаДляРазмещения = Форма.Свойства_ИмяЭлементаДляРазмещения;
Если ТипЗнч(ИмяЭлементаДляРазмещения) <> Тип("СписокЗначений") Тогда
Если ИмяЭлементаДляРазмещения = Неопределено Тогда
ИмяЭлементаДляРазмещения = "";
КонецЕсли;
ЭлементРазмещения = ?(ИмяЭлементаДляРазмещения = "", Неопределено, Форма.Элементы[ИмяЭлементаДляРазмещения]);
Иначе
РазделыДляРазмещения = Форма.Свойства_ИмяЭлементаДляРазмещения;
РазмещениеНабора = РазделыДляРазмещения.НайтиПоЗначению(ОписаниеСвойства.Набор);
Если РазмещениеНабора = Неопределено Тогда
РазмещениеНабора = РазделыДляРазмещения.НайтиПоЗначению("ВсеОстальные");
КонецЕсли;
ЭлементРазмещения = Форма.Элементы[РазмещениеНабора.Представление];
КонецЕсли;
ФормаОписаниеСвойства = Форма.Свойства_ОписаниеДополнительныхРеквизитов.Добавить();
ЗаполнитьЗначенияСвойств(ФормаОписаниеСвойства, ОписаниеСвойства);
// Заполнение таблицы зависимых дополнительных реквизитов.
Если ОписаниеСвойства.ЗависимостиДополнительныхРеквизитов.Количество() > 0
И Не ОписаниеСвойства.Удалено Тогда
ОписаниеЗависимогоРеквизита = Форма.Свойства_ОписаниеЗависимыхДополнительныхРеквизитов.Добавить();
ЗаполнитьЗначенияСвойств(ОписаниеЗависимогоРеквизита, ОписаниеСвойства);
КонецЕсли;
ОтборСтрок = Новый Структура;
ОтборСтрок.Вставить("НаборСвойств", ОписаниеСвойства.Набор);
ЗависимостиДанногоНабора = ОписаниеСвойства.ЗависимостиДополнительныхРеквизитов.НайтиСтроки(ОтборСтрок);
Для Каждого СтрокаТаблицы Из ЗависимостиДанногоНабора Цикл
Если СтрокаТаблицы.ЗависимоеСвойство = "ЗаполнятьОбязательно"
И ОписаниеСвойства.ТипЗначения = Новый ОписаниеТипов("Булево") Тогда
Продолжить;
КонецЕсли;
Если ОписаниеСвойства.Удалено Тогда
Продолжить;
КонецЕсли;
Если ТипЗнч(СтрокаТаблицы.Реквизит) = Тип("Строка") Тогда
ПутьКРеквизиту = "Параметры.ОписаниеОбъекта." + СтрокаТаблицы.Реквизит;
Иначе
ОписаниеДополнительногоРеквизита = ОписаниеСвойств.Найти(СтрокаТаблицы.Реквизит, "Свойство");
Если ОписаниеДополнительногоРеквизита = Неопределено Тогда
Продолжить; // Дополнительный реквизит не существует, условие игнорируется.
КонецЕсли;
ПутьКРеквизиту = "Параметры.Форма." + ОписаниеДополнительногоРеквизита.ИмяРеквизитаЗначение;
КонецЕсли;
УправлениеСвойствамиСлужебный.ПостроитьУсловияЗависимостей(ОписаниеЗависимогоРеквизита, ПутьКРеквизиту, СтрокаТаблицы);
КонецЦикла;
Если ОписаниеСвойства.СтрокаСсылочногоТипа Тогда
Если ЗначениеЗаполнено(ОписаниеСвойства.Значение) Тогда
Значение = ОписаниеСвойства.ТипЗначения.ПривестиЗначение(ОписаниеСвойства.Значение);
СтрокаЗначение = СтроковыеФункции.ФорматированнаяСтрока(Значение);
Иначе
Значение = НСтр("ru = 'не задано'");
СсылкаРедактирования = "НеЗадано";
СтрокаЗначение = Новый ФорматированнаяСтрока(Значение,, ЦветаСтиля.ЦветПустойГиперссылки,, СсылкаРедактирования);
КонецЕсли;
Форма[ОписаниеСвойства.ИмяСсылочногоРеквизитаЗначение] = СтрокаЗначение;
КонецЕсли;
Форма[ОписаниеСвойства.ИмяРеквизитаЗначение] = ОписаниеСвойства.Значение;
Если ОписаниеСвойства.Удалено И Форма.Свойства_СкрытьУдаленные Тогда
Продолжить;
КонецЕсли;
Если НаборыСвойствОбъекта.Количество() > 1 Тогда
ЭлементСписка = Форма.Свойства_ЭлементыГруппДополнительныхРеквизитов.НайтиПоЗначению(
ОписаниеСвойства.Набор);
Если ЭлементСписка <> Неопределено Тогда
Родитель = Форма.Элементы[ЭлементСписка.Представление];
Иначе
ОписаниеНабора = НаборыСвойствОбъекта.Найти(ОписаниеСвойства.Набор, "Набор");
Если ОписаниеНабора = Неопределено Тогда
ОписаниеНабора = НаборыСвойствОбъекта.Добавить();
ОписаниеНабора.Набор = ОписаниеСвойства.Набор;
ОписаниеНабора.Заголовок = НСтр("ru = 'Удаленные реквизиты'")
КонецЕсли;
Если НЕ ЗначениеЗаполнено(ОписаниеНабора.Заголовок) Тогда
ОписаниеНабора.Заголовок = Строка(ОписаниеСвойства.Набор);
КонецЕсли;
ИмяЭлементаНабора = "НаборДополнительныхРеквизитов" + ОписаниеСвойства.ИмяУникальнаяЧасть;
Родитель = Форма.Элементы.Добавить(ИмяЭлементаНабора, Тип("ГруппаФормы"), ЭлементРазмещения);
Форма.Свойства_ЭлементыГруппДополнительныхРеквизитов.Добавить(
ОписаниеСвойства.Набор, Родитель.Имя);
Если ТипЗнч(ЭлементРазмещения) = Тип("ГруппаФормы")
И ЭлементРазмещения.Вид = ВидГруппыФормы.Страницы Тогда
Родитель.Вид = ВидГруппыФормы.Страница;
Иначе
Родитель.Вид = ВидГруппыФормы.ОбычнаяГруппа;
Родитель.Отображение = ОтображениеОбычнойГруппы.Нет;
КонецЕсли;
Родитель.ОтображатьЗаголовок = Ложь;
Родитель.Группировка = ГруппировкаПодчиненныхЭлементовФормы.Вертикальная;
ЗаполненныеСвойстваГруппы = Новый Структура;
Для каждого Колонка Из НаборыСвойствОбъекта.Колонки Цикл
Если ОписаниеНабора[Колонка.Имя] <> Неопределено Тогда
ЗаполненныеСвойстваГруппы.Вставить(Колонка.Имя, ОписаниеНабора[Колонка.Имя]);
КонецЕсли;
КонецЦикла;
ЗаполнитьЗначенияСвойств(Родитель, ЗаполненныеСвойстваГруппы);
КонецЕсли;
Иначе
Родитель = ЭлементРазмещения;
КонецЕсли;
Если ОписаниеСвойства.ВыводитьВВидеГиперссылки Тогда
ИмяГруппыГиперссылки = "Группа_" + ОписаниеСвойства.ИмяУникальнаяЧасть;
ГруппаГиперссылки = Форма.Элементы.Добавить(ИмяГруппыГиперссылки, Тип("ГруппаФормы"), Родитель);
ГруппаГиперссылки.Вид = ВидГруппыФормы.ОбычнаяГруппа;
ГруппаГиперссылки.Отображение = ОтображениеОбычнойГруппы.Нет;
ГруппаГиперссылки.ОтображатьЗаголовок = Ложь;
ГруппаГиперссылки.Группировка = ГруппировкаПодчиненныхЭлементовФормы.ГоризонтальнаяВсегда;
ГруппаГиперссылки.Заголовок = ОписаниеСвойства.Наименование;
Элемент = Форма.Элементы.Добавить(ОписаниеСвойства.ИмяРеквизитаЗначение, Тип("ПолеФормы"), ГруппаГиперссылки); // РасширениеПоляФормыДляПоляНадписи, РасширениеПоляФормыДляПоляВвода
РеквизитДоступен = РеквизитДоступенПоФункциональнымОпциям(ОписаниеСвойства);
Если РеквизитДоступен И Не ПоляНадписей Тогда
ИмяКнопки = "Кнопка_" + ОписаниеСвойства.ИмяУникальнаяЧасть;
Кнопка = Форма.Элементы.Добавить(
ИмяКнопки,
Тип("КнопкаФормы"),
ГруппаГиперссылки);
Кнопка.ТолькоВоВсехДействиях = Истина;
Кнопка.ИмяКоманды = "РедактироватьГиперссылкуРеквизита";
Кнопка.ОтображениеФигуры = ОтображениеФигурыКнопки.ПриАктивности;
КонецЕсли;
Если Не ОписаниеСвойства.СтрокаСсылочногоТипа И ЗначениеЗаполнено(ОписаниеСвойства.Значение) Тогда
Элемент.Гиперссылка = Истина;
КонецЕсли;
Иначе
Элемент = Форма.Элементы.Добавить(ОписаниеСвойства.ИмяРеквизитаЗначение, Тип("ПолеФормы"), Родитель); // РасширениеПоляФормыДляПоляНадписи, РасширениеПоляФормыДляПоляВвода
КонецЕсли;
ФормаОписаниеСвойства.ЭлементФормыДобавлен = Истина;
Если ОписаниеСвойства.Булево И ПустаяСтрока(ОписаниеСвойства.ФорматСвойства) Тогда
Элемент.Вид = ВидПоляФормы.ПолеФлажка;
Элемент.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Право;
Иначе
Если ПоляНадписей Тогда
Элемент.Вид = ВидПоляФормы.ПолеВвода;
ИначеЕсли ОписаниеСвойства.ВыводитьВВидеГиперссылки
И (ОписаниеСвойства.СтрокаСсылочногоТипа
Или ЗначениеЗаполнено(ОписаниеСвойства.Значение))Тогда
Элемент.Вид = ВидПоляФормы.ПолеНадписи;
Иначе
Элемент.Вид = ВидПоляФормы.ПолеВвода;
Элемент.АвтоОтметкаНезаполненного = ОписаниеСвойства.ЗаполнятьОбязательно И НЕ ОписаниеСвойства.Удалено;
КонецЕсли;
Элемент.РастягиватьПоВертикали = Ложь;
Элемент.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Лево;
КонецЕсли;
Если ОписаниеСвойства.СтрокаСсылочногоТипа Тогда
Элемент.ПутьКДанным = ОписаниеСвойства.ИмяСсылочногоРеквизитаЗначение;
Элемент.УстановитьДействие("ОбработкаНавигационнойСсылки", "Подключаемый_СвойстваВыполнитьКоманду");
Иначе
Элемент.ПутьКДанным = ОписаниеСвойства.ИмяРеквизитаЗначение;
КонецЕсли;
Элемент.Подсказка = ОписаниеСвойства.Подсказка;
Элемент.УстановитьДействие("ПриИзменении", "Подключаемый_ПриИзмененииДополнительногоРеквизита");
Если Элемент.Вид = ВидПоляФормы.ПолеВвода
И Не ИспользоватьНеограниченнуюСтроку
И ОписаниеСвойства.ТипЗначения.Типы().Найти(Тип("Строка")) <> Неопределено Тогда
Элемент.СвязьПоТипу = Новый СвязьПоТипу("Свойства_ОписаниеДополнительныхРеквизитов.Свойство",
ОписаниеСвойств.Индекс(ОписаниеСвойства));
КонецЕсли;
Если ОписаниеСвойства.МногострочноеПолеВвода > 0 Тогда
Если НЕ ПоляНадписей Тогда
Элемент.МногострочныйРежим = Истина;
КонецЕсли;
Элемент.Высота = ОписаниеСвойства.МногострочноеПолеВвода;
КонецЕсли;
Если НЕ ПустаяСтрока(ОписаниеСвойства.ФорматСвойства)
И Не ОписаниеСвойства.ВыводитьВВидеГиперссылки Тогда
Если ПоляНадписей Тогда
Элемент.Формат = ОписаниеСвойства.ФорматСвойства;
Иначе
ФорматнаяСтрока = "";
Массив = СтрРазделить(ОписаниеСвойства.ФорматСвойства, ";", Ложь);
Для каждого Подстрока Из Массив Цикл
Если СтрНайти(Подстрока, "ДП=") > 0 ИЛИ СтрНайти(Подстрока, "DE=") > 0 Тогда
Продолжить;
КонецЕсли;
Если СтрНайти(Подстрока, "ЧН=") > 0 ИЛИ СтрНайти(Подстрока, "NZ=") > 0 Тогда
Продолжить;
КонецЕсли;
Если СтрНайти(Подстрока, "ДФ=") > 0 ИЛИ СтрНайти(Подстрока, "DF=") > 0 Тогда
Если СтрНайти(Подстрока, "ддд") > 0 ИЛИ СтрНайти(Подстрока, "ddd") > 0 Тогда
Подстрока = СтрЗаменить(Подстрока, "ддд", "дд");
Подстрока = СтрЗаменить(Подстрока, "ddd", "dd");
КонецЕсли;
Если СтрНайти(Подстрока, "дддд") > 0 ИЛИ СтрНайти(Подстрока, "dddd") > 0 Тогда
Подстрока = СтрЗаменить(Подстрока, "дддд", "дд");
Подстрока = СтрЗаменить(Подстрока, "dddd", "dd");
КонецЕсли;
Если СтрНайти(Подстрока, "МММ") > 0 ИЛИ СтрНайти(Подстрока, "MMM") > 0 Тогда
Подстрока = СтрЗаменить(Подстрока, "МММ", "ММ");
Подстрока = СтрЗаменить(Подстрока, "MMM", "MM");
КонецЕсли;
Если СтрНайти(Подстрока, "ММММ") > 0 ИЛИ СтрНайти(Подстрока, "MMMM") > 0 Тогда
Подстрока = СтрЗаменить(Подстрока, "ММММ", "ММ");
Подстрока = СтрЗаменить(Подстрока, "MMMM", "MM");
КонецЕсли;
КонецЕсли;
Если СтрНайти(Подстрока, "ДЛФ=") > 0 ИЛИ СтрНайти(Подстрока, "DLF=") > 0 Тогда
Если СтрНайти(Подстрока, "ДД") > 0 ИЛИ СтрНайти(Подстрока, "DD") > 0 Тогда
Подстрока = СтрЗаменить(Подстрока, "ДД", "Д");
Подстрока = СтрЗаменить(Подстрока, "DD", "D");
КонецЕсли;
КонецЕсли;
ФорматнаяСтрока = ФорматнаяСтрока + ?(ФорматнаяСтрока = "", "", ";") + Подстрока;
КонецЦикла;
Элемент.Формат = ФорматнаяСтрока;
Элемент.ФорматРедактирования = ФорматнаяСтрока;
КонецЕсли;
КонецЕсли;
Если ОписаниеСвойства.Удалено Тогда
Элемент.ЦветТекстаЗаголовка = ЦветаСтиля.ТекстЗапрещеннойЯчейкиЦвет;
Элемент.ШрифтЗаголовка = ШрифтыСтиля.ЗаголовокУдаленногоРеквизитаШрифт;
Если Элемент.Вид = ВидПоляФормы.ПолеВвода Тогда
Элемент.КнопкаОчистки = Истина;
Элемент.КнопкаВыбора = Ложь;
Элемент.КнопкаОткрытия = Ложь;
Элемент.КнопкаВыпадающегоСписка = Ложь;
Элемент.РедактированиеТекста = Ложь;
КонецЕсли;
КонецЕсли;
Если НЕ ПоляНадписей И ОписаниеСвойства.ДополнительноеЗначение И Элемент.Вид = ВидПоляФормы.ПолеВвода Тогда
ПараметрыВыбора = Новый Массив;
ПараметрыВыбора.Добавить(Новый ПараметрВыбора("Отбор.Владелец",
?(ЗначениеЗаполнено(ОписаниеСвойства.ВладелецДополнительныхЗначений),
ОписаниеСвойства.ВладелецДополнительныхЗначений, ОписаниеСвойства.Свойство)));
Элемент.ПараметрыВыбора = Новый ФиксированныйМассив(ПараметрыВыбора);
КонецЕсли;
КонецЦикла;
// Установка видимости, доступности и обязательности заполнения дополнительных реквизитов.
Для Каждого ОписаниеЗависимогоРеквизита Из Форма.Свойства_ОписаниеЗависимыхДополнительныхРеквизитов Цикл
Если ОписаниеЗависимогоРеквизита.ВыводитьВВидеГиперссылки Тогда
ОбрабатываемыйЭлемент = СтрЗаменить(ОписаниеЗависимогоРеквизита.ИмяРеквизитаЗначение, "ДополнительныйРеквизитЗначение_", "Группа_");
Иначе
ОбрабатываемыйЭлемент = ОписаниеЗависимогоРеквизита.ИмяРеквизитаЗначение;
КонецЕсли;
Если ОписаниеЗависимогоРеквизита.УсловиеДоступности <> Неопределено Тогда
Результат = РезультатВычисленияУсловия(Форма, ОписаниеОбъекта, ОписаниеЗависимогоРеквизита.УсловиеДоступности);
Элемент = Форма.Элементы[ОбрабатываемыйЭлемент]; // ПолеФормы
Если Элемент.Доступность <> Результат Тогда
Элемент.Доступность = Результат;
КонецЕсли;
КонецЕсли;
Если ОписаниеЗависимогоРеквизита.УсловиеВидимости <> Неопределено Тогда
Результат = РезультатВычисленияУсловия(Форма, ОписаниеОбъекта, ОписаниеЗависимогоРеквизита.УсловиеВидимости);
Элемент = Форма.Элементы[ОбрабатываемыйЭлемент];
Если Элемент.Видимость <> Результат Тогда
Элемент.Видимость = Результат;
КонецЕсли;
КонецЕсли;
Если ОписаниеЗависимогоРеквизита.УсловиеОбязательностиЗаполнения <> Неопределено Тогда
Если Не ОписаниеЗависимогоРеквизита.ЗаполнятьОбязательно Тогда
Продолжить;
КонецЕсли;
Результат = РезультатВычисленияУсловия(Форма, ОписаниеОбъекта, ОписаниеЗависимогоРеквизита.УсловиеОбязательностиЗаполнения);
Элемент = Форма.Элементы[ОбрабатываемыйЭлемент];
Если Не ОписаниеЗависимогоРеквизита.ВыводитьВВидеГиперссылки
И Элемент.АвтоОтметкаНезаполненного <> Результат Тогда
Элемент.АвтоОтметкаНезаполненного = Результат;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Структура = Новый Структура("ПараметрыСвойств");
ЗаполнитьЗначенияСвойств(Структура, Форма);
Если ТипЗнч(Структура.ПараметрыСвойств) = Тип("Структура")
И Структура.ПараметрыСвойств.Свойство("ВыполненаОтложеннаяИнициализация") Тогда
Форма.ПараметрыСвойств.ВыполненаОтложеннаяИнициализация = Истина;
// Удаление временной декорации, если она была добавлена.
Если Форма.ПараметрыСвойств.Свойство("ДобавленаПустаяДекорация") Тогда
Для Каждого ИмяДекорации Из Форма.ПараметрыСвойств.КоллекцияДекораций Цикл
Форма.Элементы.Удалить(Форма.Элементы[ИмяДекорации]);
КонецЦикла;
Форма.ПараметрыСвойств.Удалить("ДобавленаПустаяДекорация");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
// Возвращает заполненную таблицу значений свойств объекта.
Функция ЗначенияСвойств(ДополнительныеСвойстваОбъекта, Наборы, ЭтоДополнительноеСведение) Экспорт
Если ДополнительныеСвойстваОбъекта.Количество() = 0 Тогда
// Предварительная быстрая проверка использования дополнительных свойств.
СвойстваНеНайдены = ДополнительныеРеквизитыИСведенияНеНайдены(Наборы, ЭтоДополнительноеСведение);
Если СвойстваНеНайдены Тогда
ОписаниеСвойств = Новый ТаблицаЗначений;
ОписаниеСвойств.Колонки.Добавить("Набор");
ОписаниеСвойств.Колонки.Добавить("Свойство");
ОписаниеСвойств.Колонки.Добавить("ВладелецДополнительныхЗначений");
ОписаниеСвойств.Колонки.Добавить("ЗаполнятьОбязательно");
ОписаниеСвойств.Колонки.Добавить("Наименование");
ОписаниеСвойств.Колонки.Добавить("ТипЗначения");
ОписаниеСвойств.Колонки.Добавить("ФорматСвойства");
ОписаниеСвойств.Колонки.Добавить("МногострочноеПолеВвода");
ОписаниеСвойств.Колонки.Добавить("Удалено");
ОписаниеСвойств.Колонки.Добавить("Значение");
Возврат ОписаниеСвойств;
КонецЕсли;
КонецЕсли;
Свойства = ДополнительныеСвойстваОбъекта.ВыгрузитьКолонку("Свойство");
НаборыСвойств = Новый ТаблицаЗначений;
НаборыСвойств.Колонки.Добавить(
"Набор", Новый ОписаниеТипов("СправочникСсылка.НаборыДополнительныхРеквизитовИСведений"));
НаборыСвойств.Колонки.Добавить(
"ПорядокНабора", Новый ОписаниеТипов("Число"));
Для каждого ЭлементСписка Из Наборы Цикл
НоваяСтрока = НаборыСвойств.Добавить();
НоваяСтрока.Набор = ЭлементСписка.Значение;
НоваяСтрока.ПорядокНабора = Наборы.Индекс(ЭлементСписка);
КонецЦикла;
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Свойства", Свойства);
Запрос.УстановитьПараметр("НаборыСвойств", НаборыСвойств);
Запрос.УстановитьПараметр("ЭтоОсновнойЯзык", ТекущийЯзык() = Метаданные.ОсновнойЯзык);
Запрос.УстановитьПараметр("КодЯзыка", ТекущийЯзык().КодЯзыка);
Запрос.Текст =
"ВЫБРАТЬ
| НаборыСвойств.Набор КАК Набор,
| НаборыСвойств.ПорядокНабора КАК ПорядокНабора
|ПОМЕСТИТЬ НаборыСвойств
|ИЗ
| &НаборыСвойств КАК НаборыСвойств
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗРЕШЕННЫЕ
| НаборыСвойств.Набор КАК Набор,
| НаборыСвойств.ПорядокНабора КАК ПорядокНабора,
| СвойстваНаборов.Свойство КАК Свойство,
| СвойстваНаборов.ПометкаУдаления КАК ПометкаУдаления,
| СвойстваНаборов.НомерСтроки КАК ПорядокСвойства
|ПОМЕСТИТЬ СвойстваНаборов
|ИЗ
| НаборыСвойств КАК НаборыСвойств
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.НаборыДополнительныхРеквизитовИСведений.ДополнительныеРеквизиты КАК СвойстваНаборов
| ПО (СвойстваНаборов.Ссылка = НаборыСвойств.Набор)
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения КАК Свойства
| ПО (СвойстваНаборов.Свойство = Свойства.Ссылка)
|ГДЕ
| НЕ СвойстваНаборов.ПометкаУдаления
| И НЕ Свойства.ПометкаУдаления
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗРЕШЕННЫЕ
| Свойства.Ссылка КАК Свойство
|ПОМЕСТИТЬ ЗаполненныеСвойства
|ИЗ
| ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения КАК Свойства
|ГДЕ
| Свойства.Ссылка В(&Свойства)
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
| СвойстваНаборов.Набор КАК Набор,
| СвойстваНаборов.ПорядокНабора КАК ПорядокНабора,
| СвойстваНаборов.Свойство КАК Свойство,
| СвойстваНаборов.ПорядокСвойства КАК ПорядокСвойства,
| СвойстваНаборов.ПометкаУдаления КАК Удалено
|ПОМЕСТИТЬ ВсеСвойства
|ИЗ
| СвойстваНаборов КАК СвойстваНаборов
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ЗНАЧЕНИЕ(Справочник.НаборыДополнительныхРеквизитовИСведений.ПустаяСсылка),
| 0,
| ЗаполненныеСвойства.Свойство,
| 0,
| ИСТИНА
|ИЗ
| ЗаполненныеСвойства КАК ЗаполненныеСвойства
| ЛЕВОЕ СОЕДИНЕНИЕ СвойстваНаборов КАК СвойстваНаборов
| ПО ЗаполненныеСвойства.Свойство = СвойстваНаборов.Свойство
|ГДЕ
| СвойстваНаборов.Свойство ЕСТЬ NULL
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗРЕШЕННЫЕ
| ВсеСвойства.Набор КАК Набор,
| ВсеСвойства.Свойство КАК Свойство,
| ДополнительныеРеквизитыИСведения.ВладелецДополнительныхЗначений КАК ВладелецДополнительныхЗначений,
| ДополнительныеРеквизитыИСведения.ЗаполнятьОбязательно КАК ЗаполнятьОбязательно,
| ВЫБОР
| КОГДА &ЭтоОсновнойЯзык
| ТОГДА ДополнительныеРеквизитыИСведения.Заголовок
| ИНАЧЕ ВЫРАЗИТЬ(ЕСТЬNULL(СвойстваПредставления.Заголовок, ДополнительныеРеквизитыИСведения.Заголовок) КАК СТРОКА(150))
| КОНЕЦ КАК Наименование,
| ДополнительныеРеквизитыИСведения.ТипЗначения КАК ТипЗначения,
| ДополнительныеРеквизитыИСведения.ФорматСвойства КАК ФорматСвойства,
| ДополнительныеРеквизитыИСведения.МногострочноеПолеВвода КАК МногострочноеПолеВвода,
| ВсеСвойства.Удалено КАК Удалено,
| ДополнительныеРеквизитыИСведения.Доступен КАК Доступен,
| ДополнительныеРеквизитыИСведения.Виден КАК Виден,
| ВЫБОР
| КОГДА &ЭтоОсновнойЯзык
| ТОГДА ДополнительныеРеквизитыИСведения.Подсказка
| ИНАЧЕ ВЫРАЗИТЬ(ЕСТЬNULL(СвойстваПредставления.Подсказка, ДополнительныеРеквизитыИСведения.Подсказка) КАК СТРОКА(150))
| КОНЕЦ КАК Подсказка,
| ДополнительныеРеквизитыИСведения.ВыводитьВВидеГиперссылки КАК ВыводитьВВидеГиперссылки,
| ДополнительныеРеквизитыИСведения.ЗависимостиДополнительныхРеквизитов.(
| ЗависимоеСвойство КАК ЗависимоеСвойство,
| Реквизит КАК Реквизит,
| Условие КАК Условие,
| Значение КАК Значение,
| НаборСвойств КАК НаборСвойств
| ) КАК ЗависимостиДополнительныхРеквизитов
|ИЗ
| ВсеСвойства КАК ВсеСвойства
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения КАК ДополнительныеРеквизитыИСведения
| ПО ВсеСвойства.Свойство = ДополнительныеРеквизитыИСведения.Ссылка
| ЛЕВОЕ СОЕДИНЕНИЕ ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.Представления КАК СвойстваПредставления
| ПО (СвойстваПредставления.Ссылка = ДополнительныеРеквизитыИСведения.Ссылка)
| И (СвойстваПредставления.КодЯзыка = &КодЯзыка)
|
|УПОРЯДОЧИТЬ ПО
| Удалено,
| ВсеСвойства.ПорядокНабора,
| ВсеСвойства.ПорядокСвойства";
Если ЭтоДополнительноеСведение Тогда
Запрос.Текст = СтрЗаменить(
Запрос.Текст,
"Справочник.НаборыДополнительныхРеквизитовИСведений.ДополнительныеРеквизиты",
"Справочник.НаборыДополнительныхРеквизитовИСведений.ДополнительныеСведения");
КонецЕсли;
ОписаниеСвойств = Запрос.Выполнить().Выгрузить();
ОписаниеСвойств.Индексы.Добавить("Свойство");
ОписаниеСвойств.Колонки.Добавить("Значение");
// Удаление дублей свойств в нижестоящих наборах свойств.
Если Наборы.Количество() > 1 Тогда
Индекс = ОписаниеСвойств.Количество()-1;
Пока Индекс >= 0 Цикл
Строка = ОписаниеСвойств[Индекс];
НайденнаяСтрока = ОписаниеСвойств.Найти(Строка.Свойство, "Свойство");
Если НайденнаяСтрока <> Неопределено
И НайденнаяСтрока <> Строка Тогда
ОписаниеСвойств.Удалить(Индекс);
КонецЕсли;
Индекс = Индекс-1;
КонецЦикла;
КонецЕсли;
// {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:33].
ИспользованныеСвойства = Новый Массив;
// }} {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:33].
// Заполнение значений свойств.
Для Каждого Строка Из ДополнительныеСвойстваОбъекта Цикл
ОписаниеСвойства = ОписаниеСвойств.Найти(Строка.Свойство, "Свойство");
Если ОписаниеСвойства <> Неопределено Тогда
// {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:34].
Если ИспользованныеСвойства.Найти(ОписаниеСвойства.Свойство) = Неопределено Тогда
ИспользованныеСвойства.Добавить(ОписаниеСвойства.Свойство)
Иначе
НоваяСтрокаОписания = ОписаниеСвойств.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрокаОписания, ОписаниеСвойства);
ОписаниеСвойства = НоваяСтрокаОписания;
КонецЕсли;
// }} {{ Prosto. [Silantev Oleg Sergeevich] - [26.09.2020 21:34].
// Поддержка строк неограниченной длины.
Если НЕ ЭтоДополнительноеСведение Тогда
ИспользоватьСтрокуВВидеСсылки = ИспользоватьСтрокуВВидеСсылки(
ОписаниеСвойства.ТипЗначения,
ОписаниеСвойства.ВыводитьВВидеГиперссылки,
ОписаниеСвойства.МногострочноеПолеВвода);
ИспользоватьНеограниченнуюСтроку = ИспользоватьНеограниченнуюСтроку(
ОписаниеСвойства.ТипЗначения,
ОписаниеСвойства.МногострочноеПолеВвода);
НеобходимоПеренестиЗначениеИзСсылки = НеобходимоПеренестиЗначениеИзСсылки(
Строка.ТекстоваяСтрока,
Строка.Значение);
Если (ИспользоватьНеограниченнуюСтроку
Или ИспользоватьСтрокуВВидеСсылки
Или НеобходимоПеренестиЗначениеИзСсылки)
И НЕ ПустаяСтрока(Строка.ТекстоваяСтрока) Тогда
Если Не ИспользоватьСтрокуВВидеСсылки И НеобходимоПеренестиЗначениеИзСсылки Тогда
ЗначениеБезСсылки = ЗначениеБезСсылки(Строка.ТекстоваяСтрока, Строка.Значение);
ОписаниеСвойства.Значение = ЗначениеБезСсылки;
Иначе
ОписаниеСвойства.Значение = Строка.ТекстоваяСтрока;
КонецЕсли;
Иначе
ОписаниеСвойства.Значение = Строка.Значение;
КонецЕсли;
Иначе
ОписаниеСвойства.Значение = Строка.Значение;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Возврат ОписаниеСвойств;
КонецФункции
Работа в примерах была осуществлена с версией БСП: 3.1.2.245
Источники
Как подключить дополнительные реквизиты к справочнику или документу в БСП 2.3
Создание множественного дополнительного реквизита. Управление торговлей 11
Ранее мы добавили свой дополнительный реквизит «СНИЛС» для внутреннего документа и сделали закладку с дополнительными реквизитами первой на форме.
Пришло время улучшить юзабилити нашего реквизита. Как известно СНИЛС имеет определённый формат ввода. Кроме того, он содержит контрольное число в виде двух последних цифр для проверки корректности его ввода. Учитывая это, будет хорошим тоном по отношению к пользователям, если мы поможем ему корректно указать СНИЛС для сотрудника, а в случае ошибки предупредить его об этом.
Делаем маску ввода для дополнительного реквизита
Номер СНИЛС представляет собой строку следующего формата «XXX-XXX-XXX XX», где Х это цифра от 0 до 9. Последняя группа символов XX представляет собой контрольное число. К сожалению типовой механизм не позволяет задать маску ввода для дополнительных реквизитов. Поэтому внесем изменения в программный код. Создание полей на форме для дополнительных реквизитов происходит динамически при создании формы на сервере, либо при изменении некоторых реквизитов в уже открытой форме. Первичный вызов процедуры создания дополнительных реквизитов выглядит так:
|
&НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) ... УправлениеСвойствами.ПриСозданииНаСервере(ЭтаФорма, ДополнительныеПараметры); ... КонецПроцедуры |
Само создание полей формы происходит в процедуре
|
УправлениеСвойствами.ЗаполнитьДополнительныеРеквизитыВФорме() |
Откроем общий модуль УправлениеСвойствами и найдем там эту процедуру. Внесем туда изменения — добавим в конце вызов своей процедуры:
|
Процедура ЗаполнитьДополнительныеРеквизитыВФорме(Форма, Объект = Неопределено, ПоляНадписей = Ложь, СкрытьУдаленные = Неопределено) Экспорт ... маг_РаботаСДокументами.ЗаполнитьДополнительныеРеквизитыВФорме(Форма, ОписаниеОбъекта, ПоляНадписей) ; ... КонецПроцедуры |
Теперь в общий модуль маг_РаботаСДокументами добавим саму реализацию этой процедуры:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Процедура ЗаполнитьДополнительныеРеквизитыВФорме(Форма, Объект, ПоляНадписей) Экспорт Если ТипЗнч(Объект.Ссылка) <> Тип(«СправочникСсылка.ВнутренниеДокументы») Тогда Возврат; КонецЕсли; ВидДокументаСтрокой = «»+Форма.Объект.ВидДокумента; Если ВидДокументаСтрокой = «Заявка на прием» тогда //Получим уникальное имя для реквизита СНИЛС ИмяДопРеквизита = маг_ПовторноеИспользование.УникальноеИмяДопРеквизита(Объект.ВидДокумента, «СНИЛС»); Рек = Форма.Элементы.Найти(ИмяДопРеквизита); Если Рек <> Неопределено тогда Рек.Маска = «999-999-999 99»; Рек.УстановитьДействие(«ПриИзменении», «маг_СНИЛСПриИзменении»); КонецЕсли; КонецЕсли; КонецПроцедуры |
Здесь мы сначала получаем уникально имя для нашего реквизита. По нему мы сможем обращаться как к самому реквизиту формы, так и к полю формы. Для получения уникального имени используем следующую функцию, поместим ее в общий модуль маг_ПовторноеИспользование:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 |
Функция УникальноеИмяДопРеквизита(ВидДокумента, ИмяРеквизита) Экспорт УстановитьПривилегированныйРежим(Истина); Набор = ВидДокумента.НаборСвойств; Результат = «»; Запрос = Новый Запрос; Запрос.Текст = «ВЫБРАТЬ ПЕРВЫЕ 1 | ВЫБОР | КОГДА Наборы.ПометкаУдаления | ТОГДА &ПустойНабор | ИНАЧЕ Наборы.Ссылка | КОНЕЦ КАК Набор, | Наборы.Свойство |ИЗ | Справочник.НаборыДополнительныхРеквизитовИСведений.ДополнительныеРеквизиты КАК Наборы |ГДЕ | Наборы.Ссылка = &Ссылка | И Наборы.Свойство.Заголовок = &Наименование»; Запрос.УстановитьПараметр(«Наименование», ИмяРеквизита); Запрос.УстановитьПараметр(«Ссылка», Набор); Запрос.УстановитьПараметр(«ПустойНабор», Справочники.НаборыДополнительныхРеквизитовИСведений.ПустаяСсылка()); РезультатЗапроса = Запрос.Выполнить(); Выб = РезультатЗапроса.Выбрать(); Если Выб.Следующий() тогда ИмяУникальнаяЧасть = СтрЗаменить(ВРег(Строка(Выб.Набор.УникальныйИдентификатор())), «-«, «x») + «_» + СтрЗаменить(ВРег(Строка(Выб.Свойство.УникальныйИдентификатор())), «-«, «x»); Результат = «ДополнительныйРеквизитЗначение_» + ИмяУникальнаяЧасть; КонецЕсли; Возврат Результат; КонецФункции |
После того как по уникальному имени получили ссылку на поле формы, устанавливаем для него маску ввода, а так же назначаем обработчик ПриИзменении для проверки корректности ввода СНИЛСа (об этом ниже). После внесения этих дополнений, значение СНИЛСа на форме должно вводиться по маске как показано на картинке ниже:
Маска для поля СНИЛС
Подключаем обработчик события для дополнительного реквизита
Для проверки корректности ввода СНИЛС используем типовую функцию из 1С:ЗУП. Поместим данную функцию в наш общий модуль маг_РаботаСДокументами. Ниже сама функция:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 |
Функция СтраховойНомерПФРСоответствуетТребованиям(СтраховойНомер) Экспорт Результат = Истина; СтрокаЦифр=СтрЗаменить(Лев(СтраховойНомер,11),«-«,«»); Если ПустаяСтрока(СтрокаЦифр) Тогда Возврат Ложь; КонецЕсли; Попытка П1 = Число(СтрокаЦифр); КонтрольноеЧисло=Число(Прав(СтраховойНомер,2)); Исключение Возврат Ложь; КонецПопытки; Если Число(Лев(СтрокаЦифр,9)) > 1001998 Тогда Всего=0; Для Сч = 1 По 9 Цикл Всего=Всего+Число(Сред(СтрокаЦифр,10—Сч,1))*Сч КонецЦикла; Остаток=Всего%101; Остаток=?(Остаток=100,0,Остаток); Если Остаток<>КонтрольноеЧисло Тогда Результат = Ложь; КонецЕсли; Иначе Результат = Ложь; КонецЕсли; Возврат Результат; КонецФункции |
Помните, мы программно назначили обработчик на поле дополнительного реквизита. Теперь добавим саму процедуру для обработчика ПриИзменении в модуль формы элемента справочника «ВнтуренниеДокументы»:
|
&НаКлиенте Процедура маг_СНИЛСПриИзменении(Элемент) Если НЕ маг_РаботаСДокументами.СтраховойНомерПФРСоответствуетТребованиям(Элемент.ТекстРедактирования) тогда ПоказатьПредупреждение(,«СНИЛС указан неверно!!!»); КонецЕсли; КонецПроцедуры |
Теперь, если пользователь ошибется при вводе СНИЛСа, то система предупредит его и выдаст сообщение о некорректном значении:
Предупреждение
Итоги
После небольших изменений в программе, поведение нашего дополнительного реквизита стало более дружелюбным к пользователю. Теперь при заполнении поля СНИЛСа легче визуально контролировать его правильность за счет маски ввода. Кроме того, даже если если пользователь ошибется при вводе, программа предупредит его об этом.
Показывать по
10
20
40
сообщений
Новая тема
Ответить
Lubanya
Дата регистрации: 20.05.2008
Сообщений: 30
«Здравствуйте! У меня такая проблема: Счет-фактура заполняется на основании какого-либо документа, и имеет 2 печатные формы. Одна форма распечатывается, а другая выдает ошибку:<br><br>СуммаДок = Док.Итог(«Всего»);<br>{Документ.СчетФактура.Форма.Модуль(104)}: Неверное имя реквизита!<br><br><br>Процедура НомерПП() <br> Док = ДокументОснование;<br> СтрПП = «»»»;<br> БухИт = СоздатьОбъект(«БухгалтерскиеИтоги»); <br> СуммаДок = Док.Итог(«Всего»); — — — — — — — — — — -104 строка <br> Док.Операция.ВыбратьПроводки();<br> Пока Док.Операция.ПолучитьПроводку()=1 Цикл<br> Если ((Док.Операция.Дебет.Счет = СчетПоКоду………<br><br>Изредка вылезала ошибка в 105 строке, но потом куда-то изчезла. <br>Я добавила н форму счета-фактуры новый реквизит СуммаДок — для проверки (строка), и как оказалось там где заполняется этот реквизит — проблем нет, все печатается, а там где нет — выдает выше сказаную ошибку. <br><br><br>Бухи говорят, что раньше все было нормально, все печаталось, а почему перестало, никто не знает. <br><br>Подскажите, пожалуйта, в каком документе неверное имя реквизита, и что вообще это значит?<br>Заранее всем большое спасибо!»
creative
Дата регистрации: 24.07.2007
Сообщений: 787
если печатная форма вызывается не из встроенной таблицы а как внешняя, то проблема скорее всего именно в этом.<br>в один момент при обновлении конфигурации произошли изменения в алгоритмах вывода на печать. а внешняя форма работает по старому. обычно это происходит с печатными формами подключёнными не как mxl таблица а как внешняя обработка печати.<br><br>ничего страшного, исправляйте ручками.
Lubanya
Дата регистрации: 20.05.2008
Сообщений: 30
Скорее всего она встроенная. Имеется отдельная закладка (слой)с таблицей. Видимо реквизит там не совпадает он называется «Всего» , а не «СуммаДок» или же он и идет (Док.Итог(«Всего»))?Я запуталась. Получается мне из таблицы тянуть надо или нет?
Денис (САМАРА)
Дата регистрации: 09.04.2008
Сообщений: 8351
Если говорить более конкретно, то в ДокументеОсновании нет такого реквизита «Всего», по которому можно посчитать итог. При печати из какого документа выдает ошибку?
Lubanya
Дата регистрации: 20.05.2008
Сообщений: 30
Это был приходный кассовый ордер. 
Все проблема решена, я все нашла и поняла. Спасибо огромное!
Показывать по
10
20
40
сообщений
Данные объекта (редактор реквизитов справочников, документов) (нормальный и «управляемый» интерфейсы)
25.10.2017
Быстрый просмотр любого объекта (элемента справочника, документа) в базе, пореквизитное сравнение двух объектов одного типа, редактирование. Для нормального и «управляемого» интерфейсов.
Данные объекта (текущая версия 1.09/1.12)
Обработка показывает все реквизиты выбранного объекта, позволяет их редактировать, а также сравнить два объекта одного типа.
Обработка очень полезна, например, в таких случаях:
-
новая конфигурация, надо быстро разобраться
-
обновился релиз и в документе появился новый реквизит (причем на форме его нет). Для вновь вводимых документов он устанавливается при их создании, а про старые естественно забыли. Что выражается в том, что два одинаковых документа дают разные проводки 🙁
-
содержимое поля не помещается в выделенное ему на форме место, а надо просмотреть его полностью
-
надо перейти к связанной с объектом информации (например, открыть указанную в накладной серию номенклатуры) а это поле недоступно (т.е. ни кнопки с точками или лупой ни F4) (разработчики часто вместо «ТолькоПросмотр» устанавливают недоступность))
Отличительными особенностями являются:
-
очень просто использовать:
- в нормальном интерфейсе в интересующем Вас объекте нажмите кнопку «Печать» и выберите «Данные объекта»
- в управляемом интерфейсе в интересующем Вас объекте нажмите кнопку «Заполнить» и выберите «Данные объекта». Для сравнения двух объектов выделите их оба в списке (удерживайте клавишу Ctrl при кликании мышкой), нажмите «Заполнить» и выберите «Данные объекта
- вывод всех реквизитов как ссылок, это позволяет быстро в любой связанный объект
-
возможность записи в режиме «обмен данными — загрузка»
- НОВОЕ! в версии под управляемый интерфейс сравнение объектов можно осуществить просто выбрав в списке два объекта (старый режим выбора объектов для сравнения тоже работает)
Текущая версия: 1.09 для обычного интерфеса и 1.12 для управляемого
Последние изменения:
- в версии «управляемый» интерфейс обеспечена совместимость с новыми релизами типовой бухгалтерии, УНФ
- исправлена ошибка (не сохранялся реквизит табличной части, если он имел такое же имя как и реквизит шапки)
Для обновления этой же обработки (только нормальный интерфейс!) предыдущей версии, установленной в справочнике внешних обработок (печатных форм)
Откройте обработку, она сама проверит где какая версия, и если определит, что у Вас стоит более старая — предложит провести обновление. Для обновления следуйте инструкциям на экране (там все очень просто: нажать кнопку «Установка», выбрать «Обновить обработку в базе», нажать кнопку «Выполнить»)
Для установки / обновления версии под управляемый интерфейс откройте замените на новую версию обработку в справочнкие дополнительных отчетов и обработок. В качестве назначения укажите все справочники и документы которые будут доступны для отметки.