Временный расчет и обход регистров
// Расчет регистров
Рег = СоздатьОбъект(“Регистр.ВидРегистра“);
Рег.ВременныйРасчет(1);
Если ВыбДата >= ПолучитьДатуТА() Тогда
РассчитатьРегистрыПо(ПолучитьПозициюТА());
Иначе
РассчитатьРегистрыПо(ВыбДата);
КонецЕсли;
// Обход
Рег.ВыбратьИтоги();
Пока Рег.ПолучитьИтог() = 1 Цикл
Измерение = Рег.Измерение;
Ресурс = Рег.Ресурс;
КонецЦикла;
| 
опубликовано: 22 Май 2007, 12:58