Помогите с кодом для колонки долга в ФормеСписка заказа покупателя

[zzzzzip]

Здравствуйте! Помогите с кодом для дополнительной колонки с долгом в форме списка Заказов покупателей в УТ 10.3. Заранее Спасибо.

Я только учусь, так что мой код содержит много ошибок сильно не ругайте.

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

Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)

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

Запрос.УстановитьПараметр("СуммаВзаиморасчетовОстаток", СуммаДолга); // тут ошибка переменой СуммаДолга
МассивОбъектов = Новый Массив;
  Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
   МассивОбъектов.Добавить(ОформлениеСтроки.ДанныеСтроки.Ссылка);
  КонецЦикла;
  Запрос.УстановитьПараметр("МассивОбъектов", МассивОбъектов);
  ТабОбъектов = Запрос.Выполнить().Выгрузить();
  Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
 
   Нашли = ТабОбъектов.Найти(ОформлениеСтроки.ДанныеСтроки.Ссылка, "СуммаДолга");
   ОформлениеСтроки.Ячейки.СуммаДолга.Значение = ?(Нашли <> Неопределено, Нашли.Контрагент, "");
  КонецЦикла;
КонецЕсли;


КонецПроцедуры
Колонке присвоено имя СуммаДолга, создан реквизит СуммаДолга в реквизитах документа. 

[zzzzzip]

Сделал сам.

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

Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)

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



МассивОбъектов = Новый Массив;
  Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
   МассивОбъектов.Добавить(ОформлениеСтроки.ДанныеСтроки.Ссылка.Контрагент);
  КонецЦикла;
  Запрос.УстановитьПараметр("МассивОбъектов", МассивОбъектов);
  ТабОбъектов = Запрос.Выполнить().Выгрузить();
  Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
 
   Нашли = ТабОбъектов.Найти(ОформлениеСтроки.ДанныеСтроки.Ссылка.Контрагент, "Контрагент");
   ОформлениеСтроки.Ячейки .СуммаДолга.Значение = ?(Нашли <> Неопределено, Нашли.СуммаДолга, "")
   
КонецЦикла;
КонецЕсли;
КонецПроцедуры