// Отбор на форме
&НаКлиенте
....
ФМ=Новый ФиксированнаяСтруктура("КлючСвязи",Элементы.ДанныеБезКоррекции.ТекущиеДанные.КлючСвязи);
Элементы.СписокПодразделений.ОтборСтрок=ФМ;   

 //Функция получает записи табличной части согласно установленному отбору
Функция ПолучитьЗаписиСогласноОтбору(ТабличноеПолеИсточник)

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


Таблица = ПостроительЗапроса.Результат.Выгрузить();
МассивСтрок = Новый Массив;
Для Каждого Стр ИЗ Таблица Цикл
СтруктураПоиска = Новый Структура;
Для Каждого Колонка Из Таблица.Колонки Цикл
СтруктураПоиска.Вставить(Колонка.Имя, Стр[Колонка.Имя]);
КонецЦикла;
НайденыеСтроки = ТабличноеПолеИсточник.Значение.НайтиСтроки(СтруктураПоиска);
Если НайденыеСтроки.Количество() > 0 Тогда
МассивСтрок.Добавить(НайденыеСтроки[0]);
КонецЕсли;
КонецЦикла;

Возврат МассивСтрок;

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

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

	ПараметрыОтбора.Вставить("ДокСсылка", ДанныеПоШК.Объект);

	НайденныеСтроки = ПакетДокументов.НайтиСтроки(ПараметрыОтбора);



// Подробнее

СтруктураОтбора = Новый Структура("ВидДокумента, Контрагент", ПФ, ?(Контр = Неопределено, Справочники.Контрагенты.ПустаяСсылка(), Контр));

ПакетДокументов 		 = ЗадачаОбъект.ПакетДокументов;

МассивСтрок				 = ПакетДокументов.НайтиСтроки(СтруктураОтбора);

Если МассивСтрок.Количество() Тогда

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

		СтрокаМассива.ДобавленоПользователем = Истина;

		СтрокаМассива.Пользователь           = ПараметрыСеанса.ТекущийПользователь;

		СтрокаМассива.ДатаВремя				 = ТекущаяДата();

	КонецЦикла;

КонецЕсли;



//или

ТЧ = ПромежуточнаяНакладная.Выгрузить();

		ТЧ.Свернуть("СхемаПродажи");

		СтрокаСПустойСП = ТЧ.НайтиСтроки(Новый Структура("СхемаПродажи", Справочники.СхемыПродаж.ПустаяСсылка()));

		

		Если ТЧ.Количество() - СтрокаСПустойСП.Количество() > 1 Тогда

			Если Вопрос("Сбросить все схемы в строках?", РежимДиалогаВопрос.ДаНет) = КодВозвратаДиалога.Нет Тогда

				НесколькоСхем = Истина;

				Возврат;

			КонецЕсли;

		КонецЕсли;

		

		Для каждого СтрокаПН из ПромежуточнаяНакладная Цикл

			Если СтрокаПН.Номенклатура.ВидНоменклатуры.ТипНоменклатуры <> Перечисления.ТипыНоменклатуры.Услуга Тогда

				СтрокаПН.СхемаПродажи = СхемаПродажи;

			КонецЕсли;

	КонецЦикла;   

 ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Число"));
ТЗ.Колонки.Добавить("Серия", Новый ОписаниеТипов("Число"));

НоваяСтрока = ТЗ.Добавить();

// Номенклатура 1
НоваяСтрока.Наименование = 123;
НоваяСтрока.Серия = 456;

НоваяСтрока = ТЗ.Добавить();

// Номенклатура 2
НоваяСтрока.Наименование = 123;
НоваяСтрока.Серия = 789;

// Ищем объектно
ПараметрыОтбора = Новый Структура;
ПараметрыОтбора.Вставить("Наименование", 123);
ПараметрыОтбора.Вставить("Серия", 789);
НайденныеСтроки = ТЗ.НайтиСтроки(ПараметрыОтбора);   

 // Ищем запросом
Запрос = Новый Запрос;
Запрос.Текст = 
"ВЫБРАТЬ
|	ВТ_ТаблицаЗначений.Наименование,
|	ВТ_ТаблицаЗначений.Серия
|ПОМЕСТИТЬ ВТ_ТаблицаЗначений
|ИЗ
|	&ТЗ КАК ВТ_ТаблицаЗначений
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
|	ВТ_ТаблицаЗначений.Наименование,
|	ВТ_ТаблицаЗначений.Серия
|ИЗ
|	ВТ_ТаблицаЗначений КАК ВТ_ТаблицаЗначений
|ГДЕ
|	ВТ_ТаблицаЗначений.Наименование = &Наименование
|	И ВТ_ТаблицаЗначений.Серия = &Серия";

Запрос.УстановитьПараметр("ТЗ", ТЗ);
Запрос.УстановитьПараметр("Наименование", 123);
Запрос.УстановитьПараметр("Серия", 456);

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

 НайтиСтроки( <Параметры_Отбора>)   

 ТЗРабочихДнейПоГрафику = Новый ТаблицаЗначений;
ТЗРабочихДнейПоГрафику.Колонки.Добавить("месяцИнтервала");
ТЗРабочихДнейПоГрафику.Колонки.Добавить("График");
ТЗРабочихДнейПоГрафику.Колонки.Добавить("РабочихДней");

...

ОтборПоГрафику = Новый Структура;
ОтборПоГрафику.Вставить("месяцИнтервала", СтрокаПериода.МесяцПериода);
ОтборПоГрафику.Вставить("График", Групп_Задача.График);

НайденныеСтроки = ТЗРабочихДнейПоГрафику.НайтиСтроки(ОтборПоГрафику);   

  // ТЗ1 - первая Таблица значений
// ТЗ2 - вторая Таблица значений
// KEYт_str - колонки по которым происходит объединение, пример:  "номенклатура" или "номенклатура,ЕдИзм"

Функция ПОЛНОЕ_СОЕДИНЕНИЕ(ТЗ1,ТЗ2,KEYт_str)
ТЗ = новый ТаблицаЗначений;
//---------------------------------------------
// разбор ключевых колонок в масив
//---------------------------------------------
str = "" + KEYт_str; // Копирование исходной строки
KEYт_mas = новый Массив;
str = СтрЗаменить(str,",",Символы.ПС);
Для N=1 по СтрЧислоСтрок(str) Цикл
name = СтрПолучитьСтроку(str,N);
KEYт_mas.Добавить(name);
КонецЦикла;
//---------------------------------------------

//---- проверка на наличие ключевых колонок ---
Для каждого KEYт из KEYт_mas Цикл
Если (ТЗ1.Колонки.Найти(KEYт)=неопределено)
ИЛИ (ТЗ2.Колонки.Найти(KEYт)=неопределено) Тогда
Сообщить("нет ключевой колонки");
возврат неопределено;
КонецЕсли;
КонецЦикла;
//---------------------------------------------

//--- Формируем новую ТЗ из 2х таблиц ---------
Для каждого К Из ТЗ1.Колонки Цикл
// из первой ТЗ берём все колонки
ТЗ.Колонки.Добавить(К.Имя);
КонецЦикла;
Для каждого К Из ТЗ2.Колонки Цикл
// из второй все кроме ключевой
Если KEYт_mas.Найти(К.Имя) <> неопределено тогда
Продолжить;
КонецЕсли;
ТЗ.Колонки.Добавить(К.Имя);
КонецЦикла;
//---------------------------------------------

//----------------------------------------------------
// Заполняем строчки ключей которых НЕТ в ТЗ2
//----------------------------------------------------
Для каждого стр1 Из ТЗ1 Цикл

// Формируем структуру поиска
Отбор = Новый Структура;
Для каждого KEYт из KEYт_mas Цикл
Отбор.Вставить(KEYт,стр1[KEYт]);
КонецЦикла;

Если ТЗ2.НайтиСтроки(Отбор).Количество() = 0 тогда
стр = ТЗ.Добавить();
// копируем все значения из строчки ТЗ1
Для каждого К Из ТЗ1.Колонки Цикл
стр[К.Имя] = стр1[К.Имя];
КонецЦикла;
КонецЕсли;

КонецЦикла;
//----------------------------------------------------

//----------------------------------------------------
// Заполняем строчки ключи которых ЕСТЬ в ТЗ2
//----------------------------------------------------
Для каждого стр1 Из ТЗ1 Цикл

// Формируем структуру поиска
Отбор = Новый Структура;
Для каждого KEYт из KEYт_mas Цикл
Отбор.Вставить(KEYт,стр1[KEYт]);
КонецЦикла;

НайденныеСтроки = ТЗ2.НайтиСтроки(Отбор);

Если НайденныеСтроки.Количество() > 0 тогда
Для каждого стр2 Из НайденныеСтроки Цикл
//заполняем все колонки
стр = ТЗ.Добавить();
// из ТЗ1
Для каждого К Из ТЗ1.Колонки Цикл
стр[К.Имя] = стр1[К.Имя];
КонецЦикла;
// из ТЗ2
Для каждого К Из ТЗ2.Колонки Цикл
стр[К.Имя] = стр2[К.Имя];
КонецЦикла;
КонецЦикла;

КонецЕсли;

КонецЦикла;
//----------------------------------------------------

//----------------------------------------------------
// Заполняем строчки из ТЗ2 ключей которых НЕТ в ТЗ1
//----------------------------------------------------
Для каждого стр2 Из ТЗ2 Цикл
// Формируем структуру поиска
Отбор = Новый Структура;
Для каждого KEYт из KEYт_mas Цикл
Отбор.Вставить(KEYт,стр2[KEYт]);
КонецЦикла;

Если ТЗ1.НайтиСтроки(Отбор).Количество() = 0 тогда
стр = ТЗ.Добавить();
// копируем все значения из строчки ТЗ1
Для каждого К Из ТЗ2.Колонки Цикл
стр[К.Имя] = стр2[К.Имя];
КонецЦикла;
КонецЕсли;

КонецЦикла;
//----------------------------------------------------

возврат ТЗ;
КонецФункци