МенВрТаб=Новый МенеджерВременныхТаблиц;
    ЗапросТекст= новый запрос;
    ЗапросТекст.МенеджерВременныхТаблиц=МенВрТаб;
    ЗапросТекст.Текст="ВЫБРАТЬ
    |Номер,
    |Сумма,
    |Местонахождения
    |ПОМЕСТИТЬ ТаблицаТелефоны
    |ИЗ
    |&ТзТелефоны КАК ТзТелефоны";
    ЗапросТекст.УстановитьПараметр("ТзТелефоны",ЭтотОбъект.Телефонны.Выгрузить());
    ЗапросТекст.Выполнить();
    
    
    Запрос= новый запрос;
    Запрос.МенеджерВременныхТаблиц=МенВрТаб;
    Запрос.Текст="ВЫБРАТЬ
    |    СУММА(ТаблицаТелефоны.Сумма) КАК Сумма,
    |    ТаблицаТелефоны.Местонахождения КАК Местонахождения
    |ИЗ
    |    ТаблицаТелефоны КАК ТаблицаТелефоны
    |
    |СГРУППИРОВАТЬ ПО
    |    ТаблицаТелефоны.Местонахождения";
    РезультатыЗапроса=Запрос.Выполнить().Выгрузить();

Ответ = Вопрос("Очистить табличную часть Услуги?",
        РежимДиалогаВопрос.ДаНетОтмена,
        0, // таймаут в секундах
        КодВозвратаДиалога.Да, // (необ.) кнопка по умолчанию
        "Внимание!!!" // (необ.) заголовок
        );
 
        Если Ответ = КодВозвратаДиалога.Да Тогда
            НовыйДок.Услуги.Очистить();
        иначеЕсли Ответ = КодВозвратаДиалога.Отмена тогда
            Возврат;
        КонецЕсли;    

Сохранить или Восстановить значение

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

Запрос = Новый Запрос;
    МенеджерВТ = Новый МенеджерВременныхТаблиц;
    Запрос.МенеджерВременныхТаблиц=МенеджерВТ;
    Запрос.Текст = "ВЫБРАТЬ
                   |    ТаблицаТЧСтатьиЗатрат.КодСЗ,
                   |    ТаблицаТЧСтатьиЗатрат.СтатьиЗатрат,
                   |    ТаблицаТЧСтатьиЗатрат.Сумма
                   |ПОМЕСТИТЬ МВТТЧСтатьиЗатрат
                   |ИЗ
                   |    &Данные КАК ТаблицаТЧСтатьиЗатрат
                   |ГДЕ
                   |    ТаблицаТЧСтатьиЗатрат.КодСЗ = &КодСЗ
                   |;
                   |
                   |////////////////////////////////////////////////////////////////////////////////
                   |ВЫБРАТЬ
                   |    МВТТЧСтатьиЗатрат.КодСЗ,
                   |    МВТТЧСтатьиЗатрат.СтатьиЗатрат,
                   |    МВТТЧСтатьиЗатрат.Сумма
                   |ИЗ
                   |    МВТТЧСтатьиЗатрат КАК МВТТЧСтатьиЗатрат";
    
    
    Запрос.УстановитьПараметр("Данные",ТаблицаТЧСтатьиЗатрат);
    
    Запрос.УстановитьПараметр("КодСЗ", Число(Сред(СтрокаФормулы,СимволСтроки,КолСимволовЧисла)));
    РезультатЗапроса = Запрос.Выполнить();
            ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

    //*********************Выбираем физ лиц и делаем итоги по подразделению для группировки по нему            **************
    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    РаботникиОрганизацииСрезПоследних.ФизЛицо,
    |    РаботникиОрганизацииСрезПоследних.Подразделение КАК Подразделение,
    |    РаботникиОрганизацииСрезПоследних.Должность,
    |    РаботникиОрганизацииСрезПоследних.ДатаПриема,
    |    РаботникиОрганизацииСрезПоследних.КлассУТ
    |ИЗ
    |    РегистрСведений.РаботникиОрганизации.СрезПоследних КАК РаботникиОрганизацииСрезПоследних
    |ГДЕ
    |    РаботникиОрганизацииСрезПоследних.ПричинаИзмененияСостояния <> &Увольнение
    |    И РаботникиОрганизацииСрезПоследних.Подразделение <> &Пенсионеры
    |
    |УПОРЯДОЧИТЬ ПО
    |    РаботникиОрганизацииСрезПоследних.Подразделение.Наименование
    |ИТОГИ ПО
    |    Подразделение";
    
    Запрос.УстановитьПараметр( "Увольнение",Перечисления.ПричиныИзмененияСостояния.Получить(2));
    Запрос.УстановитьПараметр( "Пенсионеры",Справочники.ПодразделенияОрганизаций.НайтиПоКоду("50101"));
    
    РезультатЗапроса = Запрос.Выполнить();
    
    //********************* Конец Выбираем физ лиц и делаем итоги по подразделению для группировки по нему            **************            
    
    //***************Группировка подразделений******************
    ВыборкаИтоги = РезультатЗапроса.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
    ТабДок.НачатьАвтогруппировкуСтрок();    
    Пока ВыборкаИтоги.Следующий()Цикл
        Область = Макет.ПолучитьОбласть("Строка");
        
        Область.Параметры.Подразделение =ВыборкаИтоги.Подразделение;
        
        ТабДок.Вывести(Область, 1);
        //*************** Конец Группировка подразделений******************    
        
        ///***********************Выбодим ФизЛицо В группе подразделений
        Выборка = ВыборкаИтоги.Выбрать(ОбходРезультатаЗапроса.Прямой);
        Пока Выборка.Следующий() Цикл
            ОбластьПодстрока = Макет.ПолучитьОбласть("Подстрока");
            ЗаполнитьЗначенияСвойств(ОбластьПодстрока.Параметры,Выборка);
            ТабДок.Вывести(ОбластьПодстрока, 2);
            
            //*********************Выбираем Факторы у физ лиц и выводим их **************
            Запрос = Новый Запрос;
            Запрос.Текст =
            "ВЫБРАТЬ
            |    ФизЛицоФакторыСрезПоследних.Фактор,
            |    ФизЛицоФакторыСрезПоследних.ВидЗанятости,
            |    ФизЛицоФакторыСрезПоследних.КлассУТ
            |ИЗ
            |    РегистрСведений.ФизЛицоФакторы.СрезПоследних(
            |            ,
            |            ФизЛицо = &ФизЛицо) КАК ФизЛицоФакторыСрезПоследних
            
            //|                И Подразделение = &Подразделение
            //|                И Должность = &Должность
            //|                И КлассУТ = &КлассУТ) КАК ФизЛицоФакторыСрезПоследних
            |ГДЕ
            |    ФизЛицоФакторыСрезПоследних.ДействуетФактор = ИСТИНА";
            
            //Запрос.УстановитьПараметр("Должность", Выборка.Должность);
            //Запрос.УстановитьПараметр("КлассУТ", Выборка.КлассУТ);
            //Запрос.УстановитьПараметр("Подразделение", Выборка.Подразделение);
            Запрос.УстановитьПараметр("ФизЛицо", Выборка.ФизЛицо);
            
            
            
            ВыборкаФакторыОсн = Запрос.Выполнить().Выбрать();
            Пока ВыборкаФакторыОсн.Следующий() Цикл
                ОбластьВредностиОсн= Макет.ПолучитьОбласть("ВредностиОсн");
                ЗаполнитьЗначенияСвойств(ОбластьВредностиОсн.Параметры,ВыборкаФакторыОсн);    
                ТабДок.Вывести(ОбластьВредностиОсн, 2);
                
            КонецЦикла;
            
            //*********************Выбираем Факторы у физ лиц и выводим их **************
            
        КонецЦикла;
        ///*********************** КОНЕЦ Выбодим ФизЛицо В группе подразделений    
        
        
    КонецЦикла;
    ТабДок.ЗакончитьАвтогруппировкуСтрок();

            Выборка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
            
    ТабДок.НачатьАвтогруппировкуСтрок();
    
    
    Пока Выборка.Следующий() Цикл
            Область = Макет.ПолучитьОбласть("Строка");
            Область.Параметры.Подразделение = Выборка.Подразделение;
             ТабДок.Вывести(Область,1);
    
            ОБласть = Макет.ПолучитьОбласть("Подстрока");
            ОБласть.Параметры.ФизЛицо = Выборка.ФизЛицо;
               ТабДок.Вывести(ОБласть,2);
    КонецЦикла;
    ТабДок.ЗакончитьАвтогруппировкуСтрок();

    Результат = Запрос.Выполнить();
    ТЗ_МЦ2=Результат.Выгрузить();
    ЭлементыФормы.ТЗ_МЦ2.СоздатьКолонки();
    ЭлементыФормы.ТЗ_МЦ2.Значение=ТЗ_МЦ2;

&НаКлиенте
Процедура СформироватьПрайс(Команда)
ЗаполнитьТАБДОК (ТабДок)    
    
КонецПроцедуры

Процедура ЗаполнитьТАБДОК (ТабДок)
табдок.Очистить();
//Выборка=Справочники.Номенклатура.Выбрать();   //выводим весь список в разнобой вместе с группами
Выборка=Справочники.Номенклатура.ВыбратьИерархически();     //выводим группы а внутри элементы

Макет = Отчеты.ПрайсЛист.ПолучитьМакет("Макет");
ОблШапка=Макет.ПолучитьОбласть("Шапка");
ОблЭлемент = Макет.ПолучитьОбласть("Элемент");
ОблЭлемент2 = Макет.ПолучитьОбласть("Элемент2");

ОблШапка.Параметры.ДатаОтчета=ТекущаяДата();
Табдок.Вывести(ОблШапка);

Пока Выборка.Следующий()Цикл
Если Выборка.ЭтоГруппа и ФлагГруппы Тогда
ОблЭлемент2.Параметры.Код=Выборка.Код;
ОблЭлемент2.Параметры.Наименование=Выборка.Наименование;
ОблЭлемент2.Параметры.цена=Выборка.ЦенаПродажи;
Табдок.Вывести(ОблЭлемент2);
иначе Если Не Выборка.ЭтоГруппа Тогда
ОблЭлемент.Параметры.Код=Выборка.Код;
ОблЭлемент.Параметры.Наименование=Выборка.Наименование;
ОблЭлемент.Параметры.цена=Выборка.ЦенаПродажи;
Табдок.Вывести(ОблЭлемент);
КонецЕсли;
КонецЕсли;

КонецЦикла;

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

&НаКлиенте
Процедура СформироватьПрайс(Команда)
ЗаполнитьТАБДОК (ТабДок)    
    
КонецПроцедуры

Процедура ЗаполнитьТАБДОК (ТабДок)
табдок.Очистить();
//Выборка=Справочники.Номенклатура.Выбрать();   //выводим без груп по алфавиту
Выборка=Справочники.Номенклатура.ВыбратьИерархически();     //выводим группы
Макет = Отчеты.ПрайсЛист.ПолучитьМакет("Макет");
ОблШапка=Макет.ПолучитьОбласть("Шапка");
ОблЭлемент = Макет.ПолучитьОбласть("Элемент");
ОблШапка.Параметры.ДатаОтчета=ТекущаяДата();
Табдок.Вывести(ОблШапка);

Пока Выборка.Следующий()Цикл
ОблЭлемент.Параметры.Код=Выборка.Код;
ОблЭлемент.Параметры.Наименование=Выборка.Наименование;
ОблЭлемент.Параметры.цена=Выборка.ЦенаПродажи;
Табдок.Вывести(ОблЭлемент);
КонецЦикла;

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