Выборка = Справочники.ЕдиницыИзмерения.Выбрать( , Владелец); 
КоличествоЭлементов = 0; 
Пока Выборка.Следующий() Цикл 
    КоличествоЭлементов = КоличествоЭлементов + 1; 
КонецЦикла; Запрос = Новый Запрос; 
Запрос.Текст = "ВЫБРАТЬ 
|       КОЛИЧЕСТВО(*) КАК КоличествоЗаписей 
|ИЗ 
|     Справочник.ЕдиницыИзмерения КАК ЕдиницыИзмерения 
|ГДЕ 
|       ЕдиницыИзмерения.Владелец = &Владелец"; 
Запрос.УстановитьПараметр("Владелец", Владелец); 
Выборка = Запрос.Выполнить().Выбрать(); 
Если Выборка.Следующий() Тогда 
     КоличествоЗаписей = Выборка.КоличествоЗаписей; 
КонецЕсли;