Лайфхак: Три метода для таблицы значений

26.10.20

–1

Для тех, кто часто использует ТаблицаЗначений. Три метода для облегчения работы с этим объектом. Лично мне их не хватает, надеюсь разработчики платформы добавят в будущем.

1) Создать ТЗ с колонками в одну строку, заменяя

ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить("Имя");
ТЗ.Колонки.Добавить("Код");
ТЗ.Колонки.Добавить("Наименование");

на

ТЗ = НовыйТаблицаЗначений("Имя,Код,Наименование");

добавьте в свой код описание метода:

Функция НовыйТаблицаЗначений(Знач СтруктураКолонок)
    
    ТЗ = Новый ТаблицаЗначений;
    СтруктураКолонок = СтрЗаменить(СтруктураКолонок, " ", "") + ",";
    ПозРазд = Найти(СтруктураКолонок, ",");
    
    Пока ПозРазд > 0 Цикл
        ТЗ.Колонки.Добавить(Лев(СтруктураКолонок, ПозРазд - 1));
        СтруктураКолонок = Сред(СтруктураКолонок, ПозРазд + 1);
        ПозРазд = Найти(СтруктураКолонок, ",");
    КонецЦикла;
    
    Возврат ТЗ;
    
КонецФункции

2) Добавить строку ТЗ, заменяя

НовСтр = ТЗ.Добавить();
НовСтр.Имя = Имя;
НовСтр.Код = Код;

...
на

НовСтр = ДобавитьСтрокуТЗ(ТЗ, Новый Структура("Имя, Код", Имя, Значение, Код));

добавьте описание свой в код:

Функция ДобавитьСтрокуТЗ(ТЗ, ЗначенияПолей)
    
    НовСтр = ТЗ.Добавить();
    ЗаполнитьЗначенияСвойств(НовСтр, ЗначенияПолей);
    Возврат НовСтр;

КонецФункции

3) Краткий кусок кода для добавления к ТЗ строк другой Таблицы значений

Не метод. Старый способ, но может кто-то не знает:

Для Каждого СтрокаТЗ Из ТЗИсточник Цикл

ЗаполнитьЗначенияСвойств(ТЗПриемник.Добавить(), СтрокаТЗ);

КонецЦикла;

Таблицазначений

–1

См. также

Вставляем картинку из буфера обмена (платформа 1С 8.3.24)

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Задача: вставить картинку из буфера обмена на форму средствами платформы 1С.

1 стартмани

18.03.2024 2891 2 John_d 11

GUID в 1С 8.3 - как с ними быть

Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Пришлось помучиться с GUID-ами немного, решил поделиться опытом, мало ли кому пригодится.

12.02.2024 5049 atdonya 22

Переоткрытие внешних обработок

Универсальные функции Платформа 1С v8.3 Бесплатно (free)

На заключительных этапах, когда идет отладка или доработка интерфейса, необходимо много раз переоткрыть внешний объект. Вот один из способов автоматизации этого.

30.11.2023 4102 ke.92@mail.ru 16

Генерация штрихкода и QR, разбор настроек и примеры

БСП (Библиотека стандартных подсистем) Сканер штрих-кода Универсальные функции Этикетки, ценники Конфигурации 1cv8 Бесплатно (free)

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

15.09.2023 8260 YA_418728146 8

104

Валидация JSON через XDTO (включая массивы)

WEB-интеграция Универсальные функции Механизмы платформы 1С Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

При работе с интеграциями рано или поздно придется столкнуться с получением JSON файлов. И, конечно же, жизнь заставит проверять файлы перед тем, как записывать данные в БД.

28.08.2023 9381 YA_418728146 6

143

Печать непроведенных документов для УТ, КА, ERP. Настройка печати по пользователям, документам и печатным формам

Пакетная печать Печатные формы Адаптация типовых решений Универсальные функции Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Абонемент ($m)

Расширение для программ 1С:Управление торговлей, 1С:Комплексная автоматизация, 1С:ERP, которое позволяет распечатывать печатные формы для непроведенных документов. Можно настроить, каким пользователям, какие конкретные формы документов разрешено печатать без проведения документа.

2 стартмани

22.08.2023 2233 25 progmaster 8

Расширение: Быстрые отборы через буфер [Alt+C] Копировать список, [Alt+V] Вставить список, [Ctrl+C] Копировать из файлов

Инструментарий разработчика Универсальные функции Платформа 1С v8.3 Конфигурации 1cv8 1С:Розница 2 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Абонемент ($m)

Копирует в буфер значения из списков, из ячеек отчетов, таблиц, настроек списков, других отборов и вставляет в выбранную настройку отбора. Работает с Объект не найден. Работает как в одной так и между разными базами 1С. Использует комбинации [Alt+C] Копировать список, [Alt+V] Вставить список. Также для копирования данных используется стандартная [Ctrl+C] (например из открытого xls, mxl, doc и т.п. файла скопировать список наименований)

1 стартмани

13.10.2022 16355 142 sapervodichka 112

130

Система контроля ведения учета [БСП]

Универсальные функции Механизмы типовых конфигураций БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

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

18.07.2022 7355 quazare 8

110

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. FatPanzer 26.10.20 13:20 Сейчас в теме

Функция НовыйТаблицаЗначений(Знач СтруктураКолонок)
    
    ТЗ = Новый ТаблицаЗначений;
    СтруктураКолонок = СтрЗаменить(СтруктураКолонок, " ", "") + ",";
    ПозРазд = Найти(СтруктураКолонок, ",");
    
    Пока ПозРазд > 0 Цикл
        ТЗ.Колонки.Добавить(Лев(СтруктураКолонок, ПозРазд - 1));
        СтруктураКолонок = Сред(СтруктураКолонок, ПозРазд + 1);
        ПозРазд = Найти(СтруктураКолонок, ",");
    КонецЦикла;
    
    Возврат ТЗ;
    
КонецФункции

Показать

Это просто ужасно. Начиная с того, что нет типизации колонок, и заканчивая тем, что для разделения строки на составляющие есть метод СтрРазделить()

Для Каждого СтрокаТЗ Из ТЗИсточник Цикл
    ЗаполнитьЗначенияСвойств(ТЗПриемник.Добавить(), СтрокаТЗ);
КонецЦикла;

Мы ждали, и наконец-то дождались этого лайфхака!!!

4. Automatik 919 26.10.20 13:31 Сейчас в теме

(1) Типизация колонок лично мне очень редко нужна

8. Automatik 919 26.10.20 13:47 Сейчас в теме

(1) СтрРазделить() с 8.3.6 появилась, поэтому

12. mikl79 118 26.10.20 14:51 Сейчас в теме

(1), буду знать что есть СтрРазделить()
)))

2. quazare 3602 26.10.20 13:20 Сейчас в теме

предполагаю, Константин, что такой объект как "ТаблицаЗначений" уже устарел - если вы работаете с современным json - используйте соотвествия или структуры....

3. FatPanzer 26.10.20 13:22 Сейчас в теме

(2) Засуньте JSON в запрос в качестве параметра, и тогда появятся основания для дискуссии.

10. quazare 3602 26.10.20 14:35 Сейчас в теме

(3) чего????? ну насмешил, а для чего я написал про соответствия))))))))) или мы до сих пор используем "ГДЕ параметр В" (выгруженной колонке)????

16. SlavaKron 26.10.20 16:16 Сейчас в теме

(10) Научите как использовать соответствие в запросе?

5. user1464234 26.10.20 13:36 Сейчас в теме

Меня в свое время беспокоило, что структура выгрузки данных из 1с7 на что-то похожа, а я этого не учила в школе. А что если 1с работает с json на уровне ~~подсознания~~ СУБД/кэш/риб, но не позволяет использовать его в режиме разработки именно как язык программирования высокого уровня?

6. mikl79 118 26.10.20 13:38 Сейчас в теме

В 3 нужно еще нужно перед циклом ТЗПриемник = ТЗИсточник.СкопироватьКолонки()

7. FatPanzer 26.10.20 13:43 Сейчас в теме

(6) И все это завернуть в функцию СкопироватьТаблицуЗначений(Источник)...

9. Pryanishnikov_Vladimir 26.10.20 14:20 Сейчас в теме

Для Каждого СтрокаТЗ Из ТЗИсточник Цикл

ЗаполнитьЗначенияСвойств(ТЗПриемник.Добавить(), СтрокаТЗ);

КонецЦикла;

БСП:

ДополнитьТаблицу
Дополняет таблицу значений-приемник данными из таблицы значений-источник.
Синтаксис

Процедура ДополнитьТаблицу(ТаблицаИсточник, ТаблицаПриемник) Экспорт
Параметры

ТаблицаИсточник - ТаблицаЗначений - таблица, из которой будут браться строки для заполнения;
ТаблицаПриемник - ТаблицаЗначений - таблица, в которую будут добавлены строки из таблицы-источника.
Пример вызова

ОбщегоНазначенияКлиентСервер.ДополнитьТаблицу(ТаблицаИсточник, ТаблицаПриемник)

Доступность

Сервер, Тонкий клиент, Толстый клиент, Внешнее соединение

11. mikl79 118 26.10.20 14:45 Сейчас в теме

(9), тоже не плохо

только БСП скоро совсем отучит думать

13. quazare 3602 26.10.20 15:00 Сейчас в теме

(11) отучит выдумывать) БСП - это целая наука)

14. mikl79 118 26.10.20 15:19 Сейчас в теме

(13), выдумывать это и есть думать, изобретать, творить, создавать, т.е. мозгами шевелить

а когда пишешь - ОбщегоНазначенияКлиентСервер.ДополнитьТаблицу(ТаблицаИсточник, ТаблицаПриемник)

ты ведь не понимаешь на самом деле как происходит слияние таблиц

15. quazare 3602 26.10.20 15:24 Сейчас в теме

(14) спустя годы программирования - я только за БСП и только за него... я буду брать готовые функции, сокращая время своей работы - а вы поступайте как хотите

17. starik-2005 3036 26.10.20 16:21 Сейчас в теме

(15)

я буду брать готовые функции, сокращая время своей работы

А потом они окажутся в другом модуле и придется все немножко переписать. У меня такое развлечение раз в год примерно...

18. Азбука Морзе 105 26.10.20 16:36 Сейчас в теме

(17) Мыши плакали, кололись, но продолжали грызть кактус ©

19. quazare 3602 26.10.20 17:02 Сейчас в теме

напишу грубо - все кто не осилил БСП - придумывают отговорки. Да, конфигурация развивается хорошими темпами, но и старые там вещи довольно долго сохраняются... с пометкой "устарело", например, это касается функционала "Длительных операций"

но и плюсы - например, чтобы получить контактную информацию - я затрачу 5 секунд, используя БСП, а кто будет придумывать - минимум на набивание кода у него уйдет в 100 раз больше времени, если писать с нуля))))))

20. yermak 51 27.10.20 08:17 Сейчас в теме

ЗаполнитьЗначениеСвойств(ТЗ.Добавить(), Источник);

Это вместо 2

21. Pryanishnikov_Vladimir 27.10.20 13:12 Сейчас в теме

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

28. comptr 31 28.10.20 11:26 Сейчас в теме

(21) В "Источник" могут быть не все поля, которые нужно заполнить.

29. Automatik 919 02.11.20 05:19 Сейчас в теме

(21) Чтобы использовать далее в коде

22. gaglo 28.10.20 09:48 Сейчас в теме

По пункту 2 чего-то не понял.
НовСтр = ТЗ.Добавить();
НовСтр.Имя = Имя;
НовСтр.Код = Код;
57 символов
...
НовСтр = ДобавитьСтрокуТЗ(ТЗ, Новый Структура("Имя, Код", Имя, Значение, Код));
79 символов

Что мы выиграли?

23. user1464234 28.10.20 09:51 Сейчас в теме

(22) количество строк вероятно (мы же не знаем по каким критериям оценивается код)

24. gaglo 28.10.20 09:53 Сейчас в теме

(23)
НовСтр = ТЗ.Добавить(); НовСтр.Имя = Имя; НовСтр.Код = Код;
а теперь?

25. user1464234 28.10.20 09:57 Сейчас в теме

(24) нет. вы про читабельность кода в строках для программиста.

26. gaglo 28.10.20 10:11 Сейчас в теме

(25) Ваш ответ я тоже не понял ;-[

27. user1464234 28.10.20 10:15 Сейчас в теме

(26) я хотела сказать, что в работе с 7кой мне не приходилось сталкиваться с ограничением размера стека вызовов. А в 8ке это проблема.

30. wolfsoft 2421 02.11.20 08:16 Сейчас в теме

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

31. user1464234 02.11.20 08:18 Сейчас в теме

(30) в запрос посылать ТЗ неудобно?

32. wolfsoft 2421 02.11.20 08:20 Сейчас в теме

(31) Свою функцию свёртки ТЗ через запрос делал. Но проще было бы, если бы штатная свёртка это умела.

33. Megaiff 06.11.20 00:42 Сейчас в теме

Хоть не считаю себя профи но могу сказать что БСП на сколько бы его не хаяли с его изменениями в нем есть решения которые многие и за неделю не сделают. (я один из них когда просматривал код всегда удивлялся).
Вот скажите мне разве это не эстетично

ОбщегоНазначения.ЕстьРеквизитОбъекта("Соглашение", МетаданныеИсточника)

Сколь вам потребуется времени на простейшую функцию с БСП. Хотя мне оно тоже не нравится во многих моментах.
Это как учить Java и говорить что фрамворки нафиг не нужны типа Spring.

А вот по статье могу сказать если у вас нет норм шаблонов для кодинга то вы улитка. Если вам часто приходится работать с ТЗ или СЗ то проще создайте шаблон с вопросами и поверьте не точек не запятых не скобок нажимать не придется )))

34. user1464234 06.11.20 00:56 Сейчас в теме

(33) Проблема в том, что БСП это не фреймворк, а основа/база. Если у вас в конфигурации есть БСП, то в ней не будет ничего кроме БСП и ее функций общего назначения.