Есть способы поинтереснее перебора реквизитов?

то есть у документа.

только неинтересные

(2)слушаю

(3) перебором всех реквизитов

)))

ПроверяемыйТип = Тип("Строка");
   Реквизиты = Метаданные.Документы.ПоступлениеТоваровУслуг.Реквизиты;
   Для каждого Реквизит Из Реквизиты Цикл
       Если Реквизит.Тип.СодержитТип(ПроверяемыйТип) Тогда
           
       КонецЕсли;
   КонецЦикла;

(5) я знаю - ты хотел поинтересней ... но не получилось