Как реализовать расшифровку отчета,есть некий формируется список контрагентов и по нажатию на один из них выводит все услуги по нему,вот код

Перем Расшифровка;

Функция ФизВес(ДокОсн)
    ФВ=0;
    Если ПустоеЗначение(ДокОсн.ДокОснова)=0 Тогда
        ФВ=ДокОсн.ДокОснова.ФКількість;
    КонецЕсли;
    Возврат ФВ*100;
КонецФункции    

Процедура Сформировать()
    Запрос1 = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |ТекущийДокумент = Документ.ВиконанняРобітПослуг.ТекущийДокумент; 
    |Контрагент = Документ.ВиконанняРобітПослуг.Аналітика1;
    |ВидПослуг = Документ.ВиконанняРобітПослуг.ВидПослуг;
    |Группировка Контрагент;
    |Группировка ВидПослуг без групп;
    |Группировка ТекущийДокумент;
    |"//}}ЗАПРОС
;
    
    Пока Запрос1.Группировка(1)=1 Цикл
        Таб.ВывестиСекцию("Контрагент"); 
        Расшифровка.Установить("Контрагент",Запрос1.Контрагент);
        Расшифровка.Установить("ВидПослуг",Запрос1.ВидПослуг);
    КонецЦикла;    
КонецПроцедуры

Процедура розшифрстрок(зн)
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |ТекущийДокумент = Документ.ВиконанняРобітПослуг.ТекущийДокумент; 
    |Контрагент = Документ.ВиконанняРобітПослуг.Аналітика1;
    |ВидПослуг = Документ.ВиконанняРобітПослуг.ВидПослуг;
    |Группировка ВидПослуг без групп;
    |Группировка ТекущийДокумент;
    |"//}}ЗАПРОС
;        
КонецПроцедуры

Процедура ОбработкаЯчейкиТаблицы(Зн, Фл) 
    Если ТипЗначенияСТр(Зн)="Документ" ТОгда
        Фл=1;
    ИначеЕсли ТипЗначенияСтр(Зн)="СписокЗначений" Тогда 
        розшифрСтрок(зн);
    КонецЕсли;    
КонецПроцедуры  

Расшифровка=СоздатьОбъект("СписокЗначений");
Расшифровка.ДобавитьЗначение("","Контрагент");
Расшифровка.ДобавитьЗначение("","ВидПослуг");

Проблема в том что при выборе любого контрагента мне выводит все услуги всех контрагентов из списка.

Процедура розшифрстрок(зн)
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    ТекКонтрагент=Зн.Получить("Контрагент");
    ТекВидУслг=Зн.Получить("ВидПослуг");
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |ТекущийДокумент = Документ.ВиконанняРобітПослуг.ТекущийДокумент; 
    |Контрагент = Документ.ВиконанняРобітПослуг.Аналітика1;
    |ВидПослуг = Документ.ВиконанняРобітПослуг.ВидПослуг;
    |Группировка ВидПослуг без групп;
    |Группировка ТекущийДокумент;
    |Условие (Контрагент в ТекКонтрагент);
    |Условие (ВидПослуг в ТекВидУслуг);
    |"//}}ЗАПРОС
;        
КонецПроцедуры

Не работает вывело по первому контрагенту все данные всех контрагентов а остальные контрагенты пустые

попробуйте вместо

Таб.ВывестиСекцию("Контрагент"); 
Расшифровка.Установить("Контрагент",Запрос1.Контрагент);
Расшифровка.Установить("ВидПослуг",Запрос1.ВидПослуг);

так

Расшифровка.Установить("Контрагент",Запрос1.Контрагент);
Расшифровка.Установить("ВидПослуг",Запрос1.ВидПослуг);
Таб.ВывестиСекцию("Контрагент");

Логично И это как минимум

Ничего вообще не выводит

Т.е. основной отчет выводит, а когда щелкаете по ячейке что происходит?

может так

Перем Расшифровка;

Функция ФизВес(ДокОсн)
    ФВ=0;
    Если ПустоеЗначение(ДокОсн.ДокОснова)=0 Тогда
        ФВ=ДокОсн.ДокОснова.ФКількість;
    КонецЕсли;
    Возврат ФВ*100;
КонецФункции    

Процедура Сформировать()
    Запрос1 = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |ТекущийДокумент = Документ.ВиконанняРобітПослуг.ТекущийДокумент; 
    |Контрагент = Документ.ВиконанняРобітПослуг.Аналітика1;
    |ВидПослуг = Документ.ВиконанняРобітПослуг.ВидПослуг;
    |Группировка Контрагент;
    |Группировка ВидПослуг без групп;
    |Группировка ТекущийДокумент;
    |"//}}ЗАПРОС
;
    
    Пока Запрос1.Группировка(1)=1 Цикл
        Расшифровка.Установить("Контрагент",Запрос1.Контрагент);
        Таб.ВывестиСекцию("Контрагент"); 
    КонецЦикла;    
КонецПроцедуры

Процедура розшифрстрок(зн)
    Перем Запрос, ТекстЗапроса, Таб;
    //Создание объекта типа Запрос
    ТекКонтрагент=Зн.Получить("Контрагент");
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса = 
    "//{{ЗАПРОС(Сформировать)
    |Период с ВыбНачПериода по ВыбКонПериода;
    |ТекущийДокумент = Документ.ВиконанняРобітПослуг.ТекущийДокумент; 
    |Контрагент = Документ.ВиконанняРобітПослуг.Аналітика1;
    |ВидПослуг = Документ.ВиконанняРобітПослуг.ВидПослуг;
    |Группировка ВидПослуг без групп;
    |Группировка ТекущийДокумент;
    |Условие (Контрагент в ТекКонтрагент);
    |"//}}ЗАПРОС
;        
КонецПроцедуры

Процедура ОбработкаЯчейкиТаблицы(Зн, Фл) 
    Если ТипЗначенияСТр(Зн)="Документ" ТОгда
        Фл=1;
    ИначеЕсли ТипЗначенияСтр(Зн)="СписокЗначений" Тогда 
        розшифрСтрок(зн);
    КонецЕсли;    
КонецПроцедуры  

Расшифровка=СоздатьОбъект("СписокЗначений");
Расшифровка.ДобавитьЗначение("","Контрагент");

не вижу условий в запросе и не вижу где используется параметр процедуры ЗН?

Там много чего не видно, в том числе определения таблицы вывода, потребности в следующих за Контрагент группировках и пр. А зн даже не заметила, восприняла, что зн=расшифровка.

Ребята списибО всем огромное,решил,взял только контрагента чтоб расшифровало,а уже в расшифроке вЫтЯнул запрос все что мне надо было