2
withoutname
05.03.20
✎
15:31
|
Всё приходится делать самому )
Создал регистр сведений с 1м Измерение Свойства
Перед типовой проверкой на Аналогичные характеристики проверяю заполненность свойств
Запрос = Новый Запрос;
Запрос.Текст=
"ВЫБРАТЬ
| юскОбязательныеХарактеристики.Свойство
|ИЗ
| РегистрСведений.юскОбязательныеХарактеристики КАК юскОбязательныеХарактеристики";
ТЗОбязательныеСвойства = Запрос.Выполнить().Выгрузить();
Для каждого Строка Из ОбработкаОбъектЗначенияСвойств.СвойстваИЗначения Цикл
Если ТЗОбязательныеСвойства.Найти(Строка.Свойство, "Свойство") = Неопределено Тогда
Продолжить;
КонецЕсли;
Если не ЗначениеЗаполнено(Строка.Значение) Тогда
Сообщить("Свойство """ + Строка.Свойство + """ обязательно к заполнению!", СтатусСообщения.ОченьВажное);
Отказ = Истина;
КонецЕсли;
КонецЦикла;
Если Отказ Тогда
Предупреждение("Некорректное заполнение, прочитайте Служебные сообщения!",, "Ошибка");
Возврат;
КонецЕсли;
|
|