Есть стандартный метод ПроверитьЗаполнение(). Если у нужных реквизитов установить признак "Проверка заполнения" = "Выдавать ошибку", то можно использовать функцию ПроверитьЗаполнение() для формы обработки. Метод проверяет как реквизиты формы, так и реквизиты обработки.
Пример использования
РезультатЗаполнения = ЭтаФорма.ПроверитьЗаполнение();
Если требуется сразу проверить заполнение нескольких реквизитов на форме не обращая внимания на свойство "Проверка заполнения", то можно использовать эту процедуру (ниже).
Используется БСП. Если в базе БСП нет, то "ОбщегоНазначенияКлиентСервер.СообщитьПользователю" надо заменить на код вывода сообщения.
Входной параметр типа строка, в который надо передать имена реквизитов через запятую. Допускается наличие пробелов после запятой
// <Описание функции>
//
// Параметры:
// СписокПараметров - Строка - Список реквизитов формы для проверки через запятую
//
// Возвращаемое значение:
// Тип булево - Если все параметры заполнены, то Истина, иначе ложь
//
&НаСервере
Функция ПараметрыЗаполнены(СписокРеквизитов)
Перем Результат;
Результат = истина;
МассивИменРеквизитов = СтрРазделить(СписокРеквизитов,", ",Ложь);
МассивРеквизитов = ЭтотОбъект.ПолучитьРеквизиты();
Для Каждого Реквизит Из МассивРеквизитов Цикл
Если МассивИменРеквизитов.Найти(Реквизит.Имя) <> Неопределено Тогда
Если Не ЗначениеЗаполнено(ЭтотОбъект[Реквизит.Имя]) Тогда
ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Значение """ + Реквизит.Заголовок + """ должно быть заполнено",, Реквизит.Имя);
Результат = ложь;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Возврат Результат;
КонецФункции
|