РегистрНакопленияНаборЗаписей.<Имя регистра накопления>.ДобавитьПриход

Методы · AddReceipt

Добавляет новую запись регистра накопления в наборе с установленным видом движения Приход.

Синтаксис

ДобавитьПриход()

Примеры платформы

Движение = Движения.УчетНоменклатуры.ДобавитьПриход();
Движение.Период = Дата;
Движение.Номенклатура = СтрокаСостава.Номенклатура;
Движение.Склад = Склад;
Движение.Количество = СтрокаСостава.Количество;
Полное описание, параметры и ограничения

РегистрНакопленияНаборЗаписей.<Имя регистра накопления>.ДобавитьПриход (AccumulationRegisterRecordSet.<Accumulation register name>.AddReceipt)

РегистрНакопленияНаборЗаписей.<Имя регистра накопления> (AccumulationRegisterRecordSet.<Accumulation register name>)

ДобавитьПриход (AddReceipt)

Доступен, начиная с версии 8.0.

Синтаксис:
ДобавитьПриход()
Возвращаемое значение:
Тип: РегистрНакопленияЗапись.<Имя регистра накопления>.

Описание:

Добавляет новую запись регистра накопления в наборе с установленным видом движения Приход.

Доступность:

Сервер, толстый клиент, внешнее соединение, мобильное приложение (сервер), мобильный автономный сервер.

Пример:

Движение = Движения.УчетНоменклатуры.ДобавитьПриход();
Движение.Период = Дата;
Движение.Номенклатура = СтрокаСостава.Номенклатура;
Движение.Склад = Склад;
Движение.Количество = СтрокаСостава.Количество;

Использование в версии:

Доступен, начиная с версии 8.0.

Методическая информация

Практические примеры

Отключить активность своих движений и не спутать Записывать с защитой от записи

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

Где и как запускать

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Создайте НОВУЮ пустую файловую базу, имя корневой конфигурации УчебныеОстатки85. Не добавляйте эти объекты в УТ/КА2/УНФ/БП. Режим управления блокировкой данных конфигурации — Управляемый.

  2. Документы → Добавить: УчебноеДвижение85. Номер: Строка длиной 40, автонумерация выключена. Модули объекта и менеджера оставьте пустыми; не добавляйте обработчики, подписки и обязательные пользовательские реквизиты.

  3. Регистры накопления → Добавить: УчебныеОстатки85. Вид регистра Остатки. Единственное измерение КодТовара: Строка 50, индексировать, проверка заполнения Показывать ошибку. Единственный ресурс Количество: Число 12,3, неотрицательное. Дополнительных реквизитов нет.

  4. В списке регистраторов выберите только собственный документ УчебноеДвижение85. Оставьте модули регистра пустыми, использование итогов включённым. Планы обмена, разделители, историю данных и фоновые задания для урока не создавайте.

  5. Обновите конфигурацию базы данных. Создайте серверный общий модуль УчебныеЗадачи и команду собственной обработки. Фрагмент вставьте внутрь ВыполнитьПример() Экспорт; запускайте задачи по отдельности.

  6. Первые задачи работают с незаписанными наборами. Только задачи с пометкой «в собственной транзакции» временно записывают два собственных документа и движения, затем обязательно отменяют транзакцию. В рабочей базе этот код не запускайте.

Если Метаданные.Документы.Количество() <> 1
    Или Метаданные.РегистрыНакопления.Количество() <> 1
    Или Метаданные.Документы.Найти("УчебноеДвижение85") = Неопределено Тогда
    ВызватьИсключение "Разрешены только собственный учебный документ и регистр";
КонецЕсли;
Описание = Метаданные.РегистрыНакопления.Найти("УчебныеОстатки85");
Если Описание = Неопределено Тогда
    ВызватьИсключение "Сначала создайте собственный учебный регистр";
КонецЕсли;
Если Описание.ВидРегистра <> Метаданные.СвойстваОбъектов.ВидРегистраНакопления.Остатки
    Или Описание.Измерения.Количество() <> 1
    Или Описание.Ресурсы.Количество() <> 1
    Или Описание.Реквизиты.Количество() <> 0
    Или Описание.Измерения.Найти("КодТовара") = Неопределено
    Или Описание.Ресурсы.Найти("Количество") = Неопределено Тогда
    ВызватьИсключение "Нужен регистр остатков с КодТовара и Количество";
КонецЕсли;
Менеджер = РегистрыНакопления.УчебныеОстатки85;
Код = "TRAIN-" + Строка(Новый УникальныйИдентификатор);
СсылкаНаНесохраненный = Документы.УчебноеДвижение85.ПолучитьСсылку(Новый УникальныйИдентификатор);
Набор = Менеджер.СоздатьНаборЗаписей();
Набор.Отбор.Регистратор.Установить(СсылкаНаНесохраненный);
Приход = Набор.ДобавитьПриход();
Приход.Период = Дата(2026, 9, 15, 10, 0, 0);
Приход.Регистратор = СсылкаНаНесохраненный;
Приход.Активность = Истина;
Приход.КодТовара = Код;
Приход.Количество = 3;
Расход = Набор.ДобавитьРасход();
Расход.Период = Дата(2026, 9, 15, 11, 0, 0);
Расход.Регистратор = СсылкаНаНесохраненный;
Расход.Активность = Истина;
Расход.КодТовара = Код;
Расход.Количество = 1;
Набор.ДополнительныеСвойства.Вставить("ИсточникУрока", "Собственный незаписанный набор");
Сообщить(Набор.ДополнительныеСвойства.ИсточникУрока = "Собственный незаписанный набор");
Сообщить(Не Набор.ОбменДанными.Загрузка);
Сообщить(Не Набор.БлокироватьДляИзменения);
Сообщить(Не Набор.РасширенныеРежимыЗамещения);
Набор.Записывать = Ложь;
Сообщить(Не Набор.Записывать);
Набор.УстановитьАктивность(Ложь);
Сообщить(Набор.Количество() = 2);
Сообщить(Не Приход.Активность И Не Расход.Активность);
Сообщить(Набор.Итог("Количество") = 4);
ОстатокВПамяти = 0;
Для Каждого Движение Из Набор Цикл
    Если Не Движение.Активность Тогда
        Продолжить;
    КонецЕсли;
    Если Движение.ВидДвижения = ВидДвиженияНакопления.Приход Тогда
        ОстатокВПамяти = ОстатокВПамяти + Движение.Количество;
    Иначе
        ОстатокВПамяти = ОстатокВПамяти - Движение.Количество;
    КонецЕсли;
КонецЦикла;
Сообщить(ОстатокВПамяти = 0);

Разбор по шагам

  1. ДополнительныеСвойства содержит пояснение собственного объекта в памяти. Это не дополнительное измерение регистра.

  2. Читаем исходные параметры: Загрузка выключена, управляемая блокировка при записи и расширенные режимы замещения не включены.

  3. Записывать=Ложь не используем как защитный барьер: прямой Набор.Записать всё равно является отдельным действием. Его здесь нет.

  4. УстановитьАктивность(Ложь) меняет все строки. Количество строк и простая сумма ресурса остаются 2 и 4.

  5. Расчёт, пропускающий неактивные движения, теперь даёт 0. Изменено только собственное содержимое в памяти.

Как проверить результат

  1. Девять сообщений Истина для нового набора с указанной подготовкой.

  2. После отключения активности обе строки присутствуют, однако учебный остаток равен 0.

Ожидаемый результат

Четыре независимых понятия — наличие строки, активность, запись движений документа и режим замещения — не смешаны.

На что обратить внимание

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

  2. Записывать=Ложь не запрещает прямую запись набора и не заменяет права доступа.

  3. БлокироватьДляИзменения применим в управляемом режиме при записи; чтение текущего Ложь не проверяет конкурентную безопасность.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Составить ключ и момент движения, не выдавая их за сохранённую запись

Ключ Регистратор+НомерСтроки и МоментВремени являются значениями. Их создание не проверяет наличие движения в информационной базе.

Где и как запускать

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Создайте НОВУЮ пустую файловую базу, имя корневой конфигурации УчебныеОстатки85. Не добавляйте эти объекты в УТ/КА2/УНФ/БП. Режим управления блокировкой данных конфигурации — Управляемый.

  2. Документы → Добавить: УчебноеДвижение85. Номер: Строка длиной 40, автонумерация выключена. Модули объекта и менеджера оставьте пустыми; не добавляйте обработчики, подписки и обязательные пользовательские реквизиты.

  3. Регистры накопления → Добавить: УчебныеОстатки85. Вид регистра Остатки. Единственное измерение КодТовара: Строка 50, индексировать, проверка заполнения Показывать ошибку. Единственный ресурс Количество: Число 12,3, неотрицательное. Дополнительных реквизитов нет.

  4. В списке регистраторов выберите только собственный документ УчебноеДвижение85. Оставьте модули регистра пустыми, использование итогов включённым. Планы обмена, разделители, историю данных и фоновые задания для урока не создавайте.

  5. Обновите конфигурацию базы данных. Создайте серверный общий модуль УчебныеЗадачи и команду собственной обработки. Фрагмент вставьте внутрь ВыполнитьПример() Экспорт; запускайте задачи по отдельности.

  6. Первые задачи работают с незаписанными наборами. Только задачи с пометкой «в собственной транзакции» временно записывают два собственных документа и движения, затем обязательно отменяют транзакцию. В рабочей базе этот код не запускайте.

Если Метаданные.Документы.Количество() <> 1
    Или Метаданные.РегистрыНакопления.Количество() <> 1
    Или Метаданные.Документы.Найти("УчебноеДвижение85") = Неопределено Тогда
    ВызватьИсключение "Разрешены только собственный учебный документ и регистр";
КонецЕсли;
Описание = Метаданные.РегистрыНакопления.Найти("УчебныеОстатки85");
Если Описание = Неопределено Тогда
    ВызватьИсключение "Сначала создайте собственный учебный регистр";
КонецЕсли;
Если Описание.ВидРегистра <> Метаданные.СвойстваОбъектов.ВидРегистраНакопления.Остатки
    Или Описание.Измерения.Количество() <> 1
    Или Описание.Ресурсы.Количество() <> 1
    Или Описание.Реквизиты.Количество() <> 0
    Или Описание.Измерения.Найти("КодТовара") = Неопределено
    Или Описание.Ресурсы.Найти("Количество") = Неопределено Тогда
    ВызватьИсключение "Нужен регистр остатков с КодТовара и Количество";
КонецЕсли;
Менеджер = РегистрыНакопления.УчебныеОстатки85;
Код = "TRAIN-" + Строка(Новый УникальныйИдентификатор);
СсылкаНаНесохраненный = Документы.УчебноеДвижение85.ПолучитьСсылку(Новый УникальныйИдентификатор);
Набор = Менеджер.СоздатьНаборЗаписей();
Набор.Отбор.Регистратор.Установить(СсылкаНаНесохраненный);
Приход = Набор.ДобавитьПриход();
Приход.Период = Дата(2026, 9, 15, 10, 0, 0);
Приход.Регистратор = СсылкаНаНесохраненный;
Приход.Активность = Истина;
Приход.КодТовара = Код;
Приход.Количество = 3;
Расход = Набор.ДобавитьРасход();
Расход.Период = Дата(2026, 9, 15, 11, 0, 0);
Расход.Регистратор = СсылкаНаНесохраненный;
Расход.Активность = Истина;
Расход.КодТовара = Код;
Расход.Количество = 1;
Ключ = Менеджер.СоздатьКлючЗаписи(Новый Структура("Регистратор,НомерСтроки", СсылкаНаНесохраненный, 1));
Сообщить(Ключ.Регистратор = СсылкаНаНесохраненный);
Сообщить(Ключ.НомерСтроки = 1);
Момент = Приход.МоментВремени();
Сообщить(Момент.Дата = Приход.Период);
Сообщить(Момент.Ссылка = СсылкаНаНесохраненный);
ВключающаяГраница = Новый Граница(Момент, ВидГраницы.Включая);
Сообщить(ВключающаяГраница.Значение = Момент);
Сообщить(ВключающаяГраница.ВидГраницы = ВидГраницы.Включая);
Выборка = Менеджер.ВыбратьПоРегистратору(СсылкаНаНесохраненный);
Сообщить(Не Выборка.Следующий());

Разбор по шагам

  1. СоздатьКлючЗаписи принимает структуру именно ключевых полей: Регистратор и НомерСтроки, не код товара.

  2. Число 1 в ключе — заданный нами идентификатор, не результат Набор.Индекс. Записи с таким ключом может не существовать.

  3. МоментВремени движения включает его период и ссылку-регистратор. Он точнее простой даты при упорядочивании разных документов.

  4. Граница с видом Включая явно включает своё граничное значение. Само создание границы не читает остатки.

  5. ВыбратьПоРегистратору и первый Следующий показывают отсутствие сохранённых движений по собственной несохранённой ссылке.

Как проверить результат

  1. Семь сравнений Истина; выборка базы пустая, хотя значения ключа и момента успешно созданы.

  2. Набор по-прежнему содержит два собственных движения в памяти.

Ожидаемый результат

Отделены идентификатор записи, момент движения, граница интервала и проверка существования в базе.

На что обратить внимание

  1. Не показывайте пользователю «движение найдено» только потому, что СоздатьКлючЗаписи вернул объект.

  2. НомерСтроки в ключе не равен индексу текущей коллекции и не заменяет регистратор.

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

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.