19 lines
1.4 KiB
Plaintext
19 lines
1.4 KiB
Plaintext
@Обработчик
|
||
метод ПередЗаписьюОбъекта()
|
||
пер ПоляНеЗаполнены: Булево
|
||
если Объект.Наименование.Сократить().Пусто()
|
||
Компоненты.ПолеВводаНаименование.РезультатПроверкиДанных = РезультатПроверкиДанных.Ошибка
|
||
ПоляНеЗаполнены = Истина
|
||
иначе
|
||
Компоненты.ПолеВводаНаименование.РезультатПроверкиДанных = РезультатПроверкиДанных.Отсутствует
|
||
;
|
||
если Объект.Код.Сократить().Пусто()
|
||
Компоненты.ПолеВводаКод.РезультатПроверкиДанных = РезультатПроверкиДанных.Ошибка
|
||
ПоляНеЗаполнены = Истина
|
||
иначе
|
||
Компоненты.ПолеВводаКод.РезультатПроверкиДанных = РезультатПроверкиДанных.Отсутствует
|
||
;
|
||
если ПоляНеЗаполнены
|
||
выбросить новый ИсключениеВалидации("Не заполнены обязательные поля", ОтображатьСообщениеОбОшибке = Ложь)
|
||
;
|
||
; |