Александр Валерьевич

ВЫБРАТЬ РАЗРЕШЕННЫЕ
	               |	СУММА(ЖурналПроводокЕПСБУ.Сумма) КАК СуммаДокумента,
	               |	ЖурналПроводокЕПСБУ.Регистратор КАК Документ,
			|	ЖурналПроводокЕПСБУ.Регистратор.Дата КАК Дата
	               |ПОМЕСТИТЬ ВТ_СписокДокументов
	               |ИЗ
	               |	РегистрБухгалтерии.ЖурналПроводокЕПСБУ КАК ЖурналПроводокЕПСБУ
	               |ГДЕ
	               |	ЖурналПроводокЕПСБУ.СчетДт В ИЕРАРХИИ(&СчетДт)
	               |	И ЖурналПроводокЕПСБУ.СчетКт В(&Счет401_10)
	               |	И ЖурналПроводокЕПСБУ.Период МЕЖДУ &ДатаНачала И &ДатаОкончания
	               |	И ВЫБОР
	               |			КОГДА &ОтборКФО
	               |				ТОГДА ЖурналПроводокЕПСБУ.КФО = &КФО
	               |			ИНАЧЕ ИСТИНА
	               |		КОНЕЦ
	               |	И ВЫБОР
	               |			КОГДА &ОтборИФО
	               |				ТОГДА ЖурналПроводокЕПСБУ.ИФО = &ИФО
	               |			ИНАЧЕ ИСТИНА
	               |		КОНЕЦ
	               |	И ЖурналПроводокЕПСБУ.Организация = &Организация
	               |
	               |СГРУППИРОВАТЬ ПО
	               |	ЖурналПроводокЕПСБУ.Регистратор
	               |
	               |ИМЕЮЩИЕ
	               |	НЕ СУММА(ЖурналПроводокЕПСБУ.Сумма) = 0
	               |;
	               |
	               |////////////////////////////////////////////////////////////////////////////////
	               |ВЫБРАТЬ
	               |	ВТ_СписокДокументов.СуммаДокумента КАК СуммаДокумента,
	               |	ВТ_СписокДокументов.Документ КАК Документ,
	               |	ВЫБОР
	               |		КОГДА ТИПЗНАЧЕНИЯ(ВТ_СписокДокументов.Документ) = ТИП(Документ.Сторно)
	               |			ТОГДА ВТ_СписокДокументов.Документ.ДокументОснование
	               |		ИНАЧЕ ВТ_СписокДокументов.Документ
	               |	КОНЕЦ КАК ДокументОснование
	               |ПОМЕСТИТЬ ВТ_ОтсторнированныИзПредыдущегоПериода
	               |ИЗ
	               |	ВТ_СписокДокументов КАК ВТ_СписокДокументов
	               |ГДЕ
	               |	ВТ_СписокДокументов.Дата < &ДатаНачала
	               |	И ТИПЗНАЧЕНИЯ(ВТ_СписокДокументов.Документ) = ТИП(Документ.Сторно)
	               |;
	               |