Имя: Пароль:
1C
1C 7.7
v7: запрос по подчиненному справочнику
0 егаис
 
03.07.13
11:29
ТиС 77


Процедура ПоискПоШК()
   
   СтрокаШК = "";
   Если ВвестиСтроку(СтрокаШК, "Введите штрихкод",13,0) = 1 Тогда
       Запрос = СоздатьОбъект("Запрос");
       ТекстЗапроса = "//{{ЗАПРОС(ШК)
       |Владелец = Справочник.Единицы.Владелец;
       |ШтрихКод = Справочник.Единицы.ШтрихКод;
       |Группировка Владелец без Групп;
       |Условие(ШтрихКод = СтрокаШК);
       |"//}}ЗАПРОС
       ;
       Если Запрос.Выполнить(ТекстЗапроса) = 1 Тогда  
           Если Запрос.Группировка(1) = 1 Тогда  
               АктивизироватьОбъект(Запрос.Владелец);
           КонецЕсли;
       КонецЕсли;
   КонецЕсли;
   
КонецПроцедуры    

Что не так, не ищет по введенному ШК ((
1 viktor_vv
 
03.07.13
11:32
СокрЛП(ШтрихКод) = СокрЛП(СтрокаШК)

или размерность поля ввода одинаковую с реквизитом сделай.
2 егаис
 
03.07.13
11:32
одинаковая
капец, просто перезапустил предприятие и заработало
мистика какая-то
3 viktor_vv
 
03.07.13
11:32
Может длина реквизита не 13 .
4 егаис
 
03.07.13
11:33
закрываем