Регистр сведений

Процедура ОбработкаПроведения(Отказ, Режим)
	
	//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
	// Данный фрагмент построен конструктором.
	// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
	Движения.ОстаткиАванса.Записывать = Истина;
	Движения.ОстаткиАванса.Записать();
	Движения.ОстаткиДолга.Записывать = Истина;
	Движения.ОстаткиДолга.Записать();
	
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ПриходнаяНакладная.Соглашение КАК Соглашение,
		|	ПриходнаяНакладная.ИтогоПоДокументу КАК ИтогоПоДокументу
		|ПОМЕСТИТЬ ДокТЧ
		|ИЗ
		|	Документ.ПриходнаяНакладная КАК ПриходнаяНакладная
		|ГДЕ
		|	ПриходнаяНакладная.Ссылка = &Ссылка
		|;
		|
		|////////////////////////////////////////////////////////////­////////////////////
		|ВЫБРАТЬ
		|	ДокТЧ.Соглашение КАК Соглашение,
		|	ДокТЧ.ИтогоПоДокументу КАК ИтогоПоДокументу,
		|	ЕСТЬNULL(ОстаткиАвансаОстатки.СуммаОстаток, 0) КАК ОстаткиАванса,
		|	ЕСТЬNULL(ОстаткиДолгаОстатки.СуммаОстаток, 0) КАК ОстаткиДолга
		|ИЗ
		|	ДокТЧ КАК ДокТЧ
		|		ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиДолга.Остатки КАК ОстаткиДолгаОстатки
		|		ПО ДокТЧ.Соглашение = ОстаткиДолгаОстатки.Соглашение
		|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиАванса.Остатки КАК ОстаткиАвансаОстатки
		|		ПО ДокТЧ.Соглашение.Контрагент = ОстаткиАвансаОстатки.Контрагент
		|ИТОГИ
		|	СУММА(ИтогоПоДокументу),
		|	СУММА(ОстаткиАванса),
		|	СУММА(ОстаткиДолга)
		|ПО
		|	Соглашение";
	
	
	Запрос.УстановитьПараметр("Ссылка",Ссылка);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	Выборка = РезультатЗапроса.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
	
	Пока Выборка.Следующий() Цикл
		Если  Выборка.ОстаткиАванса >= Выборка.ИтогоПоДокументу Тогда
			Движение = Движения.ОстаткиАванса.Добавить();
			Движение.ВидДвижения=ВидДвиженияНакопления.Расход;
			Движение.Период=Дата;
			Движение.Контрагент=Выборка.Соглашение.Контрагент;
			Движение.Сумма=Выборка.ИтогоПоДокументу;
		Иначе 
			Движение = Движения.ОстаткиАванса.Добавить();
			Движение.ВидДвижения=ВидДвиженияНакопления.Расход;
			Движение.Период=Дата;
			Движение.Контрагент=Выборка.Соглашение.Контрагент;
			Движение.Сумма=Выборка.ОстаткиАванса;
			
			Движение = Движения.ОстаткиДолга.Добавить();
			Движение.ВидДвижения=ВидДвиженияНакопления.Приход;
			Движение.Период=Дата;
			Движение.Соглашение=Выборка.Соглашение;
			Долг = Выборка.ИтогоПоДокументу - Выборка.ОстаткиАванса;
			Движение.Сумма=Долг;


		КонецЕсли
	КонецЦикла;
	
	//}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА


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