Таблица значений на части по склду

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v8.3 8.3.14 8.3.6 8.3.8

1. BARDER 40 06.03.22 01:29 Сейчас в теме

Привет всем.
Есть одна задачка которую не могу решить.
Я перебираю XML и заношу данные в ТаблицуЗначений на форме, где реквизиты таблицы: Номенклатура, Вес, Количество, Штрихкод, Склад.

Так мне нужно разбить на несколько частей эту таблицу по складам, и поместить в массив каждую часть

Что то не могу никак сообразить как сделать

Прикрепленные файлы:

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
BARDER (2.00 $m)

Получили:

echo77 (1 $m), BARDER (1 $m)

Показать полностью

Найденные решения

2. echo77 1921 06.03.22 07:01 Сейчас в теме +1 $m

(1) Можно сделать так:
1. Из ТЗ ТаблицаТоваров сделать копию (только колонку Склад). Свернуть копию ТЗ по полю "Склад" - получим таблицу уникальных складов, её колонку, кстати, можно выгрузить в Массив.
2. Обходим массив, для каждого склада из массива выполняем поиск по в ТЗ (метод НайтиСтроки()) ТаблицаТоваров по полю "Склад" - получаем массив строк

Функция ПолучитьТаблицуУникальныхЗначений(ТаблицаЗначений, ИмяКолонки)
	ТаблицаУникальныхЗначений = ТаблицаЗначений.Скопировать(,ИмяКолонки);
	
	ТаблицаУникальныхЗначений.Свернуть(ИмяКолонки);
	
	Возврат ТаблицаУникальныхЗначений;
КонецФункции

Возможно, это пригодится:

ОбщегоНазначения.СтрокаТаблицыЗначенийВСтруктуру()

4. BARDER 40 06.03.22 09:21 Сейчас в теме +1 $m

Вместо скопировать сделал Выгрузить

ТаблицаУникальныхЗначений = ТаблицаТоваров.Выгрузить(,"Склад");
    
    ТаблицаУникальныхЗначений.Свернуть("Склад");

Остальные ответы

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

Свернуть все

2. echo77 1921 06.03.22 07:01 Сейчас в теме +1 $m

Функция ПолучитьТаблицуУникальныхЗначений(ТаблицаЗначений, ИмяКолонки)
	ТаблицаУникальныхЗначений = ТаблицаЗначений.Скопировать(,ИмяКолонки);
	
	ТаблицаУникальныхЗначений.Свернуть(ИмяКолонки);
	
	Возврат ТаблицаУникальныхЗначений;
КонецФункции

Возможно, это пригодится:

ОбщегоНазначения.СтрокаТаблицыЗначенийВСтруктуру()

3. BARDER 40 06.03.22 09:15 Сейчас в теме

(2)

ТаблицаУникальныхЗначений = ТаблицаЗначений.Скопировать(,ИмяКолонки);

ТаблицаУникальныхЗначений.Свернуть(ИмяКолонки);

ТаблицаУникальныхЗначений = ТаблицаТоваров.Скопировать(,"Склад");
    
    ТаблицаУникальныхЗначений.Свернуть("Склад");

Метод объекта не обнаружен (Скопировать)
{ВнешняяОбработка.СоздатьПереоценкуТоаров.Форма.Форма.Форма(83)}: ТаблицаУникальныхЗначений = ТаблицаТоваров.Скопировать(,"Склад");

4. BARDER 40 06.03.22 09:21 Сейчас в теме +1 $m

Вместо скопировать сделал Выгрузить

ТаблицаУникальныхЗначений = ТаблицаТоваров.Выгрузить(,"Склад");
    
    ТаблицаУникальныхЗначений.Свернуть("Склад");

Оставьте свое сообщение

E-mail: