Как закрыть минусовые остатки по регистру затрат в УПП?
☑
0
Хосе
25.02.16
✎
17:43
Чтобы не болтались в минусах?
1
Джинн
25.02.16
✎
17:49
(0) Найти причину и исправить.
2
Быдло замкадное
25.02.16
✎
17:51
создать корректировку записей регистров))
3
Быдло замкадное
25.02.16
✎
17:54
на тебе овнокод
НовыйДок = Документы.КорректировкаЗаписейРегистров.СоздатьДокумент();
НовыйДок.Дата = ДатаОстатков -1;
НовыйДок.Ответственный = ПараметрыСеанса.ТекущийПользователь;
СтрокаТЧ=НовыйДок.ТаблицаРегистровНакопления.Добавить();
СтрокаТЧ.Имя = "УчетЗатратРегл";
СтрокаТЧ.Представление = "УчетЗатратРегл";
ДвиженияУчетЗатрат = НовыйДок.Движения.УчетЗатратРегл;
Запрос=новый Запрос;
Запрос.Текст="ВЫБРАТЬ
| УчетЗатратРеглОстатки.АналитикаВидаУчета,
| УчетЗатратРеглОстатки.АналитикаУчетаЗатрат,
| УчетЗатратРеглОстатки.АналитикаУчетаПартий,
| УчетЗатратРеглОстатки.АналитикаРаспределенияЗатрат,
| УчетЗатратРеглОстатки.КоличествоОстаток КАК Количество,
| УчетЗатратРеглОстатки.КоличествоНУОстаток КАК КоличествоНУ,
| УчетЗатратРеглОстатки.СтоимостьОстаток КАК Стоимость,
| УчетЗатратРеглОстатки.СтоимостьНУОстаток КАК СтоимостьНУ,
| УчетЗатратРеглОстатки.ПостояннаяРазницаОстаток КАК ПостояннаяРазница
|ИЗ
| РегистрНакопления.УчетЗатратРегл.Остатки(&Дата, ) КАК УчетЗатратРеглОстатки
|ГДЕ
| УчетЗатратРеглОстатки.КоличествоОстаток < 0";
Запрос.УстановитьПараметр("Дата", ДатаОстатков);
ТЗРезультат = Запрос.Выполнить().Выгрузить();
ДвиженияУчетЗатрат.Загрузить(ТЗРезультат);
Для Каждого СтрокаДвижений Из ДвиженияУчетЗатрат Цикл
СтрокаДвижений.Активность = Истина;
СтрокаДвижений.ВидДвижения = ВидДвиженияНакопления.Расход;
СтрокаДвижений.Период = ДатаОстатков - 1;
КонецЦикла;
НовыйДок.Записать();
Сообщить(НовыйДок);
4
Хосе
25.02.16
✎
18:02
(1) а по-типовому никак
(3) спасибо, но хотелось бы блеснуть типовым способом. Никак? типа оприходования затрат какого-нибудь
5
vicof
25.02.16
✎
18:46
(4) "оприходование затрат" Звучит, тебе в бизнес -аналитики надо
6
Cyberhawk
25.02.16
✎
18:53
Типовой способ: отчет по регистру учета затрат с группировками только по измерениям - увидишь, где вышел перекос (например, где-то качество указано в ключе аналитики, где-то - не указано)
Запрос для вычленения отрицательных остатков возьмешь из кода, где РСВ тебе ругается на наличие отрицательных остатков
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.