&НаКлиенте
Процедура КлассНомеровКлассНомеровПриИзменении(Элемент)
     Стр = Элементы.КлассНомеров.ТекущиеДанные;
     Стр.Цена = ПолучитьЦенуНомер(Стр.НомерИУслуги);
     Стр.Цена = ПолучитьЦенуУслуги(Стр.НомерИУслуги);
     РасчетСуммыКлассНомеров();
     КонецПроцедуры

&НаСервереБезКонтекста
Функция ПолучитьЦенуНомер    (Номера)

   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    Номера.Цена
       |ИЗ
       |    Справочник.Номера КАК Номера
       |ГДЕ
       |    Ссылка = &Ссылка";

   Запрос.УстановитьПараметр("Ссылка", Номера);
   Результат = Запрос.Выполнить();
   Выборка = Результат.Выбрать();
   Выборка.Следующий();
   Возврат Выборка.Цена;

КонецФункции

&НаСервереБезКонтекста
Функция ПолучитьЦенуУслуги(Услуги)

   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    Цена
       |ИЗ
       |    Справочник.Услуги
       |ГДЕ
       |    Ссылка = &Ссылка";

   Запрос.УстановитьПараметр("Ссылка",Услуги);
   Результат = Запрос.Выполнить();
   Выборка = Результат.Выбрать();
   Выборка.Следующий();
   Возврат Выборка.Цена;

КонецФункции

Так получает только Услуг

&НаКлиенте
Процедура КлассНомеровКлассНомеровПриИзменении(Элемент)
     Стр = Элементы.КлассНомеров.ТекущиеДанные;
    !!! Стр.Цена = ПолучитьЦенуНомер(Стр.НомерИУслуги);
  !!!!   Стр.Цена = ПолучитьЦенуУслуги(Стр.НомерИУслуги);
     РасчетСуммыКлассНомеров();
     КонецПроцедуры

Если поменяю эти две строчки местами тогда Цена Номар

Навер эт воощпе не правильно написано чет я так сейчас понимаю(

ПОМОГИТЕ ПОЖАЛУЙСТА

лошара  Стр.Цена последнее что будет?

намекаю  Стр.Ценаномер и  Стр.Ценауслуга

не понял((

реквизит документа составной Справочник Номера и Услуги

Стр.??.Цена - так?

Если ..... Тогда
Стр.Цена = ПолучитьЦенуНомер(Стр.НомерИУслуги);
Иначе
Стр.Цена = ПолучитьЦенуУслуги(Стр.НомерИУслуги);
КонецЕсли;

Как-то в таком ключе, мне кажется

(10)
так пробовал, не нащел что написать после Если

Если ТипЗнч(Стр.Цена) = Тип("СправочникСсылка.Номера") Тогда
   ...
КонецЕсли;

Спасибо буду шаманить)

Большое!

Если ТипЗнч(Стр.НомерИУслуг) = Тип("СправочникСсылка.Номера")
Вот так получилося!

Ура!