Смысл такой:
Необходимо получить номер печатной формы КМ7!
запрос за 1 год по ККМ(касса) нумеруются документы по порядку
В справочнике касса содержится ссылка на документ ОтчетККМ.

Текст кода(//СЮДА НЕ ПОПАДАЕТ ВЫПОЛНЕНИЕ КОДА - сюда надо зайти при выполнении функции):
Запрос=СоздатьОбъект("Запрос");
    ТекстЗапроса = "
    |SELECT          
    //|    Жур.IDDoc as [Док $Документ],
    //|    Жур.IDDocDef as Док_вид,    
    |    Жур.IDDoc as Док,
    |    Count(Жур.IDDoc) as НомерПоПорядку
    |FROM
    |    _1SJourn as Жур  
    |INNER JOIN _1SJourn as Жур2 ON Жур2.Date_Time_IDDoc BETWEEN :НачДата AND :КонДата~ AND Жур2.$ОбщийРеквизит.ККМ=:ККМ AND Жур2.IDDocDef = $ВидДокумента.ОтчетККМ
    |                                   AND Жур2.DATE_TIME_IDDOC<=Жур.DATE_TIME_IDDOC
    |WHERE
    |    Жур.Date_Time_IDDoc BETWEEN :НачДата AND :КонДата~ AND Жур.$ОбщийРеквизит.ККМ=:ККМ AND Жур.IDDocDef = $ВидДокумента.ОтчетККМ
    //|GROUP BY Жур.IDDoc,Жур.IDDocDef";
    |GROUP BY Жур.IDDoc";
    БД.УстановитьТекстовыйПараметр ("ККМ",ККМ);                                        
    БД.УстановитьТекстовыйПараметр ("НачДата",НачГода(ДатаДок));                                        
    БД.УстановитьТекстовыйПараметр ("КонДата", КонГода(ДатаДок));                                        
   
    ТЗ = БД.ВыполнитьИнструкцию(ТекстЗапроса);
    НомерСтроки="";      
    //ТекДок=ТекущийДокумент();
    //Если ТЗ.НайтиЗначение(ТекДок,НомерСтроки,"Док")=1 Тогда
    Если ТЗ.НайтиЗначение(ТекущийДокумент(),НомерСтроки,"Док")=1 Тогда          
         НомерТекущегоДокумента=ТЗ.ПолучитьЗначение(НомерСтроки, "НомерПоПорядку"); //СЮДА НЕ ПОПАДАЕТ ВЫПОЛНЕНИЕ КОДА
    Иначе      
         Возврат 0;
    КонецЕсли;

З.Ы.:
Получение Док как документ, не помагает
    |    Жур.IDDoc as [Док $Документ],
    |    Жур.IDDocDef as Док_вид,

Перен вопрос в секцию 1с 7 v7: ТЗ.НайтиЗначение(ТекущийДокумент(),НомерСтроки,"Док") не находит знач. Просьба админам удалит тему из этой секции.