Функция ПолучитьГруппировочныйРеквизит(Товар)
   Если Товар.Приоритет = "1" Тогда
       Возврат 1;
   ИначеЕсли Товар.Приоритет = "3" Тогда
       Возврат 3;
   Иначе
       Возврат 5;
   КонецЕсли;
   
КонецФункции //

Процедура ПечатьПо()
   Перем Запрос, ТекстЗапроса;
   
   Сз = СоздатьОбъект("СписокЗначений");
   меню = СоздатьОбъект("СписокЗначений");
   меню.добавитьЗначение(1, "Печать на склады");
   меню.ДобавитьЗначение(2, "Печать на склады с остатками");
       
   ВыгрузитьТабличнуюЧасть(СЗ,"Товар");    
   ТаблицаПоОстаткамНоменклатуры = ПолучитьОстаткиПоНоменклатуре(СЗ);
   рез1 = 0;
   Резз = меню.выбратьЗначение(рез1,,,10,1);

   Запрос = СоздатьОбъект("Запрос");
   ТекДок = ТекущийДокумент();
   ТекстЗапроса = "
   |ТекущийДокумент = Документ.ЗаказПоНормам.ТекущийДокумент;
   |Кол  =Документ.ЗаказПоНормам.Количество;
   |Товар = Документ.ЗаказПоНормам.Товар;
   |Цена = Документ.ЗаказПоНормам.Цена;
   |ЕД = Документ.ЗаказПоНормам.Единица;
   |ГруппировочныйРеквизит = ПолучитьГруппировочныйРеквизит(Товар);
   |Прир = Документ.ЗаказПоНормам.Товар.Приоритет;
   |Сумма = Документ.ЗаказПоНормам.Сумма;
   |Условие(ТекущийДокумент = ТекДок);
   |Группировка ГруппировочныйРеквизит;
   |Группировка Товар Без Групп;
   |";
   Если Запрос.Выполнить(ТекстЗапроса) = 0  Тогда
       Возврат;
   КонецЕсли;


Подскажите почему функцию не видит и ругается

Если Запрос.Выполнить(ТекстЗапроса) = 0  Тогда
{Документ.ЗаказПоНормам.Форма.Модуль(495)}: ГруппировочныйРеквизит =  <<?>> ПолучитьГруппировочныйРеквизит(Товар);
Запрос[7] : Неверно заданный путь 'ПолучитьГруппировочныйРеквизит'
Если Запрос.Выполнить(ТекстЗапроса) = 0  Тогда
{Документ.ЗаказПоНормам.Форма.Модуль(495)}: Условие(ТекущийДокумент = ТекДок <<?>> );
Запрос[10] : Ошибка в условии
Если Запрос.Выполнить(ТекстЗапроса) = 0  Тогда
{Документ.ЗаказПоНормам.Форма.Модуль(495)}: Группировка ГруппировочныйРеквизит <<?>> ;
Запрос[11] : Переменная  'ГруппировочныйРеквизит' не опеределена

Ну и запросы у Вас...