Запрос к регистру сведений, не могу вытащить данные

[djvjv]

Надо вытащить из регистра сведений телефон контрагента. 
В регистре: Обьект-организация, Вид-телефон, адрес и т.д. контрагента, Представление-номер телефона, адрес и т.д.   Конфа УТ 10.3.

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

[djvjv]

Помогите, а то у меня эта задача мертвым грузом повисла!

[Salmishskay2516]

Что именно не получается?

[djvjv]

Спасибо за внимание. Я сам сделал.
Интересовало что у меня не получается:
смотрите 1-ый вариант кода выше
2-й что получилось и заработало:
Запрос = Новый Запрос;
      Запрос.Текст = "ВЫБРАТЬ
                  |   КонтактнаяИнформация.Поле3
                  |ИЗ
                  |   РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация";
      Результат = Запрос.Выполнить();
      Выборка = Результат.Выбрать();
      Пока Выборка.Следующий() Цикл
         ОбластьМакета.Параметры.Телефон = Выборка.Поле3;
      КонецЦикла;

[cska-fanat-kz]

а где отбор по объекту?
где отбор по типу?

перебирается весь регистр чтобы вывести в макет последнее значение из Поле3!
жееееесть!

[djvjv]

а где отбор по объекту?
где отбор по типу?

перебирается весь регистр чтобы вывести в макет последнее значение из Поле3!
жееееесть!

а как правильнее код выглядет будет?

Добавлено: 05 дек 2012, 12:28

а где отбор по объекту?
где отбор по типу?

перебирается весь регистр чтобы вывести в макет последнее значение из Поле3!
жееееесть!

а как правильнее код выглядет будет?

И я еще добалю что значений параметров объект и тип у меня не задано. Теперь жду отредактированный код правильный. Спасибо.

Добавлено: 05 дек 2012, 12:54

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

[Slin]

Пока Выборка.Следующий() Цикл
         ОбластьМакета.Параметры.Телефон = Выборка.Поле3;
      КонецЦикла;

лучше будет

Код Выделить Развернуть

Если Выборка.Следующий() Тогда
     ОбластьМакета.Параметры.Телефон = Выборка.Поле3;
КонецЕсли;

[djvjv]

Пока Выборка.Следующий() Цикл
         ОбластьМакета.Параметры.Телефон = Выборка.Поле3;
      КонецЦикла;

лучше будет

Код Выделить Развернуть

Если Выборка.Следующий() Тогда
     ОбластьМакета.Параметры.Телефон = Выборка.Поле3;
КонецЕсли;

В моем случае просто всегда телефон будет. Моя база самописная, делаю на основе УТ 10.3. Так сказать учусь азам программирования.