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