Здравствуйте
УФ
Модуль объекта.
Шапка; СчетЗатрат, при выборе активизируются субконто (Субконто1, Субконто 2 и т.д.) в зависимости от счета. Хочу в процедуре ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)сделать проверку, если субконто не заполнено, то отказ.
Когда субконто актизизируется от имеет ДОСТУПНОСТЬ = Истина

Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты).
          
Если НЕ ЗначениеЗаполнено(СчетЗатрат) ????  Тогда
        
МассивНепроверяемыхРеквизитов = Новый Массив;
МассивНепроверяемыхРеквизитов.Добавить("СчетЗатрат");
МассивНепроверяемыхРеквизитов.Добавить("Субконто1");
МассивНепроверяемыхРеквизитов.Добавить("Субконто2");
МассивНепроверяемыхРеквизитов.Добавить("Субконто3");
МассивНепроверяемыхРеквизитов.Добавить("Субконто4");
УправлениеПроверками.УдалитьНепроверяемыеРеквизитыИзМассива(ПроверяемыеРеквизиты, МассивНепроверяемыхРеквизитов);
        
    КонецЕсли;
    
КонецПроцедуры

не возражаю

Как подступить к Элементы из модуля Объекта

(2) нафига тебе элементы? у тебя есть объект

Через объект КАК? Доступность у его нет.

+(3) объект видит только данные, а где они сидят ему по-барабану - циничный игнор

Можте другой подход есть?

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

(7) Вот и думаю, что надо разбивать проверку на две или только в модуле формы, а хотелось бы в модуле объекта.

(8) ну напрямую к реквизитам объекта обращаться. Вы же сами написали

ЗначениеЗаполнено(СчетЗатрат)

СчетЗатрат это реквизит объекта.

СчетЗатрат это проверяет заполнеение реквизита,
Если счет затрат на ЗАПОЛНЕН, то и проверять нечего все субконто недоступны

(10) ну и что вас не устраивает в этой проверке?

Она не может правильно работать.
т.е сохрнанять документ можно с пустыми субконто.

(12) ну так напишите Отказ = Истина; ничего и не сохранится

Если счетЗатрат пустой, тогда можно сохранять,
А если заполнен надо проверить субконто и потом принять решение сохранять или нет.

ПОЗВОЛЮ ПРОДОЛЖИТЬ ТЕМУ
проверку перенес в модуль формы

ВАРИАНТ №1 Все работает
&НаСервере
Процедура ОбработкаПроверкиЗаполненияНаСервере(Отказ, ПроверяемыеРеквизиты)

Если ЗначениеЗаполнено(Объект.СчетЗатрат) Тогда
    Если Элементы.Субконто1.Доступность = Истина
        И НЕ ЗначениеЗаполнено(Объект.Субконто1) Тогда
        ТекстСообщения = НСтр("ru='Не заполнено СУБКОНТО 1 !!!'");
        ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстСообщения);
        Отказ = Истина;
    КонецЕсли;
        
    Если Элементы.Субконто2.Доступность = Истина
        И НЕ ЗначениеЗаполнено(Объект.Субконто2) Тогда
        ТекстСообщения = НСтр("ru='Не заполнено СУБКОНТО 2 !!!'");
        ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстСообщения);
        Отказ = Истина;
    КонецЕсли;
        
    ..... и так для всех субконто
КонецЕсли;

КонецПроцедуры

ВАРИАНТ №2
Хочу переделать через МАССИВ. Не могу разобраться.
МассивНепроверяемыхРеквизитов - Определяется правильно
ПроверяемыеРеквизиты - это Объект, строка ??? Как их получить???
Что не так?

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

Если ЗначениеЗаполнено(Объект.СчетЗатрат) Тогда
        
    МассивНепроверяемыхРеквизитов = Новый Массив;
            
    Если Элементы.Субконто1.Доступность = Ложь
        И НЕ ЗначениеЗаполнено(Объект.Субконто1) Тогда
                    
        МассивНепроверяемыхРеквизитов.Добавить("Субконто1");
    КонецЕсли;
        
    Если Элементы.Субконто2.Доступность = Ложь
        И НЕ ЗначениеЗаполнено(Объект.Субконто2) Тогда
                        
        МассивНепроверяемыхРеквизитов.Добавить("Субконто2");
    КонецЕсли;

    УправлениеПроверками.УдалитьНепроверяемыеРеквизитыИзМассива(ПроверяемыеРеквизиты, МассивНепроверяемыхРеквизитов);
        
        
/// ????
Если НЕ ЗначениеЗаполнено(ПроверяемыеРеквизиты) Тогда
    Отказ = Истина;
КонецЕсли;

КонецПроцедуры

Неужели никто на сталикался

СтруктураСубконто = Новый Структура;

СтруктураСубконто.Вставить("Субконто1", Объект.Субконто1);
СтруктураСубконто.Вставить("Субконто2", Объект.Субконто2);
СтруктураСубконто.Вставить("Субконто3", Объект.Субконто3);

Для каждого ЭлементСтруктуры Из СтруктураСубконто Цикл
    // ...какие-то условия
    // ЗначениеЗаполнено(Объект[ЭлементСтруктуры.Ключ])
    // Элементы[ЭлементСтруктуры.Ключ].Доступность = Истина
    
    // ...какие-то действия

КонецЦикла;

Хорошо через структуру попробую позже. Мне интересно печему на работает через массив. И нете чатал про проблему, но ответан на ее на нашел.

Наверное тебе нужно так:

Если ЗначениеЗаполнено(Объект.СчетЗатрат) Тогда
    МассивНепроверяемыхРеквизитов = Новый Массив;
    Для Сч = Объект.СчетЗатрат.ВидыСубконто.Количество() По Объект.СчетЗатрат.Метаданные().МаксКоличествоСубконто Цикл
         МассивНепроверяемыхРеквизитов.Добавить("Субконто" + Формат(Сч,"ЧН=; ЧГ="));
    КонецЦикла;
КонецЕсли;

С тебя 300 рублев :)

(20) Возьми у мамы.

(21) Умно

(19) Ну да тоже так можно, более понятным будет алгоритм. при систематизации восползуюсь