Управляемое приложение.
Есть ОбщийМодуль, где должна происходить проверка заполненности элементов формы (ПолеВвода, Полевыбора). Т.е. по нажатию некоторой кнопки в форме должна вызваться функция общего модуля, которая вернет Истина, если все элементы заполнены.
Как это сделать?
Как вообще можно достать значение Элемента?

В Элементах, если что, указаны РЕКВИЗИТЫ.

Курим ПроверитьЗаполнение, Обработку проверки заполнения и различные свойства на реквизитах

Ну вот, например, у меня есть два реквизита формы: Контрагент (справочник.Контрагенты) и Примечание (Строка 100)

И на форме два элемента: ИмяКонтрагента (ПутькДанным = Контрагент.Наименование) и Примечание (ПутьКДанным = Примечание).
В общий модуль я могу форму (ЭтаФорма). Как поступать дальше? Что я там смогу с этим сделать?

(2) Хочется сделать универсально, т.е. чтобы это работало для любой формы, просто добавив вызов функции общего модуля. А так придется писать "ОбработкаПроверкиЗаполнения" в каждой форме

(4) а зачем писать "в каждой форме" ? у тебя какая-то нестандартная обработка проверки заполнения? Просто протыкал в конфигураторе нужные реквизиты, свойство "проверка заполнения - выдавать ошибку", и все.

(5) Тут немного другой механизм предполагается.
Один СуперПользователь (Администратор, например). Заполняет отмечает галочками те элементы формы и сохраняет эти настройки. Далее остальные пользователи работают уже на основе этих данных. Если какому-то элементу формы админ проставил обязательность заполнения, то они должны его заполнить.

Если Не ЗначениеЗаполнено(Объект.Ссылка) Тогда

(6) и чО? Для проверки заполнения событие имеется.

(8) по примеру из (3) я должен буду написать примерно такое:


Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)
 Если Не ЗначениеЗаполнено(Контрагент.Наименование) Тогда
   Сообщить("Не заполнено имя контра!");
 КонецЕсли

 Если Не ЗначениеЗаполнено(Примечание) Тогда
   Сообщить("Не заполнено примечание!");
 КонецЕсли
КонецПроцедуры

Так?
Я же не хочу писать один и тот же код во всех формах, а хочу вызвать так:
МойОбщийМодуль.ПроверитьЗаполненностьРеквизитов( ПроверяемаяФорма, СписокПроверяемыхПолей);

(7) это к чему?

(9) Нет. Такого писать не надо.
"Я же не хочу писать один и тот же код во всех формах, а хочу вызвать так" - покажи пальцем - кто тебе мешает?

(11)
В этом общем модуле пишем:
&НаКлиенте
Функция ПроверитьЗаполненностьРеквизитов( ПроверяемаяФорма, СписокПроверяемыхПолей)
   Для каждого текИмяПроверяемогоЭлемента Из СписокПроверяемыхПолей Цикл
       текЭлемент = ПроверяемаяФорма.Элементы[текИмяПроверяемогоЭлемента.Значение];
       //!!! КАК кот тут проверить заполненность?
   КонецЦикла;
КонецФункции

(12)
а НЕ ЗначениеЗаполнено(текЭлемент) не канает?

текЭлемент - это Элемент (не реквизит) формы, поэтому нет, не канает.

(12) "СписокПроверяемыхПолей" - тебя ни на какие мысли не наводит?
И в общих модулях &НаКлиенте, &НаСервере и прочее - не используется.

(14) а ты пробовал? сейчас лень проверять, но вроде как этот метод проверяет любое не мутабельное значение.

(16) ЗначениеЗаполнено(ПолеВвода)? И что ж оно должно сообщить?

(15) а на что может натолкнуть "СписокПроверяемыхПолей"? Честно, не понимаю. Там хранятся строки - имена элементов формы. И все.

А НаСервере и НаКлиенте в общих модулях используется, если стоят галки "Клиент" и "Сервер" (у меня именно такой)

(16) а это как раз-таки и есть мутабельное значение. Сейчас попробовал.

(18) ЗАБУДЬ, пеляйт, про элементы формы. Нет их, не существует, пеляйт. Там хранятся имена РЕКВИЗИТОВ (еще раз обрати, пеляйт, внимание - НЕ ЭЛЕМЕНТОВ, а РЕКВИЗИТОВ) для проверки. Есть элемент в этом массиве - реквизит (не элемент формы, ты помнишь, да?) будет проверяться. нет элемента - не будет. Дальше сам додумаешься?

(20) не так он не поймет надо носом ткнуть)))
sbabay убери в (12) точку и слово "Элементы"

Давайте еще раз.
Есть обработка, в которой должно происходить проверка заполнения. У этой формы есть два реквизита:  Контрагент (справочник.Контрагенты) и Примечание (Строка 100)

И на форме два элемента: ИмяКонтрагента (ПутькДанным = Контрагент.Наименование) и Примечание (ПутьКДанным = Примечание).


После того как админ установил обязательность заполнения элементов, сохранился СписокПроверяемыхПолей, который состоит из 2-х элементов-строк: "ИмяКонтрагента" и "Примечание"

Теперь в общем модуле вы советуете сделать проверку вот так:
&НаКлиенте
Функция ПроверитьЗаполненностьРеквизитов( ПроверяемаяФорма, СписокПроверяемыхПолей)
   Для каждого текИмяПроверяемогоЭлемента Из СписокПроверяемыхПолей Цикл
       Если НЕ ЗначениеЗаполнено(пФорма[текЭлемент.текИмяПроверяемогоЭлемента.Значение]) Тогда
Сообщить("Не заполнено!")
КонецЕсли;
КонецЦикла;
КонецФункции

Но такое пройдет только для "Примечания", для элемента "ИмяКонтрагента" такое не пройдет, т.к. данные хранятся в реквизите "Контрагент.Наименование"

(20) Я кажется понял, что ты имеешь ввиду.
Если я буду использовать:

Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)


то про "ПроверяемыеРеквизиты" откуда у меня возьмутся? У меня есть только то, что заполнил СуперПользователь - а он отметил те ЭЛЕМЕНТЫ формы, которые должны быть заполнены.

(21) Да, ткни, пожалуйста.

(24) данные храняться в реквизите Контрагент, а если у тебя элемент формы ИмяКонтрагента связан с Контрагент.Наименование то пользователь все равно его ввести не может.

Короче тыкаю пальцем. В модуле формы

&НаКлиенте
Процедура ПередЗакрытием(Отказ, СтандартнаяОбработка)
   МассивРеквизитов = Новый Массив;
   МассивРеквизитов.Добавить(Реквизит1);
   МассивРеквизитов.Добавить(Объект.Клиент);
   РаботаСДокументами.ПроверкаЗаполнения(МассивРеквизитов,Отказ);
КонецПроцедуры

В общем модуле
Процедура ПроверкаЗаполнения СтруктураРеквизитов,Отказ)Экспорт
   Для каждого элемент из Структурареквизитов Цикл
   Если НЕ ЗначениеЗаполнено(элемент) тогда
       Отказ = Истина;
   КонецЕсли;
   КонецЦикла
   
КонецПроцедуры

Короче форму даже передавать не надо, простопередаешь список реквизитов

(25) Почему это не сможет ввести ИмяКонтрагента?
Контрагент - основной реквизит обработки. Я раскрываю это дерево и перетаскиваю в элементы формы "Контрагент.Наименование" и обзываю его "ИмяКонтрагента"

Про твой код. И где тут универсальность? Я ж говорил, что у меня есть только список Имен элементов. Как на основе этого напишу:
МассивРеквизитов.Добавить(Объект.Клиент);
?

(26) ты пробовар редактировать ИмяКонтрагента в режиме предприятия? только убедись что в свойствах, путь к данным у тебя именно Объект.Контрагент.наименование.

Я твоей структуры не знаю, в каком виде у тебя храниться список? Но блин неужли не сообразишь,
да хотя бы если у тебя хранится только наименование реквизита, то используй
Выполнить("МассивРеквизитов.Добавить("+ИмяТвоегоРеквизита+");"

+ (27)в конце еще );

Я так и не понял зачем САМОМУ проверять заполнение реквизитов.

УправляемаяФорма (ManagedForm)
ПроверитьЗаполнение (FillCheck)
Синтаксис:

ПроверитьЗаполнение()
Возвращаемое значение:

Тип: Булево. Истина - ошибок не обнаружено, Ложь - в противном случае.
Описание:

Проверяет заполнение реквизитов. Для реквизитов, у которых свойство "Проверка заполнения" установлено в значение "Показывать ошибку" и реквизит не заполнен, будет сформировано сообщение об ошибке.

Доступность:

Тонкий клиент, веб-клиент, сервер, толстый клиент.
Вызов метода выполняет обращение к серверу.

Примечание:

Выполнение метода приводит к возникновению события ОбработкаПроверкиЗаполненияНаСервере.

Но правильнее вызывать проверку объекта, а не формы

(29) для этого надо в конфигураторе проставлять "Показывать ошибку" в реквизитах формы. К тому же к полю, путь к данным которого = "Контрагент.Наименование" так не подступишься, не залазея в справочник "Контрагенты".


Вот сделал обработку для УТ 11 с 3 реквизитами на форме и парой  строк кода. http://webfile.ru/5298763
Как проверить хотя бы в этой форме, зная только имена элементов?

+(29) обязательный реквизит или нет будут решать СуперПользователи в режиме предприятия

(31) В чем проблема програмно проставить флаг у реквизитов?

(33) Как для элемента "ИмяКонтрагента" это сделать? (путьКДанным = "Контрагент.Наименование")

(33) и гендира обучать как эти флажки ставить-снимать?

(34) а не проще в контрагенте проверять заполненность этого поля?

(35) ну не ген. дир, а админ
(36) нет. Некоторым обязательные поля - одни, другим - другие.

Почему бы не заполнять 'СписокПроверяемыхПолей' не именами полей, а строковыми представлениями данных?
Например поле: 'Наименование' (Путь к данным: "Контрагент.Наименование"). Тогда проверять что-то типа: Если ЗначениеЗаполнено("Контрагент.Наименование") Тогда ....

(38) не трать силы, ему это твердят почти с самого начала.

(39) в посте (31) я положил обработку для УТ. там 6 строчек кода. Можешь подсказать как и что мне надо поменять? Крайне желательно делать всё без "Выполнить".

&НаКлиенте
Процедура Проверить(Команда)
   МассивПроверяемыхЭлементов = Новый Массив;
   МассивПроверяемыхЭлементов.Добавить("Примечание");
   МассивПроверяемыхЭлементов.Добавить("Контрагент.Наименование");
   
   ПроверитьСервер(МассивПроверяемыхЭлементов);
КонецПроцедуры

&НаСервере
Процедура ПроверитьСервер(МассивПроверяемыхЭлементов)
   Для каждого элПроверки Из МассивПроверяемыхЭлементов Цикл
       Если НЕ ЗначениеЗаполнено(ЭлПроверки) тогда
           Сообщить("Не заполнено поле!!!");
       КонецЕсли;
       КонецЦикла;
КонецПроцедуры    //ПроверитьСервер

(41) порадовал =)

(41) Брехня

мляяяяя в массив передавать без кавычек

(41) И при каких условиях у тебя выйдет сообщение?

(42) (43) ошибка не моя, просто не проверил сразу

(45) возьми да попробуй, сообщение выходит если тыоставишь пустым ИмяКонтрагента и Примечание

+(47) или только пробелами заполнишь

(46) у вас там разделение обязанностей? =) один форум читает, другой ответы ищет? =))

(44), (46)
Да, если передавать не строки, то всё пройдет нормально. Но я не знаю как их достать именно в таком виде.

Как происходит установка СуперПользователем обязательных реквизитов. Открывается элемент справочника "НастройкаФормы", там сканируется целевая форма, подтягиваются все элементы формы (ПоляВвода). И Админ напротив каждого ставит галку обязательный или нет.

Потом на основе этих данных и происходит проверка. Т.е. в целевой форме я могу поиметь только ИмяЭлемента и ПутьКДанным - а это строки

(47) В том виде как ты ответил и пробовать не надо. Поэтому и спросил

+ Изначально я так и описывал свою проблему. На входе имею только имена проверяемых элементов и Форму. Выполняется всё в общем модуле.
Как проверить реквизиты на заполненность я знаю.

Поясни зачем тебе нужно вводить имя контрагент, почему его нельзя выбирать из справочника? Ну мне очень интересно это.

(53) Он типа хочет супер мега универсальную хрень сделать

Которая нах никому не нужна

Что то сомневаюсь я в ее универсальности. Она таки как раз будет совсем не универсальна.

(53) Будет создаваться новый элемент справочника "контрагенты"

Ну так создай новый реквизит ИмяКонтрагента, именно реквизит и присваивай потом Контрагент.Наименование = ИмяКонтрагента. И без проблем проверяй потом Форма["ИмяКонтрагента"].

тебе по любому так делать придется если контрагент у тебя не основной реквизит формы.

У меня как раз-таки Контрагент - основной реквизит формы

Мегаумные модераторы чё-т притихли.
На этом форуме даже у модераторов цель - обос-ать вопрошающего?

(60) у фсех

апну. Может сегодня у кого-нибудь будут новые идеи.