15.11.2024 Семён Мельников 5714
Удаление дублей из массива в 1С:Предприятие

Содержание:

1.    Способ 1: Использование временного массива

2.    Способ 2: Использование структуры в системе программ 1С:Предприятие

3.    Способ 3: Встроенных функций и их использование в системе учета 1С:Предприятие

   

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


1. Способ 1: Использование временного массива


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


// Исходный массив
ИсходныйМассив = Новый Массив;
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("B");
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("C");

// Временный массив для уникальных значений
УникальныеЗначения = Новый Массив;

// Проходим по исходному массиву
Для Каждого Значение Из ИсходныйМассив Цикл
// Проверяем, есть ли значение во временном массиве
Если Не УникальныеЗначения.Найти(Значение) Тогда
УникальныеЗначения.Добавить(Значение);
КонецЕсли;
КонецЦикла;

// Результат
Сообщить("Уникальные значения: " + УникальныеЗначения);  

2. Способ 2: Использование структуры в системе программ 1С:Предприятие


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

// Исходный массив
ИсходныйМассив = Новый Массив;
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("B");
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("C");

// Структура для хранения уникальных значений
УникальныеЗначения = Новый Структура;

// Проходим по исходному массиву
Для Каждого Значение Из ИсходныйМассив Цикл
// Добавляем значение в структуру, если его еще нет
УникальныеЗначения.Вставить(Значение, Истина);
КонецЦикла;

// Преобразуем структуру обратно в массив
Результат = Новый Массив;
Для Каждого Ключ Из УникальныеЗначения.Ключи() Цикл
Результат.Добавить(Ключ);
КонецЦикла;

// Результат
Сообщить("Уникальные значения: " + Результат);

3. Способ 3: Встроенных функций и их использование в системе учета 1С:Предприятие


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



// Исходный массив
ИсходныйМассив = Новый Массив;
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("B");
ИсходныйМассив.Добавить("A");
ИсходныйМассив.Добавить("C");

// Удаляем дубли (если такая функция доступна)
УникальныеЗначения = УдалитьДубли(ИсходныйМассив);

// Результат
Сообщить("Уникальные значения: " + УникальныеЗначения);


Удаление дублей из массива в 1С:Предприятие — это задача, которую можно решить несколькими способами. Выбор метода зависит от конкретных требований и условий задачи. Используя временные массивы или структуры, вы можете эффективно управлять уникальностью данных и оптимизировать свою работу с массивами.

 

Специалист компании ООО "Кодерлайн"

Семён Мельников

Наши проекты

Автоматизация системы учета продаж газа на базе «1С:ERP Управление предприятием 2.0»
ООО «Эйр Продактс Газ»

Отрасль:
Производство промышленных газов

Внедренное типовое решение:
1С:ERP Управление предприятием 2.0

- Расчеты с контрагентами;
- Производственные операции;
- Управление скла...

Внедрение ПП "1С:Бухгалтерия 8 ПРОФ" в ООО "ДЕКОР"
ООО «ДЕКОР»

Отрасль:
Производство

Внедренное типовое решение:
1С:Бухгалтерия 8 ПРОФ

Управление персоналом и кадровый учет (HRM):
- Кадровый учет
- Расчет зарпл...

Установка программного продукта БИТ.Финанс для 1С:Бухгалтерия 8
ООО «Джи Эй Си Шиппинг энд Лоджистикс»

Отрасль:
Транспорт

Внедренное типовое решение:
БИТ.Финанс

Построение единого информационного пространства финансовой службы;
Учет ...

АО «Аэроклуб»
АО «Аэроклуб»

Отрасль:
Услуги в области делового туризма

Внедренное типовое решение:
1С:Бухгалтерия 8 КОРП

Проведение серии интервью с руководством и ключевыми специалистами Разраб...

ООО «Аэроэкспресс»
ООО «Аэроэкспресс»

Отрасль:

Внедренное типовое решение:
1С:ERP. Управление холдингом

· Планирование закупок · Управление закупочными процедурами, включая 223 ФЗ ...

ЗАО «Ламбумиз»
ЗАО «Ламбумиз»

Отрасль:
Производство картонной упаковки

Внедренное типовое решение:
1С:ERP Управление предприятием 2.0

- Маркетинг;
- Продажи;
- Планирование закупок;
- Закупки;
- Регламенти...

Московский филиал ООО «Авиакомпания «Икар»
Московский филиал ООО «Авиакомпания «Икар»

Отрасль:
Авиаперевозки

Внедренное типовое решение:
1С:Бухгалтерия КОРП

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

ООО «ПКП КАБЭЛЕКТРОСНАБ»
ООО «ПКП КАБЭЛЕКТРОСНАБ»

Отрасль:
Производство кабельной продукции

Внедренное типовое решение:
1С:Управление небольшой фирмой 1.6

- Оформление заказов покупателей;
- Управление складскими запасами;
- Ана...

ПАО «АрселорМиттал Кривой Рог»
ПАО «АрселорМиттал Кривой Рог»

Отрасль:
Металлургическая промышленность

Внедренное типовое решение:
1С:Управление производственным предприятием для Украины

- Кадровый учет
- Расчет зарплаты
- Регламентированная отчетность
- Уч...

Внедрение «1С:Зарплата и управление персоналом 8 КОРП» в компании «ПБК»
ООО «Партнер Бухгалтер Консультант»

Отрасль:
Бухгалтерские услуги

Внедренное типовое решение:
1С:Зарплата и управление персоналом

- Интеграция продукта с базой данных оперативного учета Axapta;
- Доработка фу...

Компания IBS
Компания IBS

Отрасль:
Системный интегратор

Внедренное типовое решение:
1С:Управление производственным предприятием

- Интеграция систем – АСУП и «1С:Управление производственным предприятием»...

ФГОУ ВПО «Горский государственный аграрный университет»
ФГОУ ВПО «Горский государственный аграрный университет»

Отрасль:
Образование

Внедренное типовое решение:
1С:Колледж ПРОФ

- Управление персоналом и кадровый учет (HRM):
Кадровый учет
Управление об...

Наши соц. сети

Telegram-канал «Koderline 1С» Группа в Вконтакте «Кодерлайн КОРП» Rutube

Остались вопросы - обратитесь к нам!

Впишите свои Имя и Телефон, чтобы мы ответили на все интересующие Вас вопросы.
ФИО*
E-mail*
Телефон*
Сообщение