1с 8.2. Мне понадобилось создать сводку по договорам между организацией и несколькими клиентами. За основу просто взял документ АктСверкиВзаиморасчетов из стандартной конфигурации. В табличную часть ПодДаннымОрганизации добавил реквизит Контрагент1 тип СправочникСсылка.Контрагенты. В форме документа в табличное поле ПоДаннымОрганизации добавил ПолеВвода Контрагент1 и связал его с реквизитом Контрагент1. Пошаговая проверка программы показала, что присвоение данных реквизиту идет, но в форме это поле всегда отображается пустым. Что неправильно? Настройки поля ввода аналогичны соседним полям.

Я в 1С в общем то еще бесформенный воин. Может что в коде неправильно? Цветом выделил внесенные мной изменения, касаемые вопроса


Процедура ЗаполнитьПоДаннымБухгалтерскогоУчета(ФильтрСписокСчетов = неопределено) Экспорт
Перем СтрокаКлиентов;
Перем СтрокаДоговоров;

КоличествоСчетов = СписокСчетов.Количество();
Если ФильтрСписокСчетов = неопределено Тогда
ФильтрСписокСчетов = Новый массив();
Для каждого СтрокаСчета Из СписокСчетов Цикл
Если НЕ ЗначениеЗаполнено(СтрокаСчета.Счет) или СтрокаСчета.УчаствуетВРасчетах = Ложь Тогда
Продолжить;
Иначе
ФильтрСписокСчетов.Добавить(СтрокаСчета.Счет);
КонецЕсли;
КонецЦикла;

Если ФильтрСписокСчетов.Количество() = 0 Тогда
ОбщегоНазначения.СообщитьОбОшибке("Неверно задан список счетов, по которым производится сверка!",,,СтатусСообщения.Важное);
Возврат;
КонецЕсли;

КонецЕсли;


ФильтрСпискаКонтрагентов = Новый массив();
ФильтрСпискаДоговоров = Новый массив();

Для каждого СтрокаКонтрагента Из СписокКонтрагентов Цикл
Если НЕ ЗначениеЗаполнено(СтрокаКонтрагента.Контрагент) Тогда
Продолжить;
Иначе
ФильтрСпискаКонтрагентов.Добавить(СтрокаКонтрагента.Контрагент);
Если НЕ ЗначениеЗаполнено(СтрокаКонтрагента.Договор) Тогда
Продолжить;
Иначе
ФильтрСпискаДоговоров.Добавить(СтрокаКонтрагента.Договор);
КонецЕсли;
КонецЕсли;
КонецЦикла;

Если ФильтрСпискаКонтрагентов.Количество() = 0 Тогда
ОбщегоНазначения.СообщитьОбОшибке("Неверно задан список контрагентов, по которым производится сверка!",,,СтатусСообщения.Важное);
Возврат;
КонецЕсли;


Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ДатаНачала", ?(НЕ ЗначениеЗаполнено(ДатаНачала),Неопределено, Новый граница (ДатаНачала,ВидГраницы.Включая)));
Запрос.УстановитьПараметр("ДатаОкончания", ?(НЕ ЗначениеЗаполнено(ДатаОкончания),неопределено,новый граница(КонецДня(ДатаОкончания), ВидГраницы.Включая)));
Запрос.УстановитьПараметр("Организация", Организация);

Запрос.УстановитьПараметр("Контрагент", ФильтрСпискаКонтрагентов);

Запрос.УстановитьПараметр("Валюта", ?(НЕ ЗначениеЗаполнено(ВалютаДокумента) или (ВалютаДокумента = мВалютаРегламентированногоУчета1), неопределено,ВалютаДокумента));
Запрос.УстановитьПараметр("ФильтрСписокСчетов", ФильтрСписокСчетов);

АналитикаРасчетов = новый Массив();
АналитикаРасчетов.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты);
АналитикаРасчетов.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Договоры);
Запрос.УстановитьПараметр("АналитикаРасчетов", АналитикаРасчетов);

Запрос.УстановитьПараметр("ДоговорКонтрагента", ФильтрСпискаДоговоров );

Запрос.Текст =
"ВЫБРАТЬ
| ХозрасчетныйОбороты.Период КАК Дата,
| ХозрасчетныйОбороты.Регистратор.Номер КАК Номер,
| ХозрасчетныйОбороты.Регистратор КАК Документ,
| ХозрасчетныйОбороты.Субконто2 КАК Договор,
| ХозрасчетныйОбороты.Регистратор.Контрагент КАК Контрагент,
| ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОбороты.СуммаОборотДт
| ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотДт
| КОНЕЦ КАК Дебет,
| ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОбороты.СуммаОборотКт
| ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотКт
| КОНЕЦ КАК Кредит,
| ЕСТЬNULL(ХозрасчетныйОбороты.Регистратор.НомерВходящегоДокумента, НЕОПРЕДЕЛЕНО) КАК НомерВходящегоДокумента,
| ЕСТЬNULL(ХозрасчетныйОбороты.Регистратор.ДатаВходящегоДокумента, НЕОПРЕДЕЛЕНО) КАК ДатаВходящегоДокумента,
| ХозрасчетныйОбороты.КорСчет,
| ХозрасчетныйОбороты.КорСубконто1,
| ХозрасчетныйОбороты.КорСубконто2,
| ХозрасчетныйОбороты.КорСубконто3,
| ХозрасчетныйОбороты.Валюта,
| ХозрасчетныйОбороты.ВалютнаяСуммаОборот,
| ВЫБОР
| КОГДА ХозрасчетныйОбороты.КорСубконто1 ССЫЛКА Справочник.ПрочиеДоходыИРасходы
| ТОГДА ХозрасчетныйОбороты.КорСубконто1.ВидПрочихДоходовИРасходов
| ИНАЧЕ НЕОПРЕДЕЛЕНО
| КОНЕЦ КАК ВидПрочихДоходовИРасходов,
| ХозрасчетныйОбороты.Счет
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Обороты(
| &ДатаНачала,
| &ДатаОкончания,
| Регистратор,
| Счет В ИЕРАРХИИ (&ФильтрСписокСчетов),
| &АналитикаРасчетов,
| Организация = &Организация
| И ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ИСТИНА
| ИНАЧЕ Валюта = &Валюта
| КОНЕЦ
| И Субконто1 В ( &Контрагент )
| И ВЫБОР
| КОГДА " + ФильтрСпискаДоговоров.Количество() + " = 0
| ТОГДА ИСТИНА
| ИНАЧЕ Субконто2 В ИЕРАРХИИ (&ДоговорКонтрагента)
| КОНЕЦ,
| ,
| ) КАК ХозрасчетныйОбороты
|ГДЕ
| ВЫБОР
| КОГДА ХозрасчетныйОбороты.КорСчет В ИЕРАРХИИ (&ФильтрСписокСчетов)
| ТОГДА ВЫБОР
| КОГДА " + ФильтрСпискаДоговоров.Количество() + " = 0
| ТОГДА (НЕ ХозрасчетныйОбороты.КорСубконто1 В ( &Контрагент ) )
| ИНАЧЕ (НЕ(ХозрасчетныйОбороты.КорСубконто1 В ( &Контрагент )
| И ХозрасчетныйОбороты.КорСубконто2 = ХозрасчетныйОбороты.Субконто2))
| КОНЕЦ
| ИНАЧЕ ИСТИНА
| КОНЕЦ
| И (НЕ (ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОбороты.СуммаОборотДт
| ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотДт
| КОНЕЦ = 0
| И ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОбороты.СуммаОборотКт
| ИНАЧЕ ХозрасчетныйОбороты.ВалютнаяСуммаОборотКт
| КОНЕЦ = 0))
|
|УПОРЯДОЧИТЬ ПО
| Дата,
| Документ";

Выборка = Запрос.Выполнить().Выбрать();

НаборДвижений = ПоДаннымОрганизации.Выгрузить();
НаборДвижений.Колонки.Добавить("Валюта", Новый описаниеТипов("СправочникСсылка.Валюты"));
НаборДвижений.Колонки.Добавить("ВалютнаяСумма", ОбщегоНазначения.ПолучитьОписаниеТиповЧисла(15,2));


Пока Выборка.Следующий() Цикл

Если Выборка.Дебет = 0 И Выборка.Кредит = 0 Тогда
Продолжить;
КонецЕсли;

МетаданныеДокумента = ПолучитьМетаданныеДокумента(Выборка.Документ);

НоваяСтрока = НаборДвижений.Добавить();
НоваяСтрока.Документ = Выборка.Документ;
НоваяСтрока.Договор = Выборка.Договор;
НоваяСтрока.Дата = Выборка.Дата;
НоваяСтрока.Дебет = Выборка.Дебет;
НоваяСтрока.Кредит = Выборка.Кредит;
НоваяСтрока.Валюта = Выборка.Валюта;
НоваяСтрока.ВалютнаяСумма = Выборка.ВалютнаяСуммаОборот;
НоваяСтрока.Контрагент1 = Выборка.Контрагент ;


Если ВыводитьПолныеНазванияДокументов Тогда
Если Выборка.НомерВходящегоДокумента = Неопределено тогда
НоваяСтрока.Представление = МетаданныеДокумента.Представление()+" №"+Символы.НПП +Выборка.Номер;
Иначе
НоваяСтрока.Представление = МетаданныеДокумента.Представление() +" ("+ ?(НЕ ЗначениеЗаполнено(Выборка.НомерВходящегоДокумента),"_______", Выборка.НомерВходящегоДокумента) +" от "+
?(НЕ ЗначениеЗаполнено(Выборка.ДатаВходящегоДокумента), "' . . '", Формат(Выборка.ДатаВходящегоДокумента, "ДФ=dd.MM.yyyy"))+")";
КонецЕсли;
Иначе

// Сформируем строку представления
Представление = "";

Если Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.ПрочиеДоходыИРасходы) Тогда

Если НЕ ЗначениеЗаполнено(Выборка.ВидпрочихДоходовИРасходов) Тогда

ИначеЕсли Выборка.ВидПрочихДоходовИРасходов = Перечисления.ВидыПрочихДоходовИРасходов.КурсовыеРазницы Тогда
Представление = "Курсовые разницы";
ИначеЕсли Выборка.ВидПрочихДоходовИРасходов = Перечисления.ВидыПрочихДоходовИРасходов.ШтрафыПениНеустойкиКПолучениюУплате Тогда
Представление = "Санкции";
ИначеЕсли Выборка.КорСубконто1 = Справочники.ПрочиеДоходыИРасходы.СуммовыеРазницы Тогда
Представление = "Суммовые разницы";
Иначе
Представление = Строка(Выборка.КорСубконто1);
КонецЕсли;

КонецЕсли;

Если не ПустаяСтрока(Представление) Тогда
// Строка уже отработана

ИначеЕсли Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыПоКраткосрочнымКредитамИЗаймам)
или Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыПоДолгосрочнымКредитамИЗаймам) Тогда
Если Выборка.Дебет > 0 Тогда
Представление = "Возврат займа";
ИначеЕсли Выборка.Кредит > 0 Тогда
Представление = "Займ";
Иначе
Представление = "Операции по займам";
КонецЕсли;
ИначеЕсли Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыПоПретензиям)
или Выборка.Счет = ПланыСчетов.Хозрасчетный.РасчетыПоПретензиям
или Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямВал)
или Выборка.Счет = ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямВал
или Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямУЕ)
или Выборка.Счет = ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямУЕ
тогда
Представление = "Претензия";

ИначеЕсли Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.Касса)
или Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетныеСчета)
или Выборка.КорСчет = ПланыСчетов.Хозрасчетный.РасчетныеСчета
или Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.ВалютныеСчета)
или Выборка.КорСчет = ПланыСчетов.Хозрасчетный.ВалютныеСчета
или Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.СпециальныеСчета)
тогда

Если (Выборка.Кредит >0) Тогда

Если Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками) Тогда
Представление = "Возврат средств";

ИначеЕсли Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками) Тогда
Представление = "Оплата";

Иначе
Представление = "Перевод средств";
КонецЕсли;

ИначеЕсли (Выборка.Дебет >0) Тогда
Если Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками)
или Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСРазнымиДебиторамиИКредиторами)
Тогда

Представление = "Оплата";

ИначеЕсли Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками) Тогда
Представление = "Возврат средств";

Иначе
Представление = "Перевод средств";
КонецЕсли;
КонецЕсли;
ИначеЕсли Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.Продажи) И (Выборка.Дебет > 0) Тогда
Представление = "Продажа";
ИначеЕсли Выборка.КорСчет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.ПрочиеДоходыИРасходы)
И НЕ Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками)
И (Выборка.Дебет > 0) Тогда
Представление = "Продажа";
ИначеЕсли (Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками)
ИЛИ Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСРазнымиДебиторамиИКредиторами))
И (Выборка.Кредит <> 0) Тогда
Представление = "Приход";
ИначеЕсли Выборка.Счет.ПринадлежитЭлементу(ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками) Тогда
Если ТипЗнч(Выборка.Документ) = Тип("ДокументСсылка.РеализацияТоваровУслуг") И Выборка.Дебет <> 0 Тогда
Представление = "Продажа";
ИначеЕсли (Выборка.Кредит <> 0) Тогда
Представление = "Оплата";
КонецЕсли;
КонецЕсли;

Если ПустаяСтрока(Представление)Тогда
Если Выборка.Дебет > 0 тогда
Представление = "Принято";
ИначеЕсли Выборка.Дебет < 0 тогда
Представление = "Сторно: принято";
ИначеЕсли Выборка.Кредит > 0 тогда
Представление = "Передано";
Иначе
Представление = "Сторно: передано";
КонецЕсли;
КонецЕсли;

Если Выборка.НомерВходящегоДокумента = Неопределено тогда
Если Представление = "Продажа" И ТипЗнч(Выборка.Документ) <> Тип("ДокументСсылка.ОперацияБух") Тогда
Представление = Представление + " (" + ОбщегоНазначения.ПолучитьНомерНаПечать(Выборка.Документ) + " от " + Формат(Выборка.Дата, "ДФ=dd.MM.yyyy") + ")";
Иначе
Представление = Представление + " ("+Формат(Выборка.Дата, "ДФ=dd.MM.yyyy") + ")";
КонецЕсли;
Иначе
Представление = Представление +" ("+ ?(НЕ ЗначениеЗаполнено(Выборка.НомерВходящегоДокумента),"_______", Выборка.НомерВходящегоДокумента) +" от "+
?(НЕ ЗначениеЗаполнено(Выборка.ДатаВходящегоДокумента), "' . . '", Формат(Выборка.ДатаВходящегоДокумента, "ДФ=dd.MM.yyyy"))+")";
КонецЕсли;
// Определение вида движения по корр. счету и корр аналитике.
//
//НоваяСтрока.Представление = МетаданныеДокумента.Синоним + " № " + НомерДокумента
// + " от " + Формат(ДатаДокумента, "ДФ='дд ММ гггг'");

НоваяСтрока.Представление = Представление;
КонецЕсли;

КонецЦикла;



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

"ВЫБРАТЬ
| ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОстаткиНаНачало.СуммаОстаток
| ИНАЧЕ ХозрасчетныйОстаткиНаНачало.ВалютнаяСуммаОстаток
| КОНЕЦ КАК ОстатокНаНачало,
| 0 КАК ОстатокНаКонец
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Остатки(
| &ДатаНачала,
| Счет В ИЕРАРХИИ (&ФильтрСписокСчетов),
| &АналитикаРасчетов,
| Организация = &Организация
| И ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ИСТИНА
| ИНАЧЕ Валюта = &Валюта
| КОНЕЦ
| И Субконто1 В ( &Контрагент )
| И ВЫБОР
| КОГДА " + ФильтрСпискаДоговоров.Количество() + " = 0
| ТОГДА ИСТИНА
| ИНАЧЕ Субконто2 В ИЕРАРХИИ (&ДоговорКонтрагента)
| КОНЕЦ) КАК ХозрасчетныйОстаткиНаНачало")
+ "
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|0,
| ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ХозрасчетныйОстаткиНаНачало.СуммаОстаток
| ИНАЧЕ ХозрасчетныйОстаткиНаНачало.ВалютнаяСуммаОстаток
| КОНЕЦ
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Остатки(
| &ДатаОкончания,
| Счет В ИЕРАРХИИ (&ФильтрСписокСчетов),
| &АналитикаРасчетов,
| Организация = &Организация
| И ВЫБОР
| КОГДА &Валюта = НЕОПРЕДЕЛЕНО
| ТОГДА ИСТИНА
| ИНАЧЕ Валюта = &Валюта
| КОНЕЦ
| И Субконто1 В ( &Контрагент )
| И ВЫБОР
| КОГДА " + ФильтрСпискаДоговоров.Количество() + " = 0
| ТОГДА ИСТИНА
| ИНАЧЕ Субконто2 В ИЕРАРХИИ (&ДоговорКонтрагента)
| КОНЕЦ) КАК ХозрасчетныйОстаткиНаНачало
|ИТОГИ
| СУММА(ОстатокНаНачало),
| СУММА(ОстатокНаКонец)
|ПО ОБЩИЕ";

Выборка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам, "ОБЩИЕ");
Выборка.Следующий();
ОстатокНаНачало = Выборка.ОстатокНаНачало;
ОстатокНаКонец = Выборка.ОстатокНаКонец;

Если ВалютаДокумента = мВалютаРегламентированногоУчета1 И НЕ ВыводитьПолныеНазванияДокументов Тогда
НаборДвижений.Свернуть("Дата,Документ,Представление,Договор,Валюта","Дебет, Кредит, ВалютнаяСумма");
Для каждого СтрокаДвижений Из НаборДвижений Цикл
Если СтрокаДвижений.ВалютнаяСумма >0 тогда

СтрокаДвижений.Представление = СтрокаДвижений.Представление+" ("+Формат(СтрокаДвижений.ВалютнаяСумма, "ЧЦ=15; ЧДЦ=2")+" "+строка(СтрокаДвижений.Валюта) +")";
ИначеЕсли СтрокаДвижений.ВалютнаяСумма <0 тогда
Множитель = ?(СтрокаДвижений.Дебет + СтрокаДвижений.Кредит>0, -1,1);

СтрокаДвижений.Представление = СтрокаДвижений.Представление+" ("+Формат(Множитель*СтрокаДвижений.ВалютнаяСумма, "ЧЦ=15; ЧДЦ=2")+" "+строка(СтрокаДвижений.Валюта) +")";

КонецЕсли;
КонецЦикла;

Иначе
НаборДвижений.Свернуть("Дата,Документ,Представление,Договор","Дебет, Кредит");
КонецЕсли;

Если ВыводитьПолныеНазванияДокументов Тогда
НаборДвижений.Свернуть("Дата,Документ,Представление,Договор","Дебет, Кредит");
КонецЕсли;

Если РазбитьПоДоговорам Тогда
НаборДвижений.Сортировать("Договор,Дата,Документ,Представление");
Иначе
НаборДвижений.Сортировать("Дата,Документ,Представление,Договор");
КонецЕсли;


ПоДаннымОрганизации.Загрузить(НаборДвижений);


КонецПроцедуры

Совет Kreontsa помог, спасибо. Вопрос закрыт.