&НаКлиенте
Процедура КомплектующиеПриИзменении(Элемент,СчетУчета1,Номенклатура1)
   Строка = Элементы.Комплектующие.ТекущиеДанные;
   СчетУчета1=Строка.СчетУчета;
   Номенклатура1=Строка.Номенклатура;  //Как передать?
   Количество1=Строка.Количество;      //
   СебестоимостьСписания = ВыполнениеЗапросаПоСчету();
   Строка.Себестоимость =  СебестоимостьСписания ;
   КонецПроцедуры


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

Результат=Запрос.Выполнить();                    
ВыборкаПоСчету = Результат.Выбрать();
 пока ВыборкаПоСчету.Следующий()цикл
СуммаКСписанию=Результат.СуммаОстаток/Результат.КоличествоОстаток;
     
КонецЦикла;      
         
Возврат СуммаКСписанию;
     
КонецФункции

(0) Добавить параметр в функцию и вызывать её, передавая значение этого параметра.

Спасибо. Получилось.