0
mirror1982
16.01.12
✎
23:16
|
Вывожу начальный остаток по ресурсу на нач. период, затем перебираю движения регистра за выбранный период заполняю таблицу приход, расход. А как узнать без перебора движений сколько было прихода и расхода?
НачальныйОстаток=Рег.СводныйОстаток(Номенклатура,,,,,"Количество");
КонечныйОстаток=0;
Приход=0;
Расход=0;
Таб.ВывестиСекцию("Строка1");
Рег.ВыбратьДвижения(Начало,Конец);
НачальныйОстаток1=НачальныйОстаток;
сч=0;
Приход1=0;
Расход1=0;
Пока Рег.ПолучитьДвижение()=1 Цикл
сч=сч+1;
Если сч=1 Тогда
НачальныйОстаток1=НачальныйОстаток1;
Иначе
НачальныйОстаток1=НачальныйОстаток1+Приход1-Расход1;
КонецЕсли;
Если Рег.Приход=1 Тогда
Приход1=Рег.Количество;
Иначе
Расход1=Рег.Количество;
КонецЕсли;
КонечныйОстаток1=НачальныйОстаток1+Приход1-Расход1;
Документ=Рег.ТекущийДокумент();
Расшифровка(,);
Таб.ВывестиСекцию("Строка2");
КонецЦикла;
|
|