Работа с Таблицей значений — 1с заметки программиста

Только на сервере

Создание Таблицы значений:

Таб = Новый ТаблицаЗначений;

1	Таб = Новый ТаблицаЗначений;

Добавление колонок по умолчанию тип данных строка:

Таб.Колонки.Добавить("НаименованиеКолонки");

1	Таб.Колонки.Добавить("НаименованиеКолонки");

Добавление строк в ТЗ:

Стр = Таб.Добавить();
Стр.НаименованиеКолонки= "Строка";

1 2	Стр = Таб.Добавить(); Стр.НаименованиеКолонки= "Строка";

Добавляем колонку с описанием типа, наименованием и представлением:

Число = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(N, C)); //N-Длина числа, C-Точность (количество символов после запятой)
Ссылка = Новый ОписаниеТипов("СправочникСсылка.НаименованиеСправочника");
Дата = Новый ОписаниеТипов("Дата");

Число = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(N, C)); //N-Длина числа, C-Точность (количество символов после запятой)

Ссылка = Новый ОписаниеТипов("СправочникСсылка.НаименованиеСправочника");

Дата = Новый ОписаниеТипов("Дата");

Таб.Колонки.Добавить("НаименованиеКолонки", Число, "Представление колонки");

1	Таб.Колонки.Добавить("НаименованиеКолонки", Число, "Представление колонки");

ИЛИ

Таб.Колонки.Добавить("НаименованиеКолонки", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(N, C)), "Представление колонки");

1	Таб.Колонки.Добавить("НаименованиеКолонки", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(N, C)), "Представление колонки");

Выгрузка и загрузка колонки в массив:

// выгрузка
Массив = Таб.ВыгрузитьКолонку("НаименованиеКолонки");

// загрузка
Таб.ЗагрузитьКолонку(Массив, "НаименованиеКолонки");

// выгрузка

Массив = Таб.ВыгрузитьКолонку("НаименованиеКолонки");

// загрузка

Таб.ЗагрузитьКолонку(Массив, "НаименованиеКолонки");

Изменение значений во всей колонки:

Таб.ЗаполнитьЗначения(0, "НаименованиеКолонки");

1	Таб.ЗаполнитьЗначения(0, "НаименованиеКолонки");

Заполнение колонки по индексу с 0:

Таб[0].НаименованиеКолонки= 100;
Таб[1].НаименованиеКолонки= 200;
Таб[2].НаименованиеКолонки= 300;

Таб[0].НаименованиеКолонки= 100;

Таб[1].НаименованиеКолонки= 200;

Таб[2].НаименованиеКолонки= 300;

Итоги по колонке:

Сообщить(Таб.Итог("НаименованиеКолонки")); // 600

1	Сообщить(Таб.Итог("НаименованиеКолонки")); // 600

Поиск строки по значению:

НайденнаяСтрока = Таб.Найти( "Значение" );

Если НайденнаяСтрока &lt;&gt; Неопределено Тогда

КонецЕсли;

НайденнаяСтрока = Таб.Найти( "Значение" );

Если НайденнаяСтрока <> Неопределено Тогда

КонецЕсли;

Поиск строки по значению в определенных колонках:

НайденнаяСтрока = Таб.Найти("Значение", "НаименованиеКолонки1, НаименованиеКолонки2");
Если НайденнаяСтрока &lt;&gt; Неопределено Тогда

КонецЕсли;

НайденнаяСтрока = Таб.Найти("Значение", "НаименованиеКолонки1, НаименованиеКолонки2");

Если НайденнаяСтрока <> Неопределено Тогда

КонецЕсли;

Поиск через отбор:

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

КонецЦикла;

Отбор = Новый Структура;

Отбор.Вставить("НаименованиеКолонки", "Значение");

Строки = Таб.НайтиСтроки(Отбор);

Для Каждого Стр Из Строки Цикл

КонецЦикла;

Сдвигаем строку таблицы в перед и назад через «Индекс»:

// сдвигаем первую строку на одну позицию вперёд
Индекс=0;
Таб.Сдвинуть(Индекс, 1);

// и возвращаем обратно
Индекс=1;
Таб.Сдвинуть(Индекс, -1);

// сдвигаем первую строку на одну позицию вперёд

Индекс=0;

Таб.Сдвинуть(Индекс, 1);

// и возвращаем обратно

Индекс=1;

Таб.Сдвинуть(Индекс, -1);

Копия таблицы полная и по колонкам:

// полная копия
КопияТаб = Таб.Скопировать();

// только две колонки НаименованиеКолонки1 и НаименованиеКолонки2
КопияТаб = Таб.СкопироватьКолонки("НаименованиеКолонки1, НаименованиеКолонки2");

// полная копия

КопияТаб = Таб.Скопировать();

// только две колонки НаименованиеКолонки1 и НаименованиеКолонки2

КопияТаб = Таб.СкопироватьКолонки("НаименованиеКолонки1, НаименованиеКолонки2");

Копия таблицы с отбором по значению:

Отбор = Новый Структура;
Отбор.Вставить("НаименованиеКолонки1", "Значение");

// таблица будет содержать только строчку с Значением
КопияТаб = Таб.Скопировать(Отбор);

// таблица будет содержать данные из колонок НаименованиеКолонки2 и НаименованиеКолонки3
КопияТаб = Таб.Скопировать(Отбор, "НаименованиеКолонки2 , НаименованиеКолонки3");

Отбор = Новый Структура;

Отбор.Вставить("НаименованиеКолонки1", "Значение");

// таблица будет содержать только строчку с Значением

КопияТаб = Таб.Скопировать(Отбор);

// таблица будет содержать данные из колонок НаименованиеКолонки2 и НаименованиеКолонки3

КопияТаб = Таб.Скопировать(Отбор, "НаименованиеКолонки2 , НаименованиеКолонки3");

Свернуть таблицу по колонкам 1 и 2 и просуммировать по колонкам 3 и 4:

Таб.Свернуть("НаименованиеКолонки1, НаименованиеКолонки2", "НаименованиеКолонки3, НаименованиеКолонки4");

1	Таб.Свернуть("НаименованиеКолонки1, НаименованиеКолонки2", "НаименованиеКолонки3, НаименованиеКолонки4");

Сортировка таблицы по колонке:

Таб.Сортировать("НаименованиеКолонки1 Возр");

1	Таб.Сортировать("НаименованиеКолонки1 Возр");

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

Таб.Сортировать("НаименованиеКолонки1 Возр, НаименованиеКолонки2 Убыв");

1	Таб.Сортировать("НаименованиеКолонки1 Возр, НаименованиеКолонки2 Убыв");

Прочие обработки с ТЗ:
Очистить колонки таблицы:

Таб.Колонки.Очистить();

1	Таб.Колонки.Очистить();

Очистить таблицу:

Таб.Очистить();

1	Таб.Очистить();

Удаление строки по индексу или по значению:

Таб.Удалить(0);

1	Таб.Удалить(0);

Вывод таблицы на форму:

// см. примеры использования этой функции ниже
// ТабВКоде - таблица значений, созданная программно
// ТабРеквизит - имя реквизита формы типа ТаблицаЗначений
// ТабНаФорме - имя элемента формы, связанного с ТабРеквизит


&amp;НаСервере
Процедура ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, ТабРеквизит, ТабНаФорме)

// реквизит ТабРеквизит и соответствующий
// ему элемент формы ТабНаФорме уже созданы
// нами в визуальном режиме
// 1. добавляем колонки из ТабВкоде в реквизит ТабРеквизит

     НовыеРеквизиты = Новый Массив;

     Для Каждого Колонка Из ТабВКоде.Колонки Цикл

          НовыеРеквизиты.Добавить(Новый РеквизитФормы(Колонка.Имя, Колонка.ТипЗначения,ТабРеквизит));

     КонецЦикла;


     ИзменитьРеквизиты(НовыеРеквизиты);


// 2. добавляем колонки из ТабВКоде в элемент ТабНаФорме


     Для Каждого Колонка Из ТабВКоде.Колонки Цикл

          НовыйЭлемент = Элементы.Добавить(ТабРеквизит + "_" + Колонка.Имя, Тип("ПолеФормы"), Элементы[ТабНаФорме]);
          НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода;
          НовыйЭлемент.ПутьКДанным = ТабРеквизит + "." + Колонка.Имя;

     КонецЦикла;


// 3. наконец, передаём данные из ТабВКоде в ТабРеквизит


     ЗначениеВРеквизитФормы(ТабВКоде, ТабРеквизит);

// готово!

КонецПроцедуры


&amp;НаСервере
Процедура СоздатьТаблицуНаФормеНаСервере()

// программно создаём таблицу значений ТабВКоде

     ТабВКоде = Новый ТаблицаЗначений;

     ОписаниеСтроки = Новый ОписаниеТипов("Строка");
     ОписаниеВеса = Новый ОписаниеТипов("Число",Новый КвалификаторыЧисла(12, 3));

     ТабВКоде.Колонки.Добавить("Фрукт", ОписаниеСтроки, "Имя фрукта");
     ТабВКоде.Колонки.Добавить("Цвет", ОписаниеСтроки, "Цвет фрукта");
     ТабВКоде.Колонки.Добавить("Вес", ОписаниеВеса, "Вес фрукта");

     Стр = ТабВКоде.Добавить();
     Стр.Фрукт = "Яблоко";
     Стр.Цвет = "Зелёный";
     Стр.Вес = 200;

     Стр = ТабВКоде.Добавить();
     Стр.Фрукт = "Банан";
     Стр.Цвет = "Желтый";
     Стр.Вес = 150;

     ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, "ТабРеквизит1", "ТабНаФорме1");

КонецПроцедуры

// см. примеры использования этой функции ниже

// ТабВКоде - таблица значений, созданная программно

// ТабРеквизит - имя реквизита формы типа ТаблицаЗначений

// ТабНаФорме - имя элемента формы, связанного с ТабРеквизит

&НаСервере

Процедура ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, ТабРеквизит, ТабНаФорме)

// реквизит ТабРеквизит и соответствующий

// ему элемент формы ТабНаФорме уже созданы

// нами в визуальном режиме

// 1. добавляем колонки из ТабВкоде в реквизит ТабРеквизит

НовыеРеквизиты = Новый Массив;

Для Каждого Колонка Из ТабВКоде.Колонки Цикл

НовыеРеквизиты.Добавить(Новый РеквизитФормы(Колонка.Имя, Колонка.ТипЗначения,ТабРеквизит));

КонецЦикла;

ИзменитьРеквизиты(НовыеРеквизиты);

// 2. добавляем колонки из ТабВКоде в элемент ТабНаФорме

Для Каждого Колонка Из ТабВКоде.Колонки Цикл

НовыйЭлемент = Элементы.Добавить(ТабРеквизит + "_" + Колонка.Имя, Тип("ПолеФормы"), Элементы[ТабНаФорме]);

НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода;

НовыйЭлемент.ПутьКДанным = ТабРеквизит + "." + Колонка.Имя;

КонецЦикла;

// 3. наконец, передаём данные из ТабВКоде в ТабРеквизит

ЗначениеВРеквизитФормы(ТабВКоде, ТабРеквизит);

// готово!

КонецПроцедуры

&НаСервере

Процедура СоздатьТаблицуНаФормеНаСервере()

// программно создаём таблицу значений ТабВКоде

ТабВКоде = Новый ТаблицаЗначений;

ОписаниеСтроки = Новый ОписаниеТипов("Строка");

ОписаниеВеса = Новый ОписаниеТипов("Число",Новый КвалификаторыЧисла(12, 3));

ТабВКоде.Колонки.Добавить("Фрукт", ОписаниеСтроки, "Имя фрукта");

ТабВКоде.Колонки.Добавить("Цвет", ОписаниеСтроки, "Цвет фрукта");

ТабВКоде.Колонки.Добавить("Вес", ОписаниеВеса, "Вес фрукта");

Стр = ТабВКоде.Добавить();

Стр.Фрукт = "Яблоко";

Стр.Цвет = "Зелёный";

Стр.Вес = 200;

Стр = ТабВКоде.Добавить();

Стр.Фрукт = "Банан";

Стр.Цвет = "Желтый";

Стр.Вес = 150;

ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, "ТабРеквизит1", "ТабНаФорме1");

КонецПроцедуры

Как программно вывести на форму результат запроса в виде таблицы значений в 1с 8.3, 8.2

&amp;НаСервере
Процедура ВывестиНаФормуРезультатЗапросаНаСервере()

     Запрос = Новый Запрос;
     Запрос.Текст =
          "ВЫБРАТЬ
          | Товары.Ссылка,
          | Товары.ВерсияДанных,
          | Товары.ПометкаУдаления,
          | Товары.Код,
          | Товары.Наименование,
          | Товары.Цвет,
          | Товары.ЕдиницаИзмерений,
          | Товары.Предопределенный,
          | Товары.ИмяПредопределенныхДанных
          |ИЗ
          | Справочник.Товары КАК Товары";

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

     ТабВКоде = РезультатЗапроса.Выгрузить(ОбходРезультатаЗапроса.Прямой);

// функция ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме определена выше
     ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, "ТабРеквизит2", "ТабНаФорме2");

КонецПроцедуры

&НаСервере

Процедура ВывестиНаФормуРезультатЗапросаНаСервере()

Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

| Товары.Ссылка,

| Товары.ВерсияДанных,

| Товары.ПометкаУдаления,

| Товары.Код,

| Товары.Наименование,

| Товары.Цвет,

| Товары.ЕдиницаИзмерений,

| Товары.Предопределенный,

| Товары.ИмяПредопределенныхДанных

|ИЗ

| Справочник.Товары КАК Товары";

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

ТабВКоде = РезультатЗапроса.Выгрузить(ОбходРезультатаЗапроса.Прямой);

// функция ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме определена выше

ВывестиТаблицуЗначенияВКодеВТаблицуНаФорме(ТабВКоде, "ТабРеквизит2", "ТабНаФорме2");

КонецПроцедуры