Anonymous     Text only     09 Sep 2008    
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
Для Каждого Стр Из ТаблицаАвансов Цикл
Запись = Набор.ДобавитьПриход();
Запись.Активность = Истина;
Запись.ВалютаРасчетов = ВалютаДокумента;
Запись.ДатаСобытия = Выборка.Ссылка.Дата;
Запись.ВалютнаяСумма = Стр.Сумма;
Запись.Документ = Стр.Документ;
Запись.Организация = Организация;
Запись.Период = Выборка.Ссылка.Дата;
Запись.Покупатель = Контрагент;
Запись.Регистратор = Выборка.Ссылка;
Запись.Сумма = Стр.Сумма;
Запись.ДоговорКонтрагента = ДоговорКонтрагента;
КонецЦикла;