Создание таблиц в 1С: от справочников до регистров накопления

• Количество (тип Число, точность 3)

Теперь нужно настроить движение документа в регистр. Откройте документ, который будет изменять остатки (например, ПоступлениеТоваров), и на вкладке Движения добавьте регистр ТоварыНаСкладах. В модуле документа пропишите обработчик проведения:

Процедура ОбработатьПроведение(Отказ, Режим)
Движения.ТоварыНаСкладах.Записать();

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

После этого при проведении документа "Поступление товаров" данные будут автоматически записываться в регистр ТоварыНаСкладах, и вы сможете строить отчеты по остаткам.

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

5. Программное создание таблиц: встроенный язык 1С

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

Создание таблицы значений (временной таблицы в памяти):

ТаблицаТоваров = Новый ТаблицаЗначений;
ТаблицаТоваров.Колонки.Добавить("Номенклатура", Новый ОписаниеТипов("СправочникСсылка.Номенклатура"));
ТаблицаТоваров.Колонки.Добавить("Количество", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(10, 3)));
ТаблицаТоваров.Колонки.Добавить("Цена", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(10, 2)));

// Добавление строки
НоваяСтрока = ТаблицаТоваров.Добавить();
НоваяСтрока.Номенклатура = Справочники.Номенклатура.НайтиПоНаименованию("Стул офисный");
НоваяСтрока.Количество = 5;
НоваяСтрока.Цена = 1200;

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

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   Номенклатура.Наименование КАК Товар,
|   СУММА(ДокументТовары.Количество) КАК Количество
|ИЗ
|   Документ.ПоступлениеТоваров.Товары КАК ДокументТовары
|       ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.Номенклатура КАК Номенклатура
|       ПО ДокументТовары.Номенклатура = Номенклатура.Ссылка
|ГДЕ
|   ДокументТовары.Ссылка.Дата МЕЖДУ &НачалоПериода И &КонецПериода
|СГРУППИРОВАТЬ ПО
|   Номенклатура.Наименование";

Запрос.УстановитьПараметр("НачалоПериода", НачалоМесяца(ТекущаяДата()));
Запрос.УстановитьПараметр("КонецПериода", КонецМесяца(ТекущаяДата()));

РезультатЗапроса = Запрос.Выполнить();
ТаблицаРезультата = РезультатЗапроса.Выгрузить();

Динамическое создание справочника (только для опытных разработчиков!):

НовыйСправочник = Метаданные.ДобавитьОбъект("Справочник", "НовыйСправочник");
НовыйСправочник.Синоним = "Тестовый справочник";
НовыйСправочник.Иерархический = Ложь;

Реквизит = НовыйСправочник.Реквизиты.Добавить();
Реквизит.Имя = "Описание";
Реквизит.Тип = Новый ОписаниеТипов("Строка", Новый КвалификаторыСтроки(100));

// Сохранение изменений в метаданных
Метаданные.Записать();

⚠️ Внимание: Динамическое изменение метаданных (Метаданные.ДобавитьОбъект) может привести к нестабильной работе базы. Используйте этот метод только в крайних случаях и обязательно делайте резервную копию перед изменениями.

Таблица.Индексировать("Номенклатура");
НайденныеСтроки = Таблица.НайтиСтроки(Новый Структура("Номенклатура", СсылкаНаНоменклатуру));

6. Типовые ошибки и как их избежать

Даже опытные разработчики сталкиваются с проблемами при работе с таблицами в 1С. Вот наиболее распространенные ошибки и способы их предотвращения:

Одна из самых коварных ошибок — несовпадение типов данных при связывании таблиц. Например, если в справочнике "Номенклатура" поле "Артикул" имеет тип Строка(20), а в документе "ПоступлениеТоваров" вы пытаетесь записать в него значение типа Число, платформа не выдаст ошибку сразу, но данные будут искажены. Всегда проверяйте типы связанных полей!

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

• 🔒 НачатьТранзакцию() и ЗафиксироватьТранзакцию() для группировки операций
• 🔄 Настройку РежимУправленияБлокировкойДанных в модуле приложения
• ⚡ Оптимизацию запросов (избегайте ПОМЕСТИТЬ в циклах)

7. Оптимизация таблиц для больших баз данных

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

1. Индексирование полей

Добавьте индексы для полей, по которым часто выполняется поиск или сортировка. Например, для справочника "Номенклатура" имеет смысл проиндексировать поля "Артикул" и "Штрихкод":

Индекс = Справочники.Номенклатура.Индексы.Добавить();
Индекс.Имя = "ИндексПоАртикулу";
Индекс.Поля.Добавить("Артикул");

2. Разделение больших таблиц

Если регистр накопления содержит более 10 млн записей, разделите его по периодам (например, ТоварыНаСкладах2023, ТоварыНаСкладах2026). Для этого:

• Создайте копию регистра с другим именем
• Настройте правила переноса данных через ОбработкаПроведения
• В запросах используйте объединение (ОБЪЕДИНИТЬ) для выборки из нескольких регистров

3. Использование виртуальных таблиц

Для отчетов по большим объемам данных используйте виртуальные таблицы регистров. Они формируются на лету и не нагружают базу:

Запрос.Текст =
"ВЫБРАТЬ
|   Номенклатура,
|   СУММА(Количество) КАК Остаток
|ИЗ
|   РегистрНакопления.ТоварыНаСкладах.Остатки(&ДатаОтчета,) КАК ТоварыНаСкладахОстатки
|ГДЕ
|   Склад = &ТекущийСклад
|СГРУППИРОВАТЬ ПО
|   Номенклатура";

4. Архивирование старых данных

Для регистров с историей (например, курсы валют) настройте автоматическое архивирование данных старше 3-5 лет. Это можно сделать через:

• 🗃️ Регламентное задание, которое переносит данные в отдельную таблицу
• 📁 Использование ХранилищеЗначения для редко используемых данных
• 🗑️ Полное удаление устаревших записей (только если это допустимо по бизнес-логике)

⚠️ Внимание: Перед любыми манипуляциями с большими таблицами (архивирование, разделение, удаление) обязательно:

1. Создайте резервную копию базы (Администрирование → Выгрузить информационную базу)
2. Протестируйте изменения на копии рабочей базы
3. Сообщите пользователям о времени проведения работ

8. Интеграция таблиц 1С с внешними системами

Часто данные из таблиц 1С нужно обменивать с другими системами: сайтами, CRM, бухгалтерскими программами. Для этого используются стандартные механизмы платформы.

1. Выгрузка в Excel/CSV

Самый простой способ — выгрузить таблицу значений в файл:

ТаблицаДанных = ПолучитьДанныеДляВыгрузки(); // Ваша функция формирования данных
Экспорт = Новый ЭкспортДанныхВExcel;
Экспорт.УстановитьДанные(ТаблицаДанных);
Экспорт.ИмяФайла = "C:\Export\Товары.xlsx";
Экспорт.Выгрузить();

2. Обмен через XML/JSON

Для интеграции с веб-сервисами используйте ЗаписьXML и ЧтениеJSON:

// Сериализация в JSON
СтруктураДанных = Новый Структура;
СтруктураДанных.Вставить("Номенклатура", Справочники.Номенклатура.НайтиПоНаименованию("Стол"));
СтруктураДанных.Вставить("Цена", 5000);

ЗаписьJSON = Новый ЗаписьJSON;
ЗаписьJSON.УстановитьСтроку();
ЗаписьJSON.ЗаписатьJSON(СтруктураДанных);
ТекстJSON = ЗаписьJSON.Закрыть();

// Десериализация из XML
ЧтениеXML = Новый ЧтениеXML;
ЧтениеXML.ОткрытьФайл("C:\Import\Data.xml");
Данные = ЧтениеXML.ПрочитатьXML();

3. Прямой обмен с базами данных

Для работы с SQL, PostgreSQL или другими СУБД используйте ADODB.Connection или HTTPСервис:

Соединение = Новый COMОбъект("ADODB.Connection");
Соединение.Open("Driver={SQL Server};Server=myServer;Database=myDB;UID=user;PWD=password;");

ЗапросSQL = Новый COMОбъект("ADODB.Recordset");
ЗапросSQL.Open("SELECT * FROM Products", Соединение);

// Обработка результатов
Пока Не ЗапросSQL.EOF Цикл
Сообщить(ЗапросSQL.Fields("Name").Value);
ЗапросSQL.MoveNext();
КонецЦикла;

4. Использование веб-сервисов и HTTP-запросов

Для обмена с облачными сервисами (МойСклад, Битрикс24) используйте HTTPСоединение:

HTTP = Новый HTTPСоединение("api.moysklad.ru", 443, "", "", Истина);
HTTP.Заголовки.Вставить("Authorization", "Bearer YOUR_TOKEN");

Запрос = Новый HTTPЗапрос("/api/remap/1.2/entity/product");
Ответ = HTTP.Получить(Запрос);
Данные = Новый ЧтениеJSON;
Данные.УстановитьСтроку(Ответ.ПолучитьТекст());
Результат = Данные.ПрочитатьJSON();

⚠️ Внимание: При обмене данными через интернет всегда:

• 🔐 Используйте HTTPS вместо HTTP
• 🔑 Храните токены и пароли в ХранилищеОбщихНастроек, а не в коде
• 📡 Проверяйте доступность сервера перед отправкой больших пакетов данных
• 📦 Разбивайте большие выгрузки на пакеты по 100-500 записей

FAQ: Частые вопросы по работе с таблицами в 1С