Как корректировать ресурсы регистра сведений с повторяющимся измерением?

[Odineski]

Как при проведении документа заполнить по табличной части регистр сведений, подчиненный регистратору, если один из реквизитов табличной части является измерением регистра сведений и, если он повторяется, необходимо корректировать ресурсы уже имеющейся записи регистра по данным табличной части документа.

[Odin – Одинэсник]

Для заполнения регистра сведений, подчиненного регистратору, с учетом повторяющегося измерения из табличной части документа, необходимо выполнить следующие шаги:

1. **Создать набор записей регистра сведений** с установленным отбором по регистратору и измерению, которое соответствует реквизиту табличной части.

2. **Перебрать записи табличной части документа** и для каждой записи:
– Установить отбор по измерению.
– Проверить, существует ли запись в регистре сведений с такими же значениями измерений.
– Если запись существует, обновить ресурсы этой записи.
– Если запись не существует, добавить новую запись в регистр сведений.

Пример кода на 1С:

1С (Код)

1C // Предположим, что у нас есть документ с табличной частью "Таблица" и регистр сведений "РегистрСведений" Для Каждого Строка из Документ.Таблица Цикл // Создаем набор записей регистра сведений НаборЗаписей = РегистрыСведений.РегистрСведений.СоздатьНаборЗаписей(); // Устанавливаем отбор по регистратору НаборЗаписей.Отбор.Регистратор.Установить(Документ); // Устанавливаем отбор по измерению НаборЗаписей.Отбор.Измерение.Установить(Строка.Измерение); // Читаем записи из регистра НаборЗаписей.Прочитать(); Если НаборЗаписей.Количество() > 0 Тогда // Если запись существует, обновляем ресурсы Для Каждого Запись из НаборЗаписей Цикл Запись.Ресурс1 = Запись.Ресурс1 + Строка.Ресурс1; // Корректируем ресурс Запись.Записать(); // Сохраняем изменения КонецЦикла; Иначе // Если записи нет, добавляем новую НоваяЗапись = НаборЗаписей.Добавить(); НоваяЗапись.Регистратор = Документ; НоваяЗапись.Измерение = Строка.Измерение; НоваяЗапись.Ресурс1 = Строка.Ресурс1; // Заполняем ресурс НаборЗаписей.Записать(); // Сохраняем новую запись КонецЕсли; КонецЦикла;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

1C // Предположим, что у нас есть документ с табличной частью "Таблица" и регистр сведений "РегистрСведений" Для Каждого Строка из Документ.Таблица Цикл     // Создаем набор записей регистра сведений     НаборЗаписей = РегистрыСведений.РегистрСведений.СоздатьНаборЗаписей();          // Устанавливаем отбор по регистратору     НаборЗаписей.Отбор.Регистратор.Установить(Документ);          // Устанавливаем отбор по измерению     НаборЗаписей.Отбор.Измерение.Установить(Строка.Измерение);          // Читаем записи из регистра     НаборЗаписей.Прочитать();          Если НаборЗаписей.Количество() > 0 Тогда         // Если запись существует, обновляем ресурсы         Для Каждого Запись из НаборЗаписей Цикл             Запись.Ресурс1 = Запись.Ресурс1 + Строка.Ресурс1; // Корректируем ресурс             Запись.Записать(); // Сохраняем изменения         КонецЦикла;     Иначе         // Если записи нет, добавляем новую         НоваяЗапись = НаборЗаписей.Добавить();         НоваяЗапись.Регистратор = Документ;         НоваяЗапись.Измерение = Строка.Измерение;         НоваяЗапись.Ресурс1 = Строка.Ресурс1; // Заполняем ресурс         НаборЗаписей.Записать(); // Сохраняем новую запись     КонецЕсли; КонецЦикла;

В этом коде:
– Документ — это текущий документ, который проводим.
– Таблица — это табличная часть документа.
– РегистрСведений — это регистр сведений, в который мы записываем данные.
– Измерение и Ресурс1 — это примеры измерения и ресурса, которые вы используете в своем регистре сведений.

Таким образом, вы сможете корректно заполнить регистр сведений, подчиненный регистратору, с учетом повторяющихся значений измерений.

[Автор]

Сообщения