fbpx
  • slide microsft
  • slide aida64
  • Dj TRO vol.1 (Альбом 2000 года)
  • Оптимизация запуска приложений в Linux
  • Анонсирован Mortal Kombat X
  • Российская Госдума приняла закон о блокировке сайтов с пиратскими фильмами
  • Медленная скорость Интернет/RDP соединения Windows
  • Падение сервера 1С после переименования компьютера
  • Mortal Kombat Komplete Edition официально анонсирован для PC
  • Microsoft прекращает развитие графического редактора Paint
  • Увеличить ТИЦ
  • Новый Adobe Photoshop CC взломан через день после релиза
  • Завершение процессов на удаленном компьютере Windows
  • Драйвера Nvidia 295.73
  • Раздача интернета через Wi-Fi
  • Автозагрузка в Windows 10
  • В Steam появилась возможность трансляции (Broadcast)
  • Китайцы назвали WINDOWS 8 угрозой для страны
  • Как говорить с техподдержкой
  • Создание своего Ubuntu Live CD
  • Свет в конце тоннеля для игр на Linux
  • С днем системного администратора !
  • AMD представила первые настольные процессоры с частотой до 5,0 ГГц
  • Как скрыть файлы в Linux MINT
  • Функция хеширования (конвертирования) строки в MD5 для 1С
  • Активация Windows 8 v.2
  • Создание загрузочной/установочной USB-Флешки c Linux
июнь20

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

Троцкий Юрий

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

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

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

 

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

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


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

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

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

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

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