fbpx
  • slide microsft
  • slide aida64
  • Windows 8.1 вышла в свет
  • Установка Apple TrackPad на Windows
  • Windows 9
  • Завершение процессов на удаленном компьютере Windows
  • Что такое UEFI
  • Названа дата выхода Windows 10
  • Облачное хранилище Hive прекращает деятельность
  • Скрипт установки принтеров Canon LBP на Linux Ubuntu (обновлено)
  • Как качать с торрента
  • Lineage OS не будет предоставлять пользователям root-права
  • Стал тормозить SSD ? А у вас есть trim ?
  • Релиз KDE 4.8
  • Assassin's Creed 4: Black Flag. Преимущества игр нового поколения.
  • Два диска
  • Что означают тесты в AIDA64
  • Dirt Rally будет работает на Linux
  • Умер Ральф Баер, родитель игровых консолей
  • Увеличение размера виртуального и системного диска в Windows Server без остановки VMWare
  • Новый Adobe Photoshop CC взломан через день после релиза
  • В сеть просочилась предположительно финальная версия Windows 10
  • Почему-то камеры постоянно глючат
  • Разгон, изменение и прошивка BIOS видеокарт Nvidia
  • Дергается курсор мышки в Windows 7. Решение
  • Microsoft Windows 8.1 Preview доступен для бесплатного скачивания
  • Сброс пароля пользователя на MacOS
  • Winamp прекращает свое существование
июнь20

Свернуть массив в 1С

Троцкий Юрий

Свернуть массив в 1С

Один из вариантов решения свертки массива в 1С.

толстый клиент, тонкий клиент

 

   т.к. в 1С еще пока нет встроенной функции или процедуры по сворачиванию массива, предлагаю вам один из вариантов решения этой задачи.

     Из особенностей работы этого кода - он не будет суммировать значения (как работает свертка в таблице значений), в большей степени он больше работает как фильтр от повторяющихся значений. 


Фунцкция СвернутьМассив (МойМассивДляСвертки)

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

P.S. Так-же мы предоставлям надежное обланое хранилище для ваших баз 1С. Подробнее...

Оставить комментарий

Пожалуйста, войдите, чтобы комментировать.