Имя: Пароль:
1C
1С v8
hрегистр штрих кодов
0 potapovi4
 
01.11.15
22:57
добрый вечер подскажите почему запрос молчит?            ЗапросШ = Новый Запрос;
            ЗапросШ.Текст =
            "ВЫБРАТЬ
            |   ШтрихКоды.ШтрихКод КАК ШтрихКод
            |ИЗ
            |     РегистрСведений.Штрихкоды КАК ШтрихКоды  
            |ГДЕ
            | ШтрихКоды.Владелей=&Номенклатура
            | И  ШтрихКоды.ХарактеристикаНоменклатуры=&ХарактеристикаНоменклатуры";
            ЗапросШ.УстановитьПараметр("Номенклатура",     стр.Номенклатура);
            ЗапросШ.УстановитьПараметр("ХарактеристикаНоменклатуры", стр.ХарактеристикаНоменклатуры);  
            выбШ=Запрос.Выполнить().Выбрать();
            Если выбШ.Следующий() Тогда
1 potapovi4
 
01.11.15
23:00
емае.владелеЙ
2 Tatitutu
 
01.11.15
23:01
Запрос<>Запросш
3 potapovi4
 
01.11.15
23:02
тогда немного друой вопрос
            ////////////////////////////////////////////////////////
            ЗапросШ = Новый Запрос;
            ЗапросШ.Текст =
            "ВЫБРАТЬ
            |   ШтрихКоды.ШтрихКод КАК ШтрихКод
            |ИЗ
            |     РегистрСведений.Штрихкоды КАК ШтрихКоды  
            |ГДЕ
            | ШтрихКоды.Владелец=&Номенклатура
            | И  ШтрихКоды.ХарактеристикаНоменклатуры=&ХарактеристикаНоменклатуры";
            ЗапросШ.УстановитьПараметр("Номенклатура",     стр.Номенклатура);
            ЗапросШ.УстановитьПараметр("ХарактеристикаНоменклатуры", стр.ХарактеристикаНоменклатуры);  
            выбШ=Запрос.Выполнить().Выбрать();
            Если выбШ.Следующий() Тогда
                ////////////////////////////////////////////////////////
                ТекЗапись = РегистрыСведений.Штрихкоды.СоздатьМенеджерЗаписи();
                ТекЗапись.Владелец         = стр.Номенклатура;
                ТекЗапись.ЕдиницаИзмерения = стр.ЕдиницаИзмерения;
                ТекЗапись.ТипШтрихкода     = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
                ТекЗапись.Качество         = Справочники.Качество.Новый;
                ТекЗапись.Штрихкод         = выбШ.ШтрихКод;
                //ТекЗапись.Наличие         = 0 ;
                ТекЗапись.Прочитать();
                ТекЗапись.Наличие         = 0 ;
                Попытка
                    ТекЗапись.Записать();
                Исключение
                КонецПопытки;
            КонецЕсли;    

почему запрос не пишет ничего в регистр
4 Tatitutu
 
01.11.15
23:04
выбШ=Запрос.Выполн

Заменил на

выбШ=ЗапросШ.Выполн
5 potapovi4
 
01.11.15
23:07
(4)заменио сирано глухо
6 potapovi4
 
01.11.15
23:07
наличие число как измерение.что в регистр ноль записать нельзя?
7 Tatitutu
 
01.11.15
23:11
(5)(6) бухой?
8 potapovi4
 
01.11.15
23:14
гыгы.да 3 бутылки шампанского асти
9 potapovi4
 
01.11.15
23:32
ребзя ну где ошибк то?
10 potapovi4
 
01.11.15
23:32
хочу к сщесьвующей записи в регистре наличие присобачить
                ////////////////////////////////////////////////////////
                ТекЗапись = РегистрыСведений.Штрихкоды.СоздатьМенеджерЗаписи();
                ТекЗапись.Владелец         = стр.Номенклатура;
                ТекЗапись.ЕдиницаИзмерения = стр.ЕдиницаИзмерения;
                ТекЗапись.ТипШтрихкода     = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
                ТекЗапись.Качество         = Справочники.Качество.Новый;
                ТекЗапись.Штрихкод         = выбШ.ШтрихКод;
                ТекЗапись.Наличие         = 0 ;
                ТекЗапись.Прочитать();
                //ТекЗапись.Наличие         = 0 ;
                Попытка
                ТекЗапись.Наличие         = 0 ;
                    ТекЗапись.Записать();
                Исключение
                КонецПопытки;
неполучается
11 pumbaEO
 
01.11.15
23:32
(9) брось 1с и полируй водкой.
12 potapovi4
 
01.11.15
23:38
немагу.1с пуще неволи.....
13 hhhh
 
02.11.15
04:44
так Наличие - это Измерение? Расстрелять.
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший