Добавление записи в непериодический независимый регистр сведений 1С 8: все способы

Работа с регистрами сведений в 1С:Предприятие 8 — одна из ключевых задач для разработчиков и администраторов системы. Среди всех типов регистров именно непериодические независимые выделяются своей простотой и универсальностью: они хранят данные без привязки ко времени и не зависят от движений документов. Такие регистры часто используют для хранения справочной информации — например, курсов валют, классификаторов или настроек системы.

Однако даже с этим простым объектом у новичков возникают сложности: как правильно добавить запись, чтобы не нарушить целостность данных? Какие методы существуют — программные или через интерфейс? И почему иногда запись"не хочет" сохраняться? В этой статье разберём все актуальные способы добавления записей, от ручного заполнения до написания кода на встроенном языке, а также типичные ошибки, которые мешают успешному сохранению.

Особенность непериодических независимых регистров в том, что они не требуют указания периода (в отличие от периодических) и не привязаны к документам (в отличие от подчинённых). Это делает их удобными для хранения статичных данных, но одновременно накладывает ответственность на разработчика: контроль уникальности и корректности записей ложится полностью на плечи того, кто их добавляет.

Что такое непериодический независимый регистр сведений

Прежде чем добавлять записи, важно понять, с каким именно объектом вы работаете. Непериодический независимый регистр сведений — это структура данных в 1С:Предприятие 8, которая:

• 📌 Хранит информацию без привязки к дате (в отличие от периодических регистров, где каждая запись имеет период действия).
• 🔗 Не зависит от документов (в отличие от подчинённых регистров, которые заполняются автоматически при проведении документов).
• 🗃️ Чаще всего используется для справочных данных: например, списков банков, кодов ОКВЭД или настроек программы.

Пример из жизни: если вам нужно хранить актуальные курсы валют ЦБ РФ, но при этом не привязывать их к конкретному документу (например, к приходному ордеру), то непериодический независимый регистр — идеальный выбор. Данные в нём обновляются по мере необходимости, а не по расписанию документов.

Важно отличать его от других типов регистров:

• 📅 Периодический независимый — хранит данные с привязкой к дате (например, история изменения цен).
• 📑 Подчинённый регистр — заполняется автоматически при проведении документов (например, движения по складу).

Способы добавления записей: обзор методов

Добавить запись в непериодический независимый регистр сведений можно несколькими способами. Выбор метода зависит от вашей роли в системе и задачи:

Разберём каждый способ подробнее, начиная с самого простого.

На практике чаще всего используется программное добавление, так как оно позволяет автоматизировать процесс и избежать ошибок при ручном вводе. Однако для разовых задач или тестирования удобнее работать напрямую в интерфейсе 1С:Предприятия.

Ручное добавление записи через интерфейс 1С

Если вам нужно добавить одну-две записи, проще всего сделать это вручную. Для этого не требуется знание программирования — достаточно прав на редактирование регистра.

Инструкция по шагам:

1. Откройте 1С:Предприятие в режиме 1С:Предприятие (не конфигуратор!).
2. Перейдите в меню Все функции → Регистры сведений (путь может отличаться в зависимости от конфигурации).
3. Найдите в списке нужный непериодический независимый регистр и откройте его.
4. Нажмите кнопку Создать (или Добавить, в зависимости от версии платформы).
5. Заполните поля записи. Обязательные поля обычно выделены красным или отмечены звёздочкой.
6. Сохраните запись кнопкой Записать и закрыть.

При ручном добавлении обратите внимание на:

• 🔑 Уникальность записей. Если регистр имеет измерения (например, КодВалюты), то комбинация значений измерений должна быть уникальной. При попытке добавить дубль система выдаст ошибку.
• 📝 Заполнение реквизитов. Некоторые реквизиты могут быть обязательными (например, Курс для регистра валют).
• 🔒 Права доступа. Если кнопка Создать неактивна, проверьте права вашей роли в настройках пользователя.

Заполнены все обязательные поля|Уникальность комбинации измерений|Корректность форматов данных (числа, даты)|Права на запись-->

Если при сохранении возникает ошибка типа "Нарушение уникальности", значит, в регистре уже есть запись с такой же комбинацией измерений. В этом случае нужно либо редактировать существующую запись, либо удалить её перед добавлением новой.

Программное добавление записи на встроенном языке

Для автоматизации или массового заполнения регистра используют встроенный язык 1С. Этот метод требует знания основ программирования, но даёт полный контроль над процессом.

Базовый код для добавления записи выглядит так:

Регистр = РегистрыСведений.ИмяВашегоРегистра.СоздатьМенеджерЗаписи;
НоваяЗапись = Регистр.СоздатьЗапись;
НоваяЗапись.Измерение1 = Значение1; // Например, НоваяЗапись.Валюта = Справочники.Валюты.НайтиПоНаименованию("USD");
НоваяЗапись.Реквизит1 = Значение2; // Например, НоваяЗапись.Курс = 90.5;
НоваяЗапись.Записать;

Разберём этот код по строкам:

1. СоздатьМенеджерЗаписи — получаем менеджер записи для работы с регистром.
2. СоздатьЗапись — создаём новую запись.
3. Заполняем измерения и реквизиты (например, Валюта и Курс).
4. Записать — сохраняем запись в базу.

Пример для регистра валют:

МенеджерЗаписи = РегистрыСведений.КурсыВалют.СоздатьМенеджерЗаписи;
Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.Валюта = Справочники.Валюты.НайтиПоКоду("840"); // Код USD
Запись.Курс = 92.34;
Запись.Записать;

Для массового добавления записей используйте цикл:

Для Каждого Строка Из ТаблицаДанных Цикл
Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.Измерение1 = Строка.Поле1;
Запись.Реквизит1 = Строка.Поле2;
Запись.Записать;
КонецЦикла;

Если при записи возникает ошибка, используйте конструкцию Попытка...Исключение для обработки:

Попытка
Запись.Записать;
Исключение
Сообщить("Ошибка при записи:" + ОписаниеОшибки);
КонецПопытки;

Типичные ошибки и их решение

Даже опытные разработчики сталкиваются с ошибками при работе с регистрами сведений. Вот самые распространённые проблемы и способы их устранения:

1. Нарушение уникальности

⚠️ Внимание: Если регистр имеет измерения (например, Валюта и Дата), то комбинация их значений должна быть уникальной. При попытке добавить дубль система выдаст ошибку "Нарушение уникальности".

Решение:

• 🔍 Проверьте существующие записи через метод НайтиПоИзмерениям.
• 🗑️ Удалите старую запись перед добавлением новой (если это допустимо логикой работы).
• 🔄 Используйте метод Записать(РежимЗаписиРегистраСведений.Замена), чтобы заменить существующую запись.

2. Ошибка"Недостаточно прав"

Если при попытке записи возникает ошибка доступа, проверьте:

• 👤 Права текущего пользователя на запись в регистр (настройка ролей в конфигураторе).
• 🔐 Права на объекты, которые ссылаются в записи (например, на справочник Валюты).
• 🛡️ Настройки RLS (ограничение прав на уровне записей), если они используются.

3. Ошибки привязки к справочникам

Если запись ссылается на элемент справочника (например, Запись.Валюта = Справочники.Валюты.НайтиПоНаименованию("USD")), убедитесь, что:

• 📖 Справочник не пустой (элемент существует).
• 🔤 Наименование или код указаны верно (учтите регистр символов!).
• 🔄 Если используете НайтиПоРеквизиту, проверьте актуальность реквизита.

4. Проблемы с транзакциями

Если запись добавляется в рамках транзакции, но не сохраняется, проверьте:

• 🔄 Корректность завершения транзакции (ЗафиксироватьТранзакцию).
• 🛑 Отсутствие ошибок до фиксации (иначе транзакция откатится).
• 🔒 Возможные блокировки таблиц другими сеансами.

Пример кода с обработкой транзакции:

НачатьТранзакцию;
Попытка
Запись.Записать;
ЗафиксироватьТранзакцию;
Исключение
ОтменитьТранзакцию;
Сообщить("Ошибка:" + ОписаниеОшибки);
КонецПопытки;

Массовая загрузка данных из внешних источников

Если нужно загрузить в регистр сотни или тысячи записей (например, классификатор адресов или курсы валют за год), ручной ввод не подходит. В таких случаях используют загрузку из внешних файлов: Excel, XML, JSON или CSV.

Алгоритм массовой загрузки:

1. Подготовьте файл с данными в удобном формате (например, Excel с колонками, соответствующими измерениям и реквизитам регистра).
2. Создайте обработку для чтения файла. Для Excel можно использовать COMОбъект("Excel.Application") или библиотеку OneScript.Xlsx.
3. Напишите код для добавления записей в регистр (аналогично примеру в разделе про программное добавление, но в цикле).
4. Добавьте обработку ошибок и логгирование (например, запись неудачных строк в отдельный файл).

Пример кода для загрузки из Excel:

Excel = Новый COMОбъект("Excel.Application");
РабочаяКнига = Excel.Workbooks.Open("C:\data.xlsx");
Лист = РабочаяКнига.Sheets(1);

Строка = 2; // Пропускаем заголовок
Пока Лист.Cells(Строка, 1).Value <> Неопределённо Цикл
МенеджерЗаписи = РегистрыСведений.КурсыВалют.СоздатьМенеджерЗаписи;
Запись = МенеджерЗаписи.СоздатьЗапись;

КодВалюты = Лист.Cells(Строка, 1).Value;
Курс = Лист.Cells(Строка, 2).Value;

Запись.Валюта = Справочники.Валюты.НайтиПоКоду(КодВалюты);
Запись.Курс = Курс;

Попытка
Запись.Записать;
Исключение
ЗаписатьВЛог("Ошибка в строке" + Строка +":" + ОписаниеОшибки);
КонецПопытки;

Строка = Строка + 1;
КонецЦикла;

Для ускорения массовой загрузки:

• 🚀 Используйте пакетную запись (метод Записать с параметром РежимЗаписиРегистраСведений.Добавление).
• 🔄 Отключите проверку прав на время загрузки (если вы администратор и уверены в данных).
• 📊 Разбейте большой файл на части, чтобы избежать тайм-аутов.

ТекстJSON = Новый ЧтениеТекста("C:\data.json");
Данные = ПрочитатьJSON(ТекстJSON.Прочитать);
Для Каждого Элемент Из Данные Цикл
Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.Измерение1 = Элемент.Свойство1;
Запись.Записать;
КонецЦикла;

Практические примеры: курсы валют и классификаторы

Рассмотрим двачных сценария использования непериодических независимых регистров сведений.

Пример 1: Хранение курсов валют

Допустим, у нас есть регистр КурсыВалют с измерением Валюта (ссылка на справочник Валюты) и реквизитом Курс (число). Нам нужно обновить курс доллара.

Код для обновления:

МенеджерЗаписи = РегистрыСведений.КурсыВалют.СоздатьМенеджерЗаписи;
Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.Валюта = Справочники.Валюты.НайтиПоКоду("840"); // USD
Запись.Курс = 91.75;
Запись.Записать(РежимЗаписиРегистраСведений.Замена); // Заменим существующую запись

Пример 2: Классификатор ОКВЭД

Предположим, у нас есть регистр КлассификаторОКВЭД с измерением КодОКВЭД (строка) и реквизитом Наименование (строка). Нужно добавить новую запись для кода 62.01.

Код для добавления:

МенеджерЗаписи = РегистрыСведений.КлассификаторОКВЭД.СоздатьМенеджерЗаписи;
Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.КодОКВЭД ="62.01";
Запись.Наименование ="Разработка компьютерного программного обеспечения";
Запись.Записать;

Если классификатор ОКВЭД хранится во внешнем файле, можно автоматизировать загрузку:

Текст = Новый ЧтениеТекста("C:\оквед.csv");
Пока Текст.ПрочитатьСтроку Цикл
Данные = РазложитьСтрокуПоРазделителю(Текст.ТекущаяСтрока,";");
Код = Данные[0];
Наименование = Данные[1];

Запись = МенеджерЗаписи.СоздатьЗапись;
Запись.КодОКВЭД = Код;
Запись.Наименование = Наименование;
Запись.Записать;
КонецЦикла;

Важно: при загрузке классификаторов проверяйте актуальность данных! Например, коды ОКВЭД периодически обновляются, и использование устаревших значений может привести к ошибкам в отчётности.

Оптимизация работы с регистрами сведений

При интенсивной работе с регистрами (например, при массовой загрузке или частом обновлении данных) следует учитывать несколько рекомендаций для повышения производительности:

1. Используйте пакетную запись

Если нужно добавить много записей, лучше делать это в одной транзакции:

НачатьТранзакцию;
Для Каждого Элемент Из МассивДанных Цикл
Запись = МенеджерЗаписи.СоздатьЗапись;
// Заполняем запись
Запись.Записать;
КонецЦикла;
ЗафиксироватьТранзакцию;

2. Отключайте проверку прав (с осторожностью!)

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

УстановитьПривилегированныйРежим(Истина);
// Код добавления записей
УстановитьПривилегированныйРежим(Ложь);

⚠️ Внимание: Используйте привилегированный режим только в обработках, которые запускаются администратором! Неправильное использование может нарушить безопасность данных.

3. Проверяйте существование записей перед добавлением

Чтобы избежать ошибок уникальности, предварительно проверяйте наличие записи:

СуществующаяЗапись = МенеджерЗаписи.НайтиПоИзмерениям(Измерение1, Измерение2);
Если СуществующаяЗапись = Неопределённо Тогда
НоваяЗапись = МенеджерЗаписи.СоздатьЗапись;
// Заполняем и записываем
КонецЕсли;

4. Используйте индексы

Если регистр часто используется в запросах, убедитесь, что для его измерений созданы индексы. Это ускорит поиск и выборку данных. Проверьте индексы в конфигураторе на закладке Индексы в свойствах регистра.

5. Очищайте устаревшие данные

Если регистр со временем разрастается (например, в нём хранятся курсы валют за несколько лет), периодически очищайте ненужные записи:

Запрос = Новый Запрос;
Запрос.Текст ="ВЫБРАТЬ РАЗРЕШЕННЫЕ КурсыВалют КАК РегистрГде Регистр.Валюта = &Валюта";
Запрос.УстановитьПараметр("Валюта", Справочники.Валюты.НайтиПоКоду("840"));
Результат = Запрос.Выполнить;
Выборка = Результат.Выбрать;
Пока Выборка.Следующий Цикл
Выборка.Удалить;
КонецЦикла;

Для больших регистров (тысячи записей) рекомендуется использовать Прямые запросы к СУБД через Запрос.ВыполнитьПачкой, но это требует глубоких знаний SQL и структуры базы 1С.

FAQ: Частые вопросы по работе с регистрами сведений

МенеджерЗаписи = РегистрыСведений.ИмяРегистра.СоздатьМенеджерЗаписи;
Запись = МенеджерЗаписи.СоздатьЗапись;
// Заполняем поля
Запись.Записать;

РегистрыСведений.ИмяРегистра.Очистить;

Запрос = Новый Запрос;
Запрос.Текст ="ВЫБРАТЬ РАЗРЕШЕННЫЕ ИмяРегистра КАК Регистр";
Результат = Запрос.Выполнить;
Выборка = Результат.Выбрать;
Пока Выборка.Следующий Цикл
Выборка.Удалить;
КонецЦикла;

Сообщить("Попытка записи: Валюта=" + Запись.Валюта +", Курс=" + Запись.Курс);
Запись.Записать;
Сообщить("Запись сохранена:" +?(Запись.ЭтоНовая,"Да","Нет"));

Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.Workbooks.Add;
Лист = Книга.Sheets(1);

Запрос = Новый Запрос;
Запрос.Текст ="ВЫБРАТЬ
Регистр.Измерение1 КАК Измерение1,
Регистр.Реквизит1 КАК Реквизит1
ИЗ
РегистрСведений.ИмяРегистра КАК Регистр";
Результат = Запрос.Выполнить;
Выборка = Результат.Выбрать;

// Записываем заголовки
Лист.Cells(1, 1).Value ="Измерение1";
Лист.Cells(1, 2).Value ="Реквизит1";

// Записываем данные
Строка = 2;
Пока Выборка.Следующий Цикл
Лист.Cells(Строка, 1).Value = Выборка.Измерение1;
Лист.Cells(Строка, 2).Value = Выборка.Реквизит1;
Строка = Строка + 1;
КонецЦикла;

Excel.Visible = Истина;