// Пример 1 Рег1 = СоздатьОбъект("Регистр.Взаиморасчеты"); Если Режим = "Подробно" Тогда Рег1.УстановитьФильтр(Клиент); // Открываем выборку Рег1.ВыбратьДвижения(ДатаНачало, ); // Цикл выбора движений по регистру Пока Рег1.ПолучитьДвижение() > 0 Цикл Если Строка(Рег1.Клиент.Код) <> Строка(Запрос.Клиент.Код) Тогда Продолжить; КонецЕсли; Док = Рег1.ТекущийДокумент(); Дв_Баз_Сум = Рег1.СуммаБазовая; Дв_Вал_Сум = Рег1.СуммаВалютная; Если Рег1.Расход = 1 Тогда Таб.ВывестиСекцию("Расход2"); Иначе Таб.ВывестиСекцию("Приход2"); КонецЕсли; КонецЦикла; КонецЕсли; //Пример 2 РегТовары = СоздатьОбъект("Регистр.Товары"); РегТовары.ВыбратьДвижения(ДатаНач, ДатаКон); Пока РегТовары.ПолучитьДвижение()=1 Цикл Сообщить("Дата движения " + Строка(РегТовары.ТекущийДокумент.ДатаДок)); Сообщить("Клиент: " + РегТовары.Клиент); Сообщить("Товар: " + РегТовары.Товар); Сообщить("Сумма: " + РегТовары.Доход); КонецЦикла;