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