Имя: Пароль:
1C
1С v8
ТЗ.НайтиЗначение(ТекущийДокумент(),НомерСтроки,"Док") не находит знач.
0 GalanEvgeny
 
28.01.13
13:15
Смысл такой:
Необходимо получить номер печатной формы КМ7!
запрос за 1 год по ККМ(касса) нумеруются документы по порядку
В справочнике касса содержится ссылка на документ ОтчетККМ.

+ Code

Текст кода(//СЮДА НЕ ПОПАДАЕТ ВЫПОЛНЕНИЕ КОДА - сюда надо зайти при выполнении функции):

Запрос=СоздатьОбъект("Запрос");
    ТекстЗапроса = "
    |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 GalanEvgeny
 
28.01.13
13:17
Переношу вопрос в секцию 1с 7