&НаКлиенте
Процедура ОткрытьЗаписьЗвонкаНажатие(Элемент)
  
  Ключ = КлючЗаписиРазговоров(Объект.ИдентификаторЗвонка);
  
  Если Ключ = Неопределено Тогда
    
    ПоказатьПредупреждение(, "Не удалось найти запись звонка!");
    Возврат;
    
  КонецЕсли;
  
  ОткрытьФорму("РегистрСведений.sip_ЗаписиРазговоров.ФормаЗаписи", Новый Структура("Ключ", Ключ));
  
КонецПроцедуры

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