1С 8.x : Реквизит ~ Проверка на заполненность реквизитов формы, с признаком АвтоОтметкаНезаполненного

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