1С 8.x : Выбрать движения, получить выборку записей регистра накопления

 

//Взаиморасчеты за период, хотя, это лучше выбирать запросом , он в примере 3

Отбор = Новый Структура("Организация", Организация);

НаборЗаписей = РегистрыНакопления.ВзаиморасчетыСРаботникамиОрганизаций.Выбрать(ПериодРегистрации, КонецМесяца(ПериодРегистрации), Отбор); 

Пока Выборка.Следующий() Цикл

	// код обработки например:

	Сум=Сум+Выборка.СуммаВзаиморасчетов; 

КонецЦикла;

   

 

// Посчитаем, сколько отгружено с начала года

УчетНоменклатуры = РегистрыНакопления.УчетНоменклатуры;

ОтборПоТовару = Новый Структура("Номенклатура");

ОтборПоТовару.Номенклатура = ВыбТовар;

НачДата = НачалоГода(ТекущаяДата());

КонДата = ТекущаяДата();

Выборка = УчетНоменклатуры.Выбрать(НачДата,КонДата,ОтборПоТовару);

Расход =0;

Пока Выборка.Следующий() Цикл

	Если Выборка.ВидДвижения = ВидДвиженияНакопления.Расход Тогда

		Расход = Расход + Выборка.Количество;

	КонецЕсли;

КонецЦикла;

Предупреждение("Отгружено с начала года """ + СокрЛП(ВыбТовар) + """ = "+ Расход + " шт.");

   

 

Запрос=новый Запрос;

Запрос.Текст="

|ВЫБРАТЬ

|	ВзаиморасчетыСРаботникамиОрганизаций.СуммаВзаиморасчетов,

|	ВзаиморасчетыСРаботникамиОрганизаций.СуммаВUSD,

|	ВзаиморасчетыСРаботникамиОрганизаций.Физлицо

|ИЗ

|	РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций КАК ВзаиморасчетыСРаботникамиОрганизаций

|ГДЕ

|	ВзаиморасчетыСРаботникамиОрганизаций.Физлицо = &Физлицо

|	И ВзаиморасчетыСРаботникамиОрганизаций.ПериодВзаиморасчетов = &ПериодВзаиморасчетов

|	И ВзаиморасчетыСРаботникамиОрганизаций.Организация = &Организация

|	И ВзаиморасчетыСРаботникамиОрганизаций.ХарактерВыплаты = &ХарактерВыплаты

|";

Запрос.УстановитьПараметр("Организация",Организация);

Запрос.УстановитьПараметр("ПериодВзаиморасчетов",ПериодРегистрации);

Запрос.УстановитьПараметр("Физлицо",ТекущаяСтрока.Физлицо);

Запрос.УстановитьПараметр("ХарактерВыплаты",Перечисления.ХарактерВыплатыЗарплаты.ПлановыйАванс);

Результат = Запрос.Выполнить();

Результат = Результат.Выбрать();

Пока Результат.Следующий() Цикл

	// код обработки например:

	СумАванс=СумАванс+Результат.СуммаВзаиморасчетов; 

КонецЦикла;