Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 19:06

Номер телефона

Автор dronspartak9@gmail.com, 06 мая 2014, 10:17

0 Пользователей и 1 гость просматривают эту тему.

dronspartak9@gmail.com

Подскажите как вызвать эту процедуру для получения телефона физического лица:
Функция ПолучитьТелефонИзКонтактнойИнформации(Объект, ВидТелефона = Неопределено) Экспорт    // change

   Если ВидТелефона = Неопределено Тогда
      ВидТелефона = Справочники.ВидыКонтактнойИнформации.ТелефонОрганизации;
   КонецЕсли;

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

КонецФункции // ПолучитьТелефонИзКонтактнойИнформации()

cska-fanat-kz

ТелефонФизЛица = ПолучитьТелефонИзКонтактнойИнформации(Справочники.ФизическиеЛица.НайтиПоНаименованию("Пупкин", Истина), Справочники.ВидыКонтактнойИнформации.ТелефонМобильный);
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

dronspartak9@gmail.com


Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск