Здравствуйте. Необходимо добавить Ещё несколько колонок(Адрес доставки, юр.адрес и телефон) в форму выбора справочника Контрагенты.

Завел новые реквизиты в справочнике (Адрес доставки, юр.адрес и телефон), добавил колонки в форме выбора(указал соответствующие данные). Пытаюсь вытянуть запросом данные из регистра сведений "КонтактнаяИнформация"(вроде, все данные контрагентов хранятся там) и запихнуть их в "мои" реквизиты в процедуре "ПередЗаписью".

Код:


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

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





В отладчике наблюдаю следующее: в цикл не попадает(Выборка.Следующий() = Ложь ), пробовал вместо цикла сделать условие(Если Выборка.Следующий()) - то же самое.

Помогите разобраться. Заранее благодарен.

Подход не правильный, выводи данные в событии "ПриПолученииДанных"

(1) Спасибо за совет. А с процедурой что не так?

"Запрос.УстановитьПараметр("Объект", ЭтотОбъект.Наименование);"
тут фигня

(3) Понял вас. А как должно быть по науке?)

Ссылка

там ссылка на объект должна быть
ты же кодер ? думай

(0) Эм....
Это что, отдельный запрос для каждого контрагента на форме выбора?

(7) Нет. Запрос выполняется в контексте основной формы объекта.

(6) Я очень-очень-очень начинающий(возможно пока ещё быдло)кодер:)

(9)
ну вот как раз носом в то что ... написал
самое то , все проходили это
читай книги
на форуме меньше болтай

(10)Спасибо за всё. Буду стараться:)

(11)
поставь точку останова
посмотри где можно зацепить справочник.контрагент.ссылка
или возможно физлицо.ссылка
надо в конфу смотреть

табло есть оно все расскажет

Так и не заработало. Что не так сделал с параметром "тип"?

(Запрос.УстановитьПараметр("Тип", );). Код:

Процедура ВывестиАдресаИТелефоны()
    

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

(14) потому что вот это не верно
  Запрос.УстановитьПараметр("Тип", РегистрыСведений.КонтактнаяИнформация.Тип);

тип это справочник контактнаяинформация.

(15) Сделал вот так


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



      Результат = Запрос.Выполнить();
    Выборка = Результат.Выбрать();
    
Пока Выборка.Следующий() Цикл    
            
    ЭтотОбъект.АдресДоставки = Выборка.Представление;
    ЭтотОбъект.ЮридическийАдрес = Выборка.Представление;
    ЭтотОбъект.Телефон = Выборка.Представление;


        
КонецЦикла;


Во все 3 реквизита запихивает телефон. И, что самое страшное, в колонках на форме ничего не появляется

(16) Кажись, доперло...Я же каждый раз по новой устанво\ливаю параметр. Попробую с помощью массива передать 3 параметра сразу.